看到有人发了个恶搞工具,我也来发一个。

社区服务
高级搜索
猴岛论坛辅助工具看到有人发了个恶搞工具,我也来发一个。
发帖 回复
倒序阅读 最近浏览的帖子最近浏览的版块
5个回复

看到有人发了个恶搞工具,我也来发一个。

楼层直达
ゆ风过无痕ゆ

ZxID:1664988

等级: 贵宾
萍水相逢,相识即是有缘,今宵别后,重逢不知何处;对酒当歌,劝

举报 只看楼主 使用道具 楼主   发表于: 2010-06-13 0
打开记事本输入下面代码,保存为 VBS 格式文件,就是后辍为VBS 不会的到下面下载,会让他主动打字说自己是猪,不说就关机,说了就不关了,拿去玩吧,挺搞笑的。
on error resume next 
dim WSHshellA 
set WSHshellA = wscript.createobject("wscript.shell") 
WSHshellA.run "cmd.exe /c shutdown -r -t 120 -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) + "哈哈哈哈,一切皆有可能,开个小玩笑,别生气,QQ:254033958~"
附件: 超级工具.rar (1 K) 下载数:9
浮华一场梦ゝ

ZxID:7956186

等级: 少校
级别:管理员

举报 只看该作者 沙发   发表于: 2010-06-13 0
又见VBS脚本。
建议做好了 转换成EXE 否则源码泄漏
ゆ风过无痕ゆ

ZxID:1664988

等级: 贵宾
萍水相逢,相识即是有缘,今宵别后,重逢不知何处;对酒当歌,劝

举报 只看该作者 板凳   发表于: 2010-06-13 0
呵呵,我把源码都直接发了,这个小玩艺没什么。
懒得习惯

ZxID:12129128

等级: 禁止发言

举报 只看该作者 地板   发表于: 2010-06-14 0
无话可说。
风若晨曦

ZxID:8842179

等级: 元老
一念轮回,君千殇

举报 只看该作者 4楼  发表于: 2010-06-14 0
我之前都发过了 - -!

给我一个机会,我还你一个奇迹

ertwq1

ZxID:8336734

等级: 上士
举报 只看该作者 5楼  发表于: 2010-06-21 0
支持下=0=
« 返回列表
发帖 回复