会翻车吗 大佬有话说 :
求大佬改进下这个QQ登录的VBS代码
本帖最后由 会翻车吗 于 2021-6-19 17:30 编辑
Dim Program1
Program1= "QQ路径"
Set WshShell=createobject("wscript.shell")
Set oExec=WshShell.Exec(Program1)
WScript.Sleep 3000
WshShell.AppActivate "cncn"
WshShell.SendKeys "+{TAB}"
WshShell.SendKeys "QQ号"
WScript.Sleep 200
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "密码"
WScript.Sleep 200
WshShell.SendKeys "{ENTER}"
这个代码是好用的，但是登录会提示密码错误，可能是QQ做了密码防复制措施导致的，有哪个大佬可以改进下吗
ChenYFan 大佬有话说 :
…模拟发送键盘就算了吧。。。
ApkB 大佬有话说 :
WshShell.SendKeys "密码"
这个对QQ密码输入框好像没用 🙁