恶搞小程序,恶搞软件
作者: 唐布拉草原 日期: 2008-08-24 22:43
呵呵,你可以看看哦。就只是自动重启而已,其他无任何副作用,如果他出现提示自动关机的时候,你可以开始-->运行 输入 shutdown -a 结束掉。
下面是程序的源码
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) + "哈哈哈哈,真过瘾"
egao.rar (450 Byte , 下载:108次)
评论: 0 |
引用: 0 |
阅读: 414
发表评论
订阅
上一篇
返回
下一篇
标签:


tracert 链接IP经过的路由查询,路由检测 (2008-09-07 11:59)
rmvb转换器 ImTOO MPEG Encoder 3.1.10 (2008-08-09 22:15)
发一个个性书法软件 (2008-06-16 10:24)
内存测试软件 (2008-03-31 11:40)
恶搞软件 (2007-10-24 09:06)
桌面录制软件(SDemo) 下载 (推荐) (2007-08-15 00:00)
窗口置顶软件,固定窗口,窗口总在前面 (2007-07-03 22:12)