赞
踩
1.创建一个txt文件
2.复制代码
On Error Resume Next
Dim xda,ye
set xda=createobject("wscript.shell")
for i =1 to 5
wscript.sleep 70
xda.AppActivate
xda.sendKeys "^v"
xda.sendKeys "%s"
next wscript.quit
3.改变后缀为vbs。
4.打开微信聊天框,聊天框中输入要发送的内容,复制。
5.双击打开vbs程序,再次点击聊天框。
赞
踩
Copyright © 2003-2013 www.wpsshop.cn 版权所有,并保留所有权利。