QQ⾃动发送信息脚本On Error Resume Next
Dim wsh,ye
set wsh=createobject("wscript.shell")甩的拼音>武夷山岩茶
for i=1 to 10
wscript.sleep 1000
小学二年级下册语文教学计划wsh.AppActivate("与 XXX 聊天中")
wsh.sendKeys "^v"qq消息
河合奈保子wsh.sendKeys i
wsh.sendKeys "%s"
next
wscript.quit
版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。
发表评论