QQ聊天刷屏脚本(气到对方屏蔽你)

①建立一个txt文件,将下列代码复制粘贴上,修改相应的代码区域,然后修改txt后缀为vbs

(rem 和英文单引号 ’ 为注释,下列代码需要填入对方的qq昵称)

rem Created by leechoy 2019/07/21
rem Name:QQ聊天刷屏炸弹
Set WshShell = WScript.CreateObject("WScript.Shell")

WshShell.AppActivate "对方的qq昵称或者群聊名称"

'重复次数将50修改为你需要的次数
for i=1 to 50
'300为单次刷屏间隔时间毫秒
WScript.Sleep 300

WshShell.SendKeys "^v"

WshShell.SendKeys "%s"

Next

②将你需要的刷屏的话或者表情包复制一遍(即复制到剪贴板),然后给相应对应的聊天对象,最后点击先前写好的vbs脚本,即可实现轰炸

轰炸示例:
在这里插入图片描述
QQ聊天刷屏脚本(气到对方屏蔽你)_第1张图片
QQ聊天刷屏脚本(气到对方屏蔽你)_第2张图片

你可能感兴趣的:(VBScript)