在本地创建一个.vbs的文本文件,添加下面的代码。
On Error Resume Next
Dim chshyz
set chshyz=createobject("wscript.shell")
wscript.sleep 2000
for i=1 to 10
wscript.sleep 8
chshyz.sendKeys "^v"
chshyz.sendKeys i #若不加提示,则去掉此行代码
chshyz.sendKeys "%s"
next
wscript.quit
- wx窗口,聊天框输入内容,复制,双击.vbs文件
- 返回wx点击发送