[文件操作] 【已结】如何自动登录QQ

Rank: 4

帖子: 113
积分: 488
技术: 0
捐助: 0
注册时间: 2008-9-5

1楼 跳转到 » 倒序看帖

打印

字体大小: tT

发表于 2008-9-5 12:19 | 只看该作者

[文件操作] 【已结】如何自动登录QQ

能不能写个BAT执行下列操作
运行QQ.EXE 自动输入QQ账号及密码后登录

Rank: 12

帖子: 14935
积分: 46142
技术: 857
捐助: 745
注册时间: 2008-6-9

2楼

发表于 2008-9-5 13:15 | 只看该作者

@echo off
for /f "skip=4 tokens=1,2 delims=:" %%a in ('reg query HKEY_LOCAL_MACHINE\SOFTWARE\Tencent\QQ /v Install') do (
  set QQPathL=%%a
  set QQPathR=%%b
)
set QQPath=%QQPathL:~-1%:%QQPathR%
start "" "%QQPath%qq.exe" /start QQUIN:843875648 PWDHASH:4Z1c1a8DeNoF9j+JHHRnrw== /stat:10
复制代码

我帮忙写的代码不需要付钱。如果一定要给，请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家，加入VIP会员！】http://bbs.bathome.net/thread-67716-1-1.html

Rank: 4

帖子: 113
积分: 488
技术: 0
捐助: 0
注册时间: 2008-9-5

3楼

发表于 2008-9-5 15:06 | 只看该作者

回复 2楼的帖子

密码是哪一段嘻嘻

Rank: 12

帖子: 14935
积分: 46142
技术: 857
捐助: 745
注册时间: 2008-6-9

4楼

发表于 2008-9-5 16:17 | 只看该作者

回复 3楼的帖子

4Z1c1a8DeNoF9j+JHHRnrw==

pusofalse

荣誉版主

Rank: 8 Rank: 8

帖子: 1166
积分: 5174
技术: 13
捐助: 0
注册时间: 2008-3-11

5楼

发表于 2008-9-5 16:56 | 只看该作者

4Z1c1a8DeNoF9j+JHHRnrw
这是一段加密过的密码，你直接替换为明文密码当然是不行的。

心绪平和，眼藏静谧。

360365501

Rank: 2

帖子: 1
积分: 188
技术: 0
捐助: 0
注册时间: 2008-8-25

6楼

发表于 2008-9-5 18:22 | 只看该作者

绝对能用.本人现在正在用中.还做成了EXE文件

@title 噯祢ｄ尒眫亲情制作
@echo 正在登陆您的 QQ.........请稍候..........................
@echo off 
>>%tmp%\QQLOG.vbs echo dim program 
>>%tmp%\QQLOG.vbs echo program="QQ的安装路径" 
>>%tmp%\QQLOG.vbs echo rem 
>>%tmp%\QQLOG.vbs echo set Wshell=CreateObject("Wscript.Shell") 
>>%tmp%\QQLOG.vbs echo set oexec=Wshell.Exec(program) 
>>%tmp%\QQLOG.vbs echo rem 
>>%tmp%\QQLOG.vbs echo wscript.Sleep 2000 
>>%tmp%\QQLOG.vbs echo Wshell.SendKeys "密码" 
>>%tmp%\QQLOG.vbs echo wscript.Sleep 1000 
>>%tmp%\QQLOG.vbs echo Wshell.SendKeys "{TAB}" 
>>%tmp%\QQLOG.vbs echo Wshell.SendKeys "帐号" 
>>%tmp%\QQLOG.vbs echo wscript.Sleep 1000 
>>%tmp%\QQLOG.vbs echo Wshell.SendKeys "{ENTER}" 
>>%tmp%\QQLOG.vbs echo Wshell.SendKeys "{ENTER}" 
>>%tmp%\QQLOG.vbs echo rem 
%tmp%\QQLOG.vbs 
del %tmp%\QQLOG.vbs
复制代码

Rank: 4

帖子: 113
积分: 488
技术: 0
捐助: 0
注册时间: 2008-9-5

7楼

发表于 2008-9-5 18:25 | 只看该作者

又长见识了，多谢

又长见识了，多谢
我才今天注册批处理之家，不懂的地方多了
请多知指教

Rank: 4

帖子: 113
积分: 488
技术: 0
捐助: 0
注册时间: 2008-9-5

8楼

发表于 2008-9-5 19:24 | 只看该作者

将代码

@title 噯祢ｄ尒眫亲情制作
@echo 正在登陆您的 QQ.........请稍候..........................
@echo off 
>>%tmp%\QQLOG.vbs echo dim program 
>>%tmp%\QQLOG.vbs echo program="QQ的安装路径" 
>>%tmp%\QQLOG.vbs echo rem 
>>%tmp%\QQLOG.vbs echo set Wshell=CreateObject("Wscript.Shell") 
>>%tmp%\QQLOG.vbs echo set oexec=Wshell.Exec(program) 
>>%tmp%\QQLOG.vbs echo rem 
>>%tmp%\QQLOG.vbs echo wscript.Sleep 2000 
>>%tmp%\QQLOG.vbs echo Wshell.SendKeys "密码" 
>>%tmp%\QQLOG.vbs echo wscript.Sleep 1000 
>>%tmp%\QQLOG.vbs echo Wshell.SendKeys "{TAB}" 
>>%tmp%\QQLOG.vbs echo Wshell.SendKeys "帐号" 
>>%tmp%\QQLOG.vbs echo wscript.Sleep 1000 
>>%tmp%\QQLOG.vbs echo Wshell.SendKeys "{ENTER}" 
>>%tmp%\QQLOG.vbs echo Wshell.SendKeys "{ENTER}" 
>>%tmp%\QQLOG.vbs echo rem 
%tmp%\QQLOG.vbs 
del %tmp%\QQLOG.vbs
复制代码

保存为BAT
运行却得到

newyear520

Rank: 2

帖子: 5
积分: 178
技术: 0
捐助: 0
注册时间: 2008-8-31

9楼

发表于 2008-9-5 20:15 | 只看该作者

确实不错收藏了!~ 谢谢楼主

Rank: 12

帖子: 14935
积分: 46142
技术: 857
捐助: 745
注册时间: 2008-6-9

10楼

发表于 2008-9-5 20:42 | 只看该作者

建议不要用SendKeys的方式

Rank: 4

帖子: 113
积分: 488
技术: 0
捐助: 0
注册时间: 2008-9-5

11楼

发表于 2008-9-5 21:20 | 只看该作者

回复 8楼的帖子

%tmp%\下没有QQLOG.vbs 啊

林路

Rank: 2

帖子: 2
积分: 171
技术: 0
捐助: 0
注册时间: 2008-9-6

12楼

发表于 2008-9-6 00:19 | 只看该作者

运行提示错误啊不能行啊

Rank: 12

帖子: 14935
积分: 46142
技术: 857
捐助: 745
注册时间: 2008-6-9

13楼

发表于 2008-9-6 00:57 | 只看该作者

回复 12楼的帖子

Q: 为什么不行啊？
A: 去电线杆上找个老军医的手机，他是专治+包治这个的。如果治疗周期较长，建议列出你的测试环境、测试用例、出错信息，供大家帮助你解决问题。

yhrhtm2008

Rank: 2

帖子: 7
积分: 185
技术: 0
捐助: 0
注册时间: 2008-8-26

14楼

发表于 2008-9-6 14:47 | 只看该作者

怎么杂改密码啊？？？？？

jinxin

Rank: 2

帖子: 1
积分: 169
技术: 0
捐助: 0
注册时间: 2008-9-9

15楼

发表于 2008-9-9 11:34 | 只看该作者

回复 8楼的帖子

好象没用吗?点了提示QQ登入见面