中国DOS联盟
-- 联合DOS 推动DOS 发展DOS --联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
|
中国DOS联盟-- 联合DOS 推动DOS 发展DOS --联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum |
| 游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟 |
|
中国DOS联盟论坛 现在时间是 2026-08-08 11:20 |
共 47,811 主题排行 / 349,895 发帖 / 今日 0 篇 / 48,253 会员排行 |
| DOS批处理 & 脚本技术（批处理室） » 用批处理命令登陆QQ的问题 |
| 可打印版本 1,675 / 12 |
| 第1楼 fting | 发表于 2008-05-04 12:57 |
| 初级用户 发帖 25 积分 51 | |
|
用批处理命令登陆QQ的问题 我在网上看到这么一段登陆QQ的命令
copy e:\qq\q1\Autologin.db d:\programfiles\tencent\qq copy e:\qq\q1\AutoLogin.db d:\Program Files\tencent\qq\5633**** d: cd d:\Program Files\tencent\qq\ start qq.exe 当我用此命令运行多个QQ时却不行 有没有什么可行的方法阿```` 还有第一行不要也可以 是不是啊 如果运行多个QQ按什么顺序阿--- |
|
| 第2楼 HAT | 发表于 2008-05-04 13:43 |
| 版主 发帖 5,017 积分 9,023 | |
|
想运行几个QQ，就加几个start命令。 |
|
| 第3楼 fting | 发表于 2008-05-04 15:31 |
| 初级用户 发帖 25 积分 51 | |
|
先谢谢HAT,我想知道用
copy e:\qq\q1\Autologin.db d:\programfiles\tencent\qq copy e:\qq\q1\AutoLogin.db d:\Program Files\tencent\qq\5633**** d: cd d:\Program Files\tencent\qq\ start qq.exe 运行多个QQ是否可以;感觉如果可以的话,这应该是个不错的方法`````很简单\明了 |
|
| 第4楼 slore | 发表于 2008-05-05 00:05 |
| 铂金会员 发帖 2,478 积分 5,212 | |
|
可以. 不过应该是autologin.dat
|
|
| 第5楼 kioskboy | 发表于 2008-05-05 00:48 |
| 初级用户 发帖 103 积分 153 | |
|
set fso = Wscript.createObject("Scripting.FileSystemObject")
Set f = fso.createTextFile("QQ自动登录.bat",true) f.WriteLine "@echo off" & vbcrlf Set objWMIService = GetObject _ ("winmgmts:\\" & "." & "\root\cimv2") Set ps = objWMIService.ExecQuery _ ("Select * FROM Win32_process") For Each ps in ps '列出系统中所有正在运行的程序 if lcase(ps.name)="qq.exe" or lcase(ps.name)="tm.exe" then '检测是否QQ或TM QQCMD=ps.commandline '提取QQ程序的命行 tmp=Replace(QQCMD,chr(34),space(1)) UIN1=instr(tmp,"QQUIN:")+6 if not len(UIN1)=0 then QQUIN=mid(tmp,UIN1,instr(UIN1,tmp,space(1))-UIN1) '取QQ号码. QQ=QQ+1 QQNUM=QQNUM & "QQ号码" & QQ & ":" & vbtab & QQUIN & vbcrlf f.WriteLine "ECHO QQ号码:" & QQUIN f.WriteLine "ECHO 命令行:" & QQCMD f.WriteLine QQCMD & vbcrlf end if end if next if not len(QQ)=0 then MSGBOX "已经成功提取以下QQ号码的自动登录命令行" & vbcrlf & vbcrlf & QQNUM & vbcrlf & "具体请查看当前目录下的文件",0,"QQ自动登录命令提取脚本 BY chenall QQ:XXXXXX" else msgbox "提取QQ自动登录命令失败,请查看QQ或TM是否正在运行.",0,"QQ自动登录命令提取脚本 BY chenall QQ:XXXXXX" f.close set f = fso.getfile("QQ自动登录.bat") f.delete end if |
|
| 第6楼 fting | 发表于 2008-05-06 11:57 |
| 初级用户 发帖 25 积分 51 | |
Originally posted by slore at 2008-5-5 12:05 AM: 我一直在修改 我现在是越来越糊涂了 写出来让我们看看 吧````   |
|
| 第7楼 slore | 发表于 2008-05-06 13:02 |
| 铂金会员 发帖 2,478 积分 5,212 | |
| 第8楼 joyn | 发表于 2008-05-06 19:55 |
| 中级用户 发帖 105 积分 280 来自 广西 | |
|
历害 [quote]Originally posted by [i]kioskboy[/i] at 2008-5-5 12:48 AM:
set fso = Wscript.createObject("Scripting.FileSystemObject") Set f = fso.createTextFile("QQ自动登录.bat",true) f.WriteLine "@echo off" & vbcrlf Set objWMI ... [/quote] 可以做更多解释吗~~比如~QQCMD~~是什么 |
|
| 第9楼 slore | 发表于 2008-05-06 20:36 |
| 铂金会员 发帖 2,478 积分 5,212 | |
|
自动登陆后的命令行……
|
|
| 第10楼 XiuXiu | 发表于 2008-05-06 21:38 |
| 新手上路 发帖 7 积分 16 | |
|
start qq.exe /START QQUIN:QQ号码PWDHASH:加密后的密码(自动登陆后可以找得到)== /STAT:40 /EMB_HWND:0 /NOAUTOSCAN
用这个就可以很方便的自动登陆了.要加多少个就多少. |
|
| 第11楼 joyn | 发表于 2008-05-07 14:13 |
| 中级用户 发帖 105 积分 280 来自 广西 | |
|
了解了~~不过我不知道你是怎么知道QQ号输入的地方是那里的
|
|
| 第12楼 slore | 发表于 2008-05-07 14:33 |
| 铂金会员 发帖 2,478 积分 5,212 | |
|
这个嘛……
GOOGLE过QQ自动登陆，这些信息是有的。。。信息在网络上找的到，但是来源就很难搞清楚了…… 只是作为信息保存在脑袋里了嗬。 显示进程参数的话，就可以看到了。 |
|
| 第13楼 joyn | 发表于 2008-05-08 12:46 |
| 中级用户 发帖 105 积分 280 来自 广西 | |
|
谢谢Slore
|
|
|
[ 联系联盟系统管理团队 -
中国DOS联盟 -
标准版 ] Sponsored by ifanr Inc | © 2001–2023 |