This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.
Show posts MenuSet objWSHShell = CreateObject("WScript.Shell")
Set objFSO = CreateObject("Scripting.FileSystemObject")
MyDir = "C:\MyVariableDirectory\"
If objFSO.FileExists(MyDir & "MySleep.vbs") Then MyFileExists = True Else MyFileExists = False
If MyFileExists = False Then
Set HalXBrain = CreateObject("UltraHalAsst.Brain")
HalXBrain.AppendFile(MyDir & "MySleep.vbs"), "WScript.sleep 1000"
Do Until objFSO.FileExists(MyDir & "MySleep.vbs") : Loop
End If
objWSHShell.Run """" & MyDir & "MySleep.vbs" & """", ,true