China DOS Union

-- Unite DOS · Advance DOS · Grow DOS --

Union site: www.cn-dos.net Forum site: www.cn-dos.net/forum
DOS stands for freedom, openness and progress. Let us work hard, learn from the openness and GNU spirit of FreeDOS and Linux, and together build and grow a free GNU GPL world!

中国DOS联盟论坛
The time now is 2026-06-25 06:49
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » [Help] Looking for a batch file that can automatically input QQ number and password View 10,420 Replies 45
Original Poster Posted 2007-04-19 12:04 ·  中国 福建 泉州 永春县 电信
初级用户
Credits 20
Posts 8
Joined 2007-04-19 11:33
19-year member
UID 85737
Gender Male
Status Offline
I open the computer every day and have to repeat one thing: open Thunder and QQ to hang up for upgrades.
Thunder is okay, it can log in automatically, but QQ has 2 accounts, which cannot be set to automatic login, so I have to enter the QQ number and password one by one, it's so annoying!
Please, great experts, help me out and write a batch file to get it done at once!
Floor 2 Posted 2007-04-19 12:12 ·  中国 广东 广州 番禺区 电信
银牌会员
★★★
Credits 1,206
Posts 517
Joined 2007-03-25 01:18
19-year member
UID 82819
Gender Male
Status Offline
Just download a software by yourself. QQ automatic login tool.
知,不觉多。不知,乃求知
Floor 3 Posted 2007-04-20 03:46 ·  中国 陕西 西安 电信
铂金会员
★★★★
Credits 5,212
Posts 2,478
Joined 2007-02-08 23:39
19-year member
UID 79003
Gender Male
Status Offline
Set both QQ accounts to auto-login^ However, before running, replace the AUTOLOGIN^ file related to auto-login, and then you can achieve multiple QQ startups^
Floor 4 Posted 2007-04-20 04:42 ·  中国 安徽 芜湖 电信
高级用户
★★★
Credits 866
Posts 415
Joined 2005-12-04 11:19
20-year member
UID 46459
Status Offline
Logging in multiple QQ accounts is very cumbersome, entering passwords one by one. It would be best if it could log in automatically. But does QQ login support parameters?
欢迎你到批处理爱好者联盟QQ群:18023953
Floor 5 Posted 2007-04-20 04:52 ·  中国 浙江 杭州 电信
银牌会员
★★★
Credits 2,000
Posts 621
Joined 2007-01-01 00:00
19-year member
UID 75212
Gender Male
Status Offline
A few lines of VBS code can do it, right?
Floor 6 Posted 2007-04-20 05:12 ·  中国 上海 浦东新区 电信
中级用户
★★
Credits 302
Posts 138
Joined 2007-03-29 02:33
19-year member
UID 83224
Gender Male
Status Offline
QQPath="path:\QQ.exe"
Set WshShell=WScript.CreateObject("WScript.Shell")
WshShell.Run QQPath
WScript.Sleep 2000
WshShell.SendKeys "+{TAB}"
WshShell.SendKeys "QQnumber"
WScript.Sleep 200
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "QQpassword"
WScript.Sleep 200
WshShell.SendKeys "{ENTER}"
Floor 7 Posted 2007-04-20 05:20 ·  中国 福建 泉州 永春县 电信
初级用户
Credits 20
Posts 8
Joined 2007-04-19 11:33
19-year member
UID 85737
Gender Male
Status Offline
Daredevil on floor 6:
  Ashamed! I can't understand it very well!
  Only saw 3 places: path, QQ number, password......
  Can you explain it in detail!
  Thanks!

[ Last edited by qieagle on 2007-4-19 at 04:21 PM ]
Floor 8 Posted 2007-04-20 06:15 ·  中国 上海 浦东新区 电信
中级用户
★★
Credits 302
Posts 138
Joined 2007-03-29 02:33
19-year member
UID 83224
Gender Male
Status Offline
This is a VBS script. After copying it to a text file, change the text file extension to VBS to use it.

QQPath="path:\QQ.exe"  Set QQ running path
Set WshShell=WScript.CreateObject("WScript.Shell")  
WshShell.Run QQPath Execute QQ
WScript.Sleep 2000 Delay time after program execution 2000ms=2s
WshShell.SendKeys "+{TAB}" "+" means shift {TAB} means Tab, shift+tab is to jump the input cursor upward to the user input column when QQ starts. If the input cursor is already in the username column when QQ starts, this step can be omitted
WshShell.SendKeys "QQnumber" Enter QQ username
WScript.Sleep 200
WshShell.SendKeys "{TAB}" Use tab to switch to QQ password column
WshShell.SendKeys "QQpassword" Enter QQ password
WScript.Sleep 200
WshShell.SendKeys "{ENTER}" {ENTER} means enter, and QQ will automatically log in successfully after pressing enter
Floor 9 Posted 2007-04-20 07:37 ·  中国 山东 淄博 联通
中级用户
★★
Credits 272
Posts 99
Joined 2006-06-02 09:12
20-year member
UID 56414
Status Offline
The QQ number input box does not have the TabStop property, so it cannot be positioned automatically. Pressing Tab multiple times or using Shift+Tab won't position the input to the number input box. At least it's not possible with QQ 2006 and 2007. Therefore, the SendKeys method is useless, which means the script on the sixth floor is not valid for any QQ number. But for the QQ number saved in the number box previously, that is, the number logged in last time, then just entering the password can be effective. But this not only exposes the password in plain text, but also once the QQ number is changed, this method will no longer be effective. However, there is a way to achieve automatic login. Tencent has an official login interface, and the QQ automatic login function is also based on this interface.

When QQ transmits the password, it first performs an MD5 encryption, and then a BASE64 transformation, so that normal text information can be obtained for network transmission. For a password in the form of "abcd", the encrypted and converted ciphertext that can be used for transmission is converted in the way of BASE64(MD5(abcd)). Calculating this expression, we can get the value 4vxxTEcn7pOV8yTNLn8zHw==. Then, using the command-line parameters supported by QQ.exe itself, automatic login can be realized. The form of the command line is as follows: QQPath\QQ.exe /START QQUIN:123456 PWDHASH: 4vxxTEcn7pOV8yTNLn8zHw== /STAT:40. Here, 40 means that the login status is invisible login, and 10 means online login. QQPath represents the installation path of QQ, which varies from machine to machine. 123456 represents the QQ number, and 4vxxTEcn7pOV8yTNLn8zHw== represents the encrypted and converted password "abcd". By replacing this format with real information, automatic login can be realized.

Therefore, as long as such a script is made, automatic login can be realized. Here I provide a script for verification, which is one of my QQ numbers. You can log in to have a look. Anyway, the password won't be leaked.

On Error Resume Next
Set Shilyx = CreateObject("WScript.Shell")
QQPath = Shilyx.RegRead("HKLM\SOFTWARE\Tencent\QQ\Install")
Shilyx.Run """" & QQPath & "\QQ.exe"" /START QQUIN:303501987 PWDHASH:WQbDAvPc/eA0ooWlBsq72g== /STAT:40"


Entering the following content directly in the system run will have the same effect:

%ComSpec% /c echo CreateObject("WScript.Shell").Run """" + CreateObject("WScript.Shell").RegRead("HKLM\SOFTWARE\Tencent\QQ\Install") + "\QQ.exe"" /START QQUIN:303501987 PWDHASH:WQbDAvPc/eA0ooWlBsq72g== /STAT:40">C:\_Q.vbs & WScript C:\_Q.vbs && del C:\_Q.vbs


This one can be guaranteed to be effective before May.
I have a program that generates such a script. I wonder if it can be uploaded?
Here is related introduction
http://hi.baidu.com/shilyx/blog/item/43a0b6a15212e08b471064c0.htm

[ Last edited by my3439955 on 2007-6-9 at 12:14 AM ]
Floor 10 Posted 2007-04-20 07:38 ·  中国 山东 淄博 联通
中级用户
★★
Credits 272
Posts 99
Joined 2006-06-02 09:12
20-year member
UID 56414
Status Offline
You can download this program at the following address

http://shilyxsite.googlepages.com/AutoLogin.exe

[ Last edited by my3439955 on 2007-4-22 at 11:30 AM ]
Floor 11 Posted 2007-04-20 07:42 ·  中国 河北 石家庄 联通
初级用户
Credits 27
Posts 13
Joined 2006-12-11 04:34
19-year member
UID 73157
Gender Male
Status Offline
The things upstairs are不错 - hurry up and upload them to take a look - thanks for sharing

[ Last edited by wangweihebtu on 2007-4-19 at 06:57 PM ]
Floor 12 Posted 2007-04-20 09:28 ·  中国 福建 泉州 永春县 电信
初级用户
Credits 20
Posts 8
Joined 2007-04-19 11:33
19-year member
UID 85737
Gender Male
Status Offline
Thanks to the friends from floor 6, floor 9, and floor 10!

I used them, all are good!
Floor 13 Posted 2007-04-20 09:37 ·  中国 甘肃 张掖 电信
金牌会员
★★★★
Credits 4,103
Posts 1,744
Joined 2006-01-20 13:00
20-year member
UID 49241
Gender Male
From 甘肃.临泽
Status Offline
It was discussed a long time ago. Why don't you all search?
Floor 14 Posted 2007-04-20 09:37 ·  中国 福建 泉州 永春县 电信
初级用户
Credits 20
Posts 8
Joined 2007-04-19 11:33
19-year member
UID 85737
Gender Male
Status Offline
I didn't expect that just one day after I posted my thread, I received support from so many friends. The key thing is that I got help from several experts. Thanks!
Floor 15 Posted 2007-04-20 10:23 ·  中国 广西 玉林 博白县 电信
金牌会员
★★★★
Credits 3,687
Posts 1,467
Joined 2005-08-08 12:00
20-year member
UID 44210
Status Offline
It has been discussed before. Just search and you'll find it. Is the forum's search function not working???
Forum Jump: