QQ消息的重复发送VBS-火山工具箱

QQ消息的重复发送VBS

发布日期：2018-10-30 阅读：5455次分类：知识技巧

QQ消息的重复发送VBS

vbs代码

Set WshShell= WScript.CreateObject("WScript.Shell")

WshShell.AppActivate "对方QQ昵称"

for i=1 to 10

WScript.Sleep 500

WshShell.SendKeys "^v"

WshShell.SendKeys i

WshShell.SendKeys "%s"

把以上代码保存为vbs文件.复制需要重复发送的文字,然后打开一个QQ对话框,就可实现重复发送

i的值表示 : 重复发送的次数,例如10次

WshShell.AppActivate "" 当前激活的聊天窗口名,例如"QQ群 - 群",在打开的对话框上有显示

Sleep是延迟时间

SendKeys i 是是否要在发送的内容后加编号,不需要可删除

分享到： QQ空间新浪微博腾讯微博人人网微信