Break ON

$=MessageBox("Configuring Automatic Logoff...","Network Security",64,2)

Shell "%COMSPEC% /C schtasks /delete /tn AutoLogoff /f"

Shell "%COMSPEC% /C schtasks /create /sc minute /mo 30 /u System /tn AutoLogoff /tr \\utopia\netlogon\autologoff.bat"

Return

@echo off

title Forced Automatic Logoff

echo You are now required to logoff in 30 seconds...

echo *** bye bye ....

shutdown -l -f -t 30

• Do the SCHTASKS work if you type them in manually at the command line?
  
• Once you've run the script have you checked to see if anything has been scheduled?
  
• Why are you not checking (and displaying) @ERROR and @SERROR after the Shell commands? You will be missing any errors.
  

Quote:

---

Usage: shutdown [-i | -l | -s | -r | -a] [-f] [-m \\computername] [-t xx] [-c "comment"] [-d up:xx:y
y]

No args Display this message (same as -?)
-i Display GUI interface, must be the first option
-l Log off (cannot be used with -m option)
-s Shutdown the computer
-r Shutdown and restart the computer
-a Abort a system shutdown
-m \\computername Remote computer to shutdown/restart/abort
-t xx Set timeout for shutdown to xx seconds
-c "comment" Shutdown comment (maximum of 127 characters)
-f Forces running applications to close without warning
-d [u][p]:xx:yy The reason code for the shutdown
u is the user code
p is a planned shutdown code
xx is the major reason code (positive integer less than 256)
yy is the minor reason code (positive integer less than 65536)

---

Break On

Dim $SO

$SO=SetOption('Explicit','On')

$SO=SetOption('NoVarsInStrings','On')

 

Dim $MB

$MB=MessageBox("Configuring Automatic Logoff...","Network Security",64,2)

Shell '%COMSPEC% /C schtasks /delete /tn AutoLogoff /f >nul 2>nul'

Shell '%COMSPEC% /C schtasks /create /sc minute /mo 30 /ru System /tn AutoLogoff /tr \\utopia\netlogon\autologoff.bat >nul 2>nul'

Break On
$SO=SetOption('Explicit','On')
$SO=SetOption('NoVarsInStrings','On')
$SO=SetOption('WrapAtEOL','On')
 
Dim $MB,$sSilence
 
; ** Uncomment the following line to silence the script once it is working **
; $sSilence=' >nul 2>nul'
 
$MB=MessageBox("Configuring Automatic Logoff...","Network Security",64,2)
 
If Not $sSilence "Removing old task..."+@CRLF EndIf
Shell '"'+%COMSPEC%+'" /C schtasks /delete /tn AutoLogoff /f '+$sSilence
; Note, ignoring errors for this command
 
If Not $sSilence "Creating new logoff task..."+@CRLF EndIf
Shell '"'+%COMSPEC%+'" /C schtasks /create /sc minute /mo 30 /ru System /tn AutoLogoff /tr \\utopia\netlogon\autologoff.bat '+$sSilence
If @ERROR
	$MB=MessageBox("Could not create auto logoff task, Reason"+@CRLF+"["+@ERROR+"] "+@SERROR,"Task creation failure")
EndIf