qq自动发信息,骚扰办法 一、你打开好友的聊天对话框,然后记下在你QQ里好友的昵称,把下面代码里的xx替换一下,就可以自定义发送QQ信息到好友的次数(代码里的数字10改一下即可). 代码:On Error Resume Next Dim wsh,ye set wsh=createobject("wscript.shell") for i=1 to 10 wscript.sleep 700 wsh.AppActivate("与 xx 聊天中") wsh.sendKeys "^v" wsh.sendKeys i wsh.sendKeys "%s" next wscript.quit 将其上代码放在txt记事本中,点击另存为xx.vbs,打开qq聊天框,复制要发的信息,再打开xx.vbs就可以刷拉~_~ QQ
来自仁爱中学吧