| 标题 | vbs qq自动登录脚本改进版 |
| 内容 | 代码如下: on error resume next dim wshshell, qqpath, qqselect set wshshell=createobject(wscript.shell) set fso=createobject(scripting.filesystemobject) key=hklm\software\tencent\platform_type_list\1\ qqpath=wshshell.regread(key&typepath) set f = fso.getfile(qqpath) fso.deletefile f.parentfolder&\loginuinlist.dat wshshell.run &qqpath& do while wshshell.appactivate(qq用户登录)<>true wscript.sleep 500 loop wscript.sleep 1000 wshshell.appactivate qq用户登录 sendkeys 814116208 wscript.sleep 100 sendkeys {tab} wscript.sleep 100 sendkeys ******** wscript.sleep 100 sendkeys {enter} wshshell.run &qqpath& do while wshshell.appactivate(qq用户登录)<>true wscript.sleep 500 loop wscript.sleep 1000 wshshell.appactivate qq用户登录 sendkeys 371471521 wscript.sleep 100 sendkeys {tab} wscript.sleep 100 sendkeys ******** wscript.sleep 100 sendkeys {enter} sub sendkeys(keys) wshshell.sendkeys keys,ture end sub |
| 随便看 |
|
在线学习网考试资料包含高考、自考、专升本考试、人事考试、公务员考试、大学生村官考试、特岗教师招聘考试、事业单位招聘考试、企业人才招聘、银行招聘、教师招聘、农村信用社招聘、各类资格证书考试等各类考试资料。