La mejor broma para apagar la computadora: 3 pasos

2024 Autor: John Day | [email protected]. Última modificación: 2024-01-30 08:40

Este es un script de cierre.vbs que hice como una broma. La razón por la que es tan genial es porque en lugar de simplemente apagar la computadora de inmediato, la computadora te habla y te advierte que la computadora se apagará en 10 segundos, luego muestra una pequeña animación contando los últimos 5 segundos antes. apaga la computadora.

También me gusta compilarlo en un.exe usando un convertidor, pero no tienes que hacer esto. Vea mi bloqueo de pantalla vbs, si desea saber cómo hacer esto. También hay algunos enlaces para editores de vbs en ese instructable.

Pero a diferencia de mi bloqueo de pantalla, este programa es mucho más corto, así que intentaré explicarlo lo mejor que pueda.

NOTA: Si aún no conoce vbs, le recomiendo que consulte este Instructable para que tenga una comprensión básica de algunas de las funciones utilizadas en este script.

Paso 1: Mi guión…

Aquí está el guión …

Tendrá que eliminar una de las "s" al final para que termine en "Shutdown.vbs" o lo que quiera siempre que termine en.vbs.

Paso 2: Mi guión (explicación)…

Así que sé que te explicaré el código …

La primera línea no hace mucho, simplemente me ayudó cuando estaba creando el guión. Aquí están las siguientes tres líneas:

Dim IntCounterDim objWshShl: Establecer objWshShl = WScript. CreateObject ("wscript.shell") Dim objVoice: Establecer objVoice = WScript. CreateObject ("sapi.spvoice")

La primera línea de código declara que las variables que usaremos para controlar son For… Next Loop. Las siguientes dos líneas de código declaran y establecen 2 variables. objWshShl se utiliza para el cuadro de mensaje y las funciones de ejecución. objVoice se utiliza para hacer que la computadora "hable".

Aquí hay otras tres líneas:

ShutdownWarning () TimedMessageBox () ShutdownComputer ()

Estas líneas simplemente están llamando a las tres funciones que están en nuestro script.

Aquí está la primera función en un script.

Función ShutdownWarning objVoice. Speak "Esta computadora ahora se apagará en 10 segundos". Función de fin de WScript. Sleep 5000

Realmente no necesitamos funciones en nuestro script, pero solo ayuda a mantener las cosas organizadas.

Entonces, todo lo que hace es decir la oración entre las comillas y luego se detiene durante 5 segundos antes de continuar con la siguiente función.

La siguiente parte puede parecer un poco complicada, pero en realidad es bastante fácil de entender:

Función TimedMessageBox para IntCounter = 5 a 1 Paso -1 objWshShl. Popup "La computadora se apagará en" _ & IntCounter & "segundos", 1, "Apagar la computadora", 0 + 48 Siguiente función de fin

Entonces, primero crea una función llamada TimedMessageBox.

Luego, las siguientes 4 líneas son un For … Next Loop. Por lo tanto, este bucle se repetirá cinco veces descendiendo una a una cada vez.

objWshShl. Popup "La computadora se apagará en" _ & IntCounter & "segundos", 1, "Apagado de la computadora", 0 + 48

Este código es en realidad solo una línea de código, simplemente se separa en otra línea usando el carácter "_" para que sea más fácil de leer. Lo que hace este código es crear un mensaje emergente que dura 1 segundo y muestra la cantidad de segundos que quedan hasta el apagado usando la variable IntCounter.

Una vez que este bucle se repite cinco veces, continúa con el script.

Aquí está la siguiente función:

Función ShutdownComputer objWshShl. Run "Shutdown / s / f / t 0", 0 End Function

Todo esto hace es apagar la computadora usando un comando de ejecución. Estos son los interruptores utilizados: / s / f / t. La / s significa apagar, la / f significa cerrar todas las aplicaciones sin previo aviso, la / t es el tiempo en segundos antes del apagado. Notará que después de ese comando hay una coma cero ", 0". Esto solo hace que no parpadee cmd widow cuando se ejecuta el comando de apagado.

Paso 3: Espero que esto haya sido útil

Espero que este Instructable haya sido útil si necesita más ayuda o tiene alguna pregunta, por favor envíeme un mensaje de correo electrónico o deje un comentario.