[Contents]

3. CGI Programs

3.9. 1runrestart.bas

Example 1runrestart.bas :

import mt.bas

chdir "\\"

mt::ListSessions SessionArray

for i= lbound(SessionArray) to ubound(SessionArray)
  if len(SessionArray[i]) > 3 then
    print "Deleting the session ",SessionArray[i],"\n"
    mt::DeleteSession SessionArray[i]
  end if
next i
sleep 30