Paso 1: Comenzar escribiendo la secuencia de comandos...
Abra Bloc de notas y escribir la siguiente secuencia de comandos en el Bloc de notas:
X DIM
Dim y
Set oShell = createobject("wscript.shell")
Set Sapi = Wscript.CreateObject ("SAPI. SpVoice")
x = InputBox ("¿quieres apagar tu PC después preiod de tiempo? respuesta: sí/no ","apagar el sistema automático! por SCRIPTmaster")
Si x = "sí" entonces
y = InputBox ("ingrese el tiempo apagado de forma automática (tiempo en minutos...):", "Apagado automático del sistema!")
SAPI.Speak y + "minutos a la izquierda para apagar"
oShell.Run "shutdown.exe -s -t" y (y * 60) & "-f - c" "sistema está listo para el apagado automático. no esperes para que las descargas hasta el final, usted puede ir a dormir! ¡Buenas noches! ¡ nos vemos 2morow! >>>> para terminar este apagado automático simplemente volver a ejecutar el script y el tipo no "" "
terminar si
Si x = "no" entonces
SAPI.Speak "vale, como quieras bueno bye, guión escrito por Ayman Farhat el SCRIPTmaster"
oShell.run "shutdown.exe - a"
terminar si
