VBScript Computer Uitschakelen Timer

[iKnow]

Hallo,

ik heb dit script gevonden voor het automatische uitschakelen van de computer. Met timer.
Nu lijkt het me een erg goed script alleen weet ik niet of hij het blijft herhalen als ik de computer weer opnieuw opsla.
Of moet ik het dan weer opnieuw uitvoeren?

Hier het script:

Call WaitRoutine() 

Sub WaitRoutine()

                Dim intWaitedTime
                Dim intMinsToWait : intMinsToWait = -1
  Dim objshell


   set objShell = CreateObject("WScript.Shell") 
                strAnswer = InputBox("How many minutes do you wish to wait?","Shutdown Computer")
                on error resume next
                intMinsToWait = cint(strAnswer)
                if (intMinsToWait = -1) or (strAnswer = "") then
                                msgbox "Shutdown Cancelled.",vbokonly + vbexclamation,"Shutdown Computer"
                                exit sub
                end if               

                NewDate = DateAdd("N", intMinsToWait, now())
                If msgbox("This will shutdown the computer at " & NewDate & ". Continue?", vbquestion + vbyesno,"Shutdown Computer") = vbno then
   exit sub   
                End If               

                'make script sleep
                WScript.Sleep(intMinsToWait * 60 * 1000) 

  strShutdown = "shutdown -s -t 0 -f -m \\" & "."
  objShell.Run strShutdown
  Wscript.Quit
End sub

Houdoe, iKnow

 

[JoZ1]

Ik snap de vraag niet helemaal.

Als ik de computer opnieuw opsla?

 

[tobiastheebe]

Visual Basic-scripts worden nooit automatisch (opnieuw) uitgevoerd, tenzij je dat expliciet opgeeft.