自动粘贴信息到微信，自动发送。 - 洛阳翼展电脑


自动粘贴信息到微信，自动发送。

2020-6-2 乱云飞 代码 

On Error Resume Next 

Dim wsh,ye

set wsh=createobject("wscript.shell") 

for i=1 to 20

wscript.sleep 700 

wsh.AppActivate("emmm") 

wsh.sendKeys "^v" 

wsh.sendKeys str(i)

wsh.sendKeys "%s" 

next 

wscript.quit
本文链接：http://80c.cc/ez/321.html
0
上一篇 / 水滴信用证书
下一篇 / 牛魔王选股汇总

发表评论：

VirtualCamera：在录像机中虚拟一个通道显示电脑桌面、视频文件、USB摄像头~
预ICP备10086-001号 © 翼展网/80C.CC 技术支持/洛阳翼展科技
TEL / 13213610060 QQ / 345794501
Powered by emlog