Programmera din dator att stänga av automatiskt av asigning vilken tid du vill göra som (1 / 4 steg)
Steg 1: Börja med att skriva manus...
Öppna Anteckningar och skriva följande skript i Anteckningar:
Dim x
Dim y
Ange oShell = createobject("wscript.shell")
Ställa in Sapi = Wscript.CreateObject ("SAPI. SpVoice")
x = InputBox ("vill du avstängning datorn efter en preiod tid? svar: ja/nej ","automatisk avstängning! av SCRIPTmaster")
om x = "ja" då
y = InputBox ("ange tid för avstängning ska ske automatiskt (tid i minuter...):", "Automatisk avstängning!")
SAPI.Speak y + "minuter kvar för avstängning"
oShell.Run "shutdown.exe -s -t" & (y * 60) & "-f - c" "System är nu inställd för automatisk avstängning! vänta inte för nedladdningar till slut, du kan gå för att sova! God natt! se dig 2morow! >>>> för att avsluta denna automatisk avstängning bara kör manuset och typ inte "" "
slut om
om x = "nej" sedan
SAPI.Speak "Okej, du vill hejdå, manus Skrivet av Ayman Farhat SCRIPTmaster"
oShell.run "shutdown.exe en"
slut om