关闭→
当前位置:趣知常识网>游戏数码>电脑>qq消息重复发送

qq消息重复发送

趣知常识网 人气:2.69W

操作方法

电脑桌面右键,选择新建文本文档

qq消息重复发送
qq消息重复发送 第2张

点击我的电脑,再点击查看按钮,将文件扩展名勾选上,可以看到之前新建的文本文档的后缀显示出来了。

qq消息重复发送 第3张
qq消息重复发送 第4张

填写无数字的代码。在中填写,代码如下:(如图)没有数字的,显示发送了多少次:
dim wshshell,a
set wshshell=createobject("l")
a=inputbox ("输入要发信息次数"&chr(13)&chr(13)&"*******★life制作★******"&chr(13)&chr(13)&"请确定刚才光标是在QQ窗体内!","提示")
WshShell.AppActivate "" '当前激活的聊天窗口名,例如"QQ群 - 群",在打开的对话框上有显示'
p 1000
for i=1 to 100 '循环的次数100'
p 500 '暂停500毫秒'
keys "^v" '粘贴
keys "%s" '%s=enter和sendkeysSendKeys +发送内容'
next

qq消息重复发送 第5张

填写有数字的代码。在中填写,代码如下:有数字的,显示发送了多少次:

dim wshshell,a
set wshshell=createobject("l")
a=inputbox ("输入要发信息次数"&chr(13)&chr(13)&"*******★life制作★******"&chr(13)&chr(13)&"请确定刚才光标是在QQ窗体内!","提示")
WshShell.AppActivate "" '当前激活的聊天窗口名,例如"QQ群 - 群",在打开的对话框上有显示'
p 1000
for i=1 to 100 '循环的次数100'
p 500 '暂停500毫秒'
keys "^v" '粘贴'
keys i '数字'
keys "%s" '%s=enter和sendkeysSendKeys +发送内容'
next

qq消息重复发送 第6张

右键选中文档,点击重命名,将文本文档的后缀改为,确定。这样程序就设置好了。

qq消息重复发送 第7张
qq消息重复发送 第8张

双击程序,在对话框中输入你想输入的内容,如:青春飞扬。然后选中输入的内容,ctrl+x(剪切)或者ctrl+c(复制)确定,再把鼠标的光标放在qq输入框里,就行了。

qq消息重复发送 第9张
qq消息重复发送 第10张
qq消息重复发送 第11张

如果有防火墙组织,点击允许即可。

图片也可以这样操作发送。

qq消息重复发送 第12张
TAG标签:#QQ #发送 #