模板消息重复发送.docxVIP

模板消息重复发送 创建一个.txt文件(右击--新建--文本文档)。 如果显示不了后缀(.txt)： 双击打开我的电脑--查看--选项--查看--在高级选项里，找到隐藏已知文件类型的扩展名，去掉前面的勾，确定，就行了。 双击打开我的电脑--查看--右侧有个“文件扩展名”,打勾，就行了(可能有的电脑系统，不支持这样的)。 填写无数字的代码。在.txt中填写，代码如下：(如图)没有数字的，显示发送了多少次： dim wshshell,aset wshshell=createobject(wscript.shell)a=inputbox (输入要发信息次数chr(13)chr(13)*******★life制作★******chr(13)chr(13)请确定刚才光标是在QQ窗体内!,提示)WshShell.AppActivate 当前激活的聊天窗口名,例如QQ群 - 群,在打开的对话框上有显示wscript.sleep 1000for i=1 to 100 循环的次数100wscript.sleep 500 暂停500毫秒wshshell.sendkeys ^v 粘贴wshshell.sendkeys %s %s=enter和sendkeysSendKeys +发送内容nextwscript.quit 填写有数字的代码。在.txt中填写，代码如下：有数字的，显示发送了多少次： dim wshshell,aset wshshell=createobject(wscript.shell)a=inputbox (输入要发信息次数chr(13)chr(13)*******★life制作★******chr(13)chr(13)请确定刚才光标是在QQ窗体内!,提示)WshShell.AppActivate 当前激活的聊天窗口名,例如QQ群 - 群,在打开的对话框上有显示wscript.sleep 1000for i=1 to 100 循环的次数100wscript.sleep 500 暂停500毫秒wshshell.sendkeys ^v 粘贴wshshell.sendkeys i 数字 wshshell.sendkeys %s %s=enter和sendkeysSendKeys +发送内容nextwscript.quit 改后缀。选中文件，右击，重命名，把后缀 .txt 改成 .vbs，确定。 这样，程序，就写好了。 双击文件，显示如下，界面。 在qq框里输入你想输入的内容(如青春飞扬)，c选中青春飞扬，ctrl+x(剪切)或者ctrl+c(复制)(个人建议ctrl+x)，确定，再把鼠标的光标放在qq输入框里，就行了，可能防火墙，会阻止进程，选择，允许操作，确定，即可。 图片也可发送。 具体操作与文字操作一致。 如果被你电脑的防火墙拦截，报错，请选择允许进程。 效果显示。 看了怎样重复发送qq消息的人还看 1.如何查看别人是否屏蔽了我发出去的QQ消息 2.如何撤回已发出的qq消息 3.定时发送QQ消息的方法 4.如何在qq里群发消息 感谢您的阅读，祝您生活愉快。