谁用vb做过QQ自动登录，QQ.exe的参数是什么？

Question

Shell "e:\qq.exe"
后面带什么参数，我看有人说 START QQUIN:234423423(qq号)
我没有成功。和qq版本有关系吗

Answer 1

http://blog.sina.com.cn/s/blog_3ff6f9110100cgln.html

Answer 2

这就是一个调用qq.exe的调用语句，好像没有实用性吧

Answer 3

http://www.mndsoft.com/blog/article.asp?id=817
http://www.dssz.com/299540.html

Answer 4

我用这种方法了Shell "D:\QQ.exe"
SendKeys "3234234"
SendKeys "{tab}"
SendKeys "123456"
但是不知道shell qq 后
qq窗体桌面获得焦点
所以sendkeys qq号 也发送不到 qq号的文本框大家指点一下，怎么使窗体获得焦点啊

Answer 5

D:\Program Files\Tencent\qq\FinePlus.exe /START QQUIN:5458960 PWDHASH:tvdxzrz67Qs/ASS5knCNZw== /STAT:40

Answer 6

SendKeys "123456"和键盘输入的效果应该是一样的吧。

Answer 7

Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Const BM_CLICK = &HF5
Private handle As Long
Dim a1 As Long
Dim a2 As Long
Dim a3 As Long
Dim a4 As LongPrivate Sub Command1_Click()
 '改变窗口的内容
 handle = FindWindow("#32770", "QQ用户登录")
 '根据主窗口找出子窗口,就是我们想设置内容的窗口
 a1 = FindWindowEx(handle, 0, "ComboBox", vbNullString)
 a2 = FindWindowEx(handle, 0, "#32770", vbNullString)
 a3 = FindWindowEx(a2, 0, "Edit", vbNullString)
 a4 = FindWindowEx(handle, 0, "Button", "登录")
 If a3 <> 0 Then
 Text1.Text = a3
 End If
 SendMessage a1, WM_SETTEXT, 0, ByVal "15565456" '你的QQ号码
 SendMessage a3, WM_SETTEXT, 0, ByVal "123456" '你的密码
 SendMessage a4, BM_CLICK, 0, ByVal 0
End Sub这段代码用sendmessage 向登录窗体的QQ号文本框和密码文本框发送数据，然后再向登录框发送登录命令
qq号可以显示在文本框中，只是密码在密码框一闪就不见了
提示没有密码无法登录。

Answer 8

QQ.exe /START QQUIN:QQ号码 PWDHASH:QQ密码 /STAT:40这里输入的QQ密码并不是直接输入你的QQ密码,QQ密码是要经过base64及md5加密的
比如你的密码如果是abcd1234则经过加密就是4Z1c1a8DeNoF9j+JHHRnrw==
最后面的参数40表示隐身登录 若改为41就是上线
具体完整的例子如下: start "" "D:\Program Files\Tencent\QQ.exe" /START QQUIN:xxxxxxx PWDHASH:4Z1c1a8DeNoF9j+JHHRnrw== /STAT:40
如果要一次性登录3个QQ,直接完整复制上面那句代码修改一下QQ号及密码即可.

Answer 9

start "" "D:\Program Files\Tencent\QQ.exe" /START QQUIN:xxxxxxx PWDHASH:4Z1c1a8DeNoF9j+JHHRnrw== /STAT:40 这段代码的来源？怎么来的呢，QQ本身的帮助文件貌似没有提及哦