怼人脚本,QQ消息轰炸

纯属娱乐:

Dim WshShell
Set WshShell= Wscript.CreateObject("WScript.Shell")
WshShell.AppActivate "被怼人昵称"
for i=1 to 300
WScript.Sleep 100
WshShell.SendKeys "^v"
WshShell.SendKeys i
WshShell.SendKeys "%s"
Next

正确用法

    提醒:运行提示语法错误,请另存为 ANSI编码

    1、代码复制粘贴到任意文件,并命名为.vbs结尾

    2、发送消息复制粘贴到消息待发送区域

    3、接着双击,vbs脚本自动循环发送消息

    效果图 发现对方已屏蔽掉我,(灬ꈍ ꈍ灬)

     怼人脚本,QQ消息轰炸_第1张图片

 

你可能感兴趣的:(怼人脚本,QQ消息轰炸)