qq消息重复发送
操作方式
-
01
电脑桌面右键，选择新建文本文档。
-
02
点击我的电脑，再点击查看按钮，将文件扩展名勾选上，可以看到之前新建的文本文档的后缀显示出来了。
-
03
填写无数字的代码。在.txt中填写，代码如下：（如图）没稀有字的，显示发送了几多次：
dim wshshell,a
set wshshell=createobject("wscript.shell")
a=inputbox ("输入要发信息次数"&chr(13)&chr(13)&"*******★life建造★******"&chr(13)&chr(13)&"请确定适才光标是在QQ窗体内!","提醒")
WshShell.AppActivate "" '当前激活的聊天窗口名,例如"QQ群 - 群",在打开的对话框上有显示'
wscript.sleep 1000
for i=1 to 100 '轮回的次数100'
wscript.sleep 500 '暂停500毫秒'
wshshell.sendkeys "^v" '粘贴
wshshell.sendkeys "%s" '%s=enter和sendkeysSendKeys +发送内容'
next
wscript.quit
-
04
填写稀有字的代码。在.txt中填写，代码如下：稀有字的，显示发送了几多次：
dim wshshell,a
set wshshell=createobject("wscript.shell")
a=inputbox ("输入要发信息次数"&chr(13)&chr(13)&"*******★life建造★******"&chr(13)&chr(13)&"请确定适才光标是在QQ窗体内!","提醒")
WshShell.AppActivate "" '当前激活的聊天窗口名,例如"QQ群 - 群",在打开的对话框上有显示'
wscript.sleep 1000
for i=1 to 100 '轮回的次数100'
wscript.sleep 500 '暂停500毫秒'
wshshell.sendkeys "^v" '粘贴'
wshshell.sendkeys i '数字'
wshshell.sendkeys "%s" '%s=enter和sendkeysSendKeys +发送内容'
next
wscript.quit
-
05
右键选中文档，点击重定名，将文本文档的后缀改为.vbs，确定。这样程序就设置好了。
-
06
双击程序，在对话框中输入您想输入的内容，如：芳华飞扬。然后选中输入的内容，ctrl+x（剪切）或者ctrl+c（复制）确定，再把鼠标的光标放在qq输入框里，就行了。
-
07
若是有防火墙组织，点击许可即可。
-
08
图片也可以这样操作发送。
- End
- 发表于 2020-02-26 18:00
- 阅读 ( 1405 )
- 分类：电脑网络
0 篇文章
作家榜 »
-
xiaonan123
189 文章
-
汤依妹儿
97 文章
-
luogf229
46 文章
-
jy02406749
45 文章
-
小凡
34 文章
-
Daisy萌
32 文章
-
我的QQ3117863681
24 文章
-
华志健
23 文章