vbs脚本和windows定时任务实现qq消息表情包定时发送功能(qq定时发消息辅助器安卓)怎么可以错过

随心笔谈2年前发布 编辑
152 0
🌐 经济型:买域名、轻量云服务器、用途:游戏 网站等 《腾讯云》特点:特价机便宜 适合初学者用 点我优惠购买
🚀 拓展型:买域名、轻量云服务器、用途:游戏 网站等 《阿里云》特点:中档服务器便宜 域名备案事多 点我优惠购买
🛡️ 稳定型:买域名、轻量云服务器、用途:游戏 网站等 《西部数码》 特点:比上两家略贵但是稳定性超好事也少 点我优惠购买

Set objShell=CreateObject(“Wscript.Shell”)
WScript.Sleep 3000
objShell.SendKeys “{ESC}”
WScript.Sleep 7000 ‘等待时间设置7秒是为了给足时间电脑启动
objShell.SendKeys “{ESC}”
WScript.Sleep 3000
Set Shell=Wscript.Createobject(“Wscript.shell”)
Shell.run “C:\Users\captainzou\Desktop\abc.txt” ‘qq信息文件保存地址
Wscript.Sleep 1000 ‘等待1秒
set WshShell=CreateObject(“WScript.Shell”)
WshShell.SendKeys (“^a”)
Wscript.Sleep 2000 ‘等待1秒
WshShell.SendKeys (“^c”)
Wscript.Sleep 2000 ‘等待1秒
WshShell.SendKeys “%{F4}”
Wscript.Sleep 1000 ‘等待1秒
Shell.run “C:\Users\captainzou\Desktop\tanhuang.lnk” ‘联系人快捷方式保存地址
Wscript.Sleep 5000 ‘等待5秒
WshShell.SendKeys (“^v”)
Wscript.Sleep 1000 ‘等待1秒
WshShell.SendKeys “%{F4}”
Wscript.Sleep 2000 ‘等待2秒
Shell.run “C:\Users\captainzou\Desktop\abd” ‘表情包保存地址
Wscript.Sleep 2000 ‘等待2秒
WshShell.SendKeys (“^a”)
Wscript.Sleep 1000 ‘等待1秒
WshShell.SendKeys (“^c”)
Wscript.Sleep 1000 ‘等待1秒
WshShell.SendKeys “%{F4}”
Wscript.Sleep 1000 ‘等待1秒
Shell.run “C:\Users\captainzou\Desktop\tanhuang.lnk” ‘联系人快捷方式保存地址
Wscript.Sleep 1000 ‘等待1秒
WshShell.SendKeys (“^v”)
Wscript.Sleep 4000 ‘等待4秒
WshShell.SendKeys “{ENTER}”
Wscript.Sleep 1000 ‘等待1秒
WshShell.SendKeys “%{F4}”
Wscript.Sleep 1000 ‘等待1秒

© 版权声明

相关文章