网站 › 『编程语言区』 › QQ和PC微信自动发送消息的脚本

GGS0520 发表于 2019-7-24 15:51

QQ和PC微信自动发送消息的脚本

Set WshShell=WScript.CreateObject("Wscript.Shell")
WshShell.AppActivate "窗口名称"
for i=1 to10
        WScript.Sleep 99
        WshShell.SendKeys "^v"
        WshShell.SendKeys i
        WshShell.SendKeys "%s"
Next

GGS0520 发表于 2020-5-16 18:18

zjf 发表于 2020-4-24 21:38
这脚本怎么用啊？

保存成 .vbs 文件

zoomyou 发表于 2020-12-1 17:13

GGS0520 发表于 2020-12-1 14:33
不需要放微信根目录。
把这代码复制下来，把 “窗口名称” 改成当前微信聊天窗口的名字，保存成 .vbs ...

大师，显示报错了！
按您的回复，“窗口名称”改成当前微信聊天窗口对方的微信名字（不是微信号），第六行保持i不变，
然后在对话窗口复制历史聊天文字，保持当前窗口竖线闪烁，用鼠标移动到桌面上的已保存成123.vbs上双击，
这时鼠标箭头闪动两三下后，弹出错误提示窗口！
大师，不知道哪里出问题了？请赐教，谢谢！

daoke 发表于 2019-7-28 10:09

这个需要在模块里声明对象Object

是蹦蹦呀 发表于 2019-7-28 10:30

有没有检测微信消息已读的呀，大神

平凡之家 发表于 2019-10-25 10:22

谢谢分享，可以用

zjf 发表于 2020-4-24 21:38

这脚本怎么用啊？{:1_908:}

MOEYU_VANILLA 发表于 2020-4-25 00:21

感谢分享

微博橙一呀 发表于 2020-5-7 19:51

zjf 发表于 2020-4-24 21:38
这脚本怎么用啊？

应该是cmd命令吧，但是我也没成功

GGS0520 发表于 2020-5-16 18:17

微博橙一呀 发表于 2020-5-7 19:51
应该是cmd命令吧，但是我也没成功

保存成.vbs文件

永远独行的辉爷 发表于 2020-7-22 20:51

不明觉厉，不会用

查看完整版本: QQ和PC微信自动发送消息的脚本