![]() |
中国DOS联盟-- 联合DOS 推动DOS 发展DOS --联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum |
| 游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟 |
|
中国DOS联盟论坛 现在时间是 2026-08-10 11:00 |
共 47,811 主题排行 / 349,897 发帖 / 今日 0 篇 / 48,255 会员排行 |
| DOS批处理 & 脚本技术(批处理室) » 求批处理:可以自动登录QQ2009 |
| 可打印版本 1,311 / 8 |
| 第1楼 JamesYou | 发表于 2008-11-13 20:02 |
| 初级用户 发帖 36 积分 52 | |
|
求批处理:可以自动登录QQ2009 求批处理:可以自动登录QQ2009
要可以用的,谢了。 |
|
| 第2楼 HAT | 发表于 2008-11-13 20:37 |
| 版主 发帖 5,017 积分 9,023 | |
|
目前最新版的QQ2009预览版不支持命令行登陆方式,可以用VBS的SendKeys方法,但不推荐。
等2009正式版出来以后再看看是否支持命令行登陆吧。 |
|
| 第3楼 lserfn | 发表于 2008-11-13 22:24 |
| 初级用户 发帖 49 积分 97 | |
|
dim wshscript
set wshscript = createobject("wscript.shell") wshscript.run "f:\qq\qq2009.exe" wscript.sleep 2000 wshscript.sendkeys "{tab}" wscript.sleep 2000 wshscript.sendkeys "275678339"(帐号) wscript.sleep 2000 wshscript.sendkeys "{tab}" wshscript.sendkeys "*********"(密码) wscript.sleep 2000 wshscript.sendkeys "{enter}" |
|
| 第4楼 JamesYou | 发表于 2008-11-14 12:29 |
| 初级用户 发帖 36 积分 52 | |
|
Hat:
为什么不推荐“VBS的SendKeys方法”登录QQ2009 ? |
|
| 第5楼 slore | 发表于 2008-11-14 13:13 |
| 铂金会员 发帖 2,478 积分 5,212 | |
|
明文……
|
|
| 第6楼 HAT | 发表于 2008-11-14 13:45 |
| 版主 发帖 5,017 积分 9,023 | |
|
Re 4楼 1. 明文
2. 失去焦点的SendKeys可能造成无法预料的后果 |
|
| 第7楼 zuiwangqiuyue | 发表于 2008-11-14 13:53 |
| 新手上路 发帖 19 积分 19 | |
|
试试这个,我一直都在用.............非本人作品
------------------------------------------------------------------------------- Dim Program1 Program1="QQ路径" Set WshShell=Createobject("Wscript.Shell") Set oExec=WshShell.Exec(Program1) WScript.Sleep 2000 WshShell.AppActivate "帐号" WshShell.SendKeys "{TAB}" WshShell.SendKeys "帐号" WScript.Sleep 200 WshShell.SendKeys "{TAB}" WScript.Sleep 200 WshShell.SendKeys "密码" WScript.Sleep 200 WshShell.SendKeys "{ENTER}" WshShell.SendKeys "{ENTER}" --------------------------------------------------------------------- |
|
| 第8楼 JamesYou | 发表于 2008-11-16 20:24 |
| 初级用户 发帖 36 积分 52 | |
|
还是不行
|
|
| 第9楼 77720666 | 发表于 2008-11-17 10:43 |
| 初级用户 发帖 46 积分 59 | |
|
SendKeys
就是虚拟键盘~ 需要明文密码~不安全~且不稳定~ |
|
|
[ 联系联盟系统管理团队 -
中国DOS联盟 -
标准版 ] Sponsored by ifanr Inc | © 2001–2023 |