Paso 4: Dos falsos virus
Ejemplo 1:
prank.vbs:
Set wshshell = wscript. CreateObject("wscript.shell")
WshShell.Run "Notepad"
Wscript.Sleep 2000
WshShell. AppActivate "Bloc de notas"
WshShell.SendKeys"A"
Wscript.Sleep 145
WshShell.SendKeys"l"
Wscript.Sleep 101
WshShell.SendKeys"l"
Wscript.Sleep 125
WshShell.SendKeys""
Wscript.Sleep 250
WshShell.SendKeys"y"
Wscript.Sleep 150
WshShell.SendKeys"o"
Wscript.Sleep 130
WshShell.SendKeys"u"
Wscript.Sleep 161
WshShell.SendKeys"r"
Wscript.Sleep 140
WshShell.SendKeys""
Wscript.Sleep 185
WshShell.SendKeys"b"
Wscript.Sleep 150
WshShell.SendKeys"a"
Wscript.Sleep 112
WshShell.SendKeys"s"
Wscript.Sleep 136
WshShell.SendKeys"e"
Wscript.Sleep 145
WshShell.SendKeys""
Wscript.Sleep 130
WshShell.SendKeys"a"
Wscript.Sleep 190
WshShell.SendKeys"e"
Wscript.Sleep 108
WshShell.SendKeys"r"
Wscript.Sleep 250
WshShell.SendKeys"{BS}"
Wscript.Sleep 90
WshShell.SendKeys"{BS}"
Wscript.Sleep 108
WshShell.SendKeys"r"
Wscript.Sleep 250
WshShell.SendKeys"e"
Wscript.Sleep 190
WshShell.SendKeys""
Wscript.Sleep 130
WshShell.SendKeys"b"
Wscript.Sleep 161
WshShell.SendKeys"e"
Wscript.Sleep 140
WshShell.SendKeys"l"
Wscript.Sleep 152
WshShell.SendKeys"o"
Wscript.Sleep 150
WshShell.SendKeys"n"
Wscript.Sleep 129
WshShell.SendKeys"g"
Wscript.Sleep 200
WshShell.SendKeys""
Wscript.Sleep 130
WshShell.SendKeys"t"
Wscript.Sleep 161
WshShell.SendKeys"o"
Wscript.Sleep 140
WshShell.SendKeys""
Wscript.Sleep 118
WshShell.SendKeys"u"
Wscript.Sleep 150
WshShell.SendKeys"s"
Wscript.Sleep 250
WshShell.SendKeys"!"
Wscript.Sleep 500
WshShell.SendKeys""
Wscript.Sleep 200
WshShell.SendKeys":"
Wscript.Sleep 300
WshShell.SendKeys"P"
Wscript.Sleep 500
WshShell.Run "virus.bat"
Wscript.Sleep 700
texto = msgbox ("Su Base son pertenecen a nosotros", 16, "Tiene un Virus")
texto = msgbox ("¿desea eliminar el virus?", 20, "Tiene un Virus")
texto = msgbox ("Su Base son pertenecen a nosotros", 16, "Acceso denegado")
texto = msgbox ("Su Base son pertenecen a nosotros", 16, "Acceso denegado")
texto = msgbox ("Su Base son pertenecen a nosotros", 16, "Acceso denegado")
texto = msgbox ("Por favor espere mientras el virus se clona repetidamente", 16, "clonación Virus")
WshShell.Run "message.bat"
WshShell.Run "batchfile.bat"
hacer
texto = msgbox (¡ y ganar!, 16, "pierdes")
lazo
--------------------------------------------------------
virus.bat:
de
título todas su Base son pertenecen a nosotros
color 0a
CD..
CD..
CD..
: 1
DIR/s
Goto 1
--------------------------------------------------------
Message.bat:
echo off
título saludos, víctima
color 04
hacer
echo usted tiene un Virus
ping localhost -n 5 > nul
lazo
hacer una pausa
-------------------------------------------------------
batchfile.bat:
Inicio batchfile.bat
-------------------------------------------------------
Nota: Esto tiene que le advertí sobre, empezar a batchfile.bat en batchfile.bat. Sólo ejecutar esto si sabes lo que estás haciendo! Por cierto, cd... en el virus.bat archivo va por una ruta de directorio en cmd, que significa que usted ampliar su alcance. Esto se recorrer todos los archivos y carpetas de su equipo continuamente. Muy molesto, pero no duele nada. Y recuerde que estos son todos los archivos separados en la misma carpeta. También, la primera cosa que hace este virus broma es tipo fantasma «Todas su base son nos pertenecen», incluso con un error de tipeo y algunos encarga a corregirlo, lo que es más creíble que su víctima fue hackeada. También tiene tasas variables de escribir, como se indica por los valores diferentes para el sueño.
Ejemplo 2:
prank2.vbs:
Set wshshell = wscript. CreateObject("wscript.shell")
MsgBox "No"
MsgBox "Usted"
MsgBox "Odio"
MsgBox "Se"
MsgBox "Cuando"
MsgBox "Esto"
MsgBox "Sucede?"
WshShell.Run "test.vbs"
----------------------------------------------------
Test.vbs:
strSoundFile = "C:\fakevirusprank2\magicwrd.wav"
Set objShell = CreateObject("Wscript.Shell")
texto = msgbox ("¿quieres un cachorro?", 52 "Cachorros gratis")
hacer
strConnection = "sndrec32 /play" & chr(34) & strSoundFile & chr(34)
objShell.Run strConnection, 0, False
Wscript.Sleep 500
texto = msgbox ("No decir la palabra mágica", 16, "Que hacer no conseguir un cachorro")
lazo
--------------------------------------------------
Nota: El directorio de la primera línea de test.vbs es donde está el archivo de sonido. Mi archivo de sonido es el Jurassic Park "Uhn uhn uhn, olvidó decir la palabra mágica", y coloca, por lo que es realmente divertido y molesto. La primera parte muestra un cuadro de mensaje distinto cada vez que haga clic en aceptar o cerrar la ventana, luego ejecuta el segundo archivo. El segundo archivo pide a la víctima si desea un cachorro, no importa lo haga clic en, si, no, o cerrar, el archivo de audio de onda de Jurassic Park y consiguen un mensaje de error correspondiente.
Bien, para desactivar el primero de ellos, sin duda el más peligroso de los dos, primero pulsado ctrl + c derecho después de que las ventanas de cmd empezar a llenar la pantalla. Retraso y puede ser demasiado tarde en algunos ordenadores más antiguos. Una vez se detiene. cierre todas las ventanas de cmd individualmente y luego abra el administrador de tareas. Usted tendrá que finalizar el proceso llamado "wscript.exe" que he mencionado anteriormente. Luego cerrar todo lo demás sigue abierto, y no es necesario guardar el archivo de texto ;)
Para deshabilitar el segundo de ellos, sólo abrir task manager y final wscript.exe. Cerca de todo lo que está abierto. Pedazo de pastel.
