fb:porticula NoPaste
Zeitgesteuerter Shutdown Timer
Uploader: | Siedlerchr |
Datum/Zeit: | 24.02.2008 15:48:35 |
Dim As String parameter=" -C Auto Shutdown -s -t 10" 'Parameter für Shutdown Befehl (cmd->shutdown)
Dim zeit As Double
Dim msec As Double
Print "Faehrt den PC nach gewuenschter Zeit runter"
Input "Zeit in Min eingeben, nach der der PC runtergefahren wird";msec 'Zeit in
'In Minuten umrechnen: *1000 von mili auf sec und mal 60 nach minute
zeit=msec*1000*60
Sleep zeit 'Die Zeit warten
Print "geht" 'Übeflüssig
Shell ("START shutdown" ¶meter ) 'Konsole mit Shutdown & den Parametern starten
Sleep