QQ轰炸机

哇塞很强大我很高兴。。。

博主很生气：因为用了轰炸机，结果QQ被冻结1天，好伤心。。。 10月15日。。

On Error Resume Next 
Dim wsh,ye 
set wsh=createobject("wscript.shell") 
wscript.sleep 1000
for i=1 to 100 
wsh.sendKeys "^v" 
wsh.sendKeys "%s" 
next 
wscript.quit

On Error Resume Next 
Dim wsh,ye 
set wsh=createobject("wscript.shell") 
wscript.sleep 1000
wsh.sendKeys "z"
wscript.sleep 300
wsh.sendKeys "z"
wscript.sleep 300
wsh.sendKeys "1"
wscript.sleep 300
wscript.quit

vbs后缀文件，博主自己开心就行。