QQ自动登陆的问题(50分)

B

bjwdxs

Unregistered / Unconfirmed
GUEST, unregistred user!
各位给我看一下下面的程序:
这个小程序主要是用来实现QQ 自动登陆,可运行过程中出现这样的问题
1. 如果QQ 用户登陆 的窗口没有打开,则会运行QQ ,但是QQ的窗口弹出来之后,却不在往下执行,为什么?
2.如果QQ的登陆窗口已打开,则会往QQ号码框,和密码框里添数据,可运行的结果老提示我密码不对,不知错在哪?
参数说明:
QQinfo 中存的是QQ 的信息
QQinfo.QQpath 里是QQ程序的路径
QQinfo.QQ 里是QQ的QQ 号码
QQinfo.QQpass 里是QQ 密码
//----------------------------------------------------------------------------------------------------------
HWND qqhand;
qqhand = ::FindWindow(0,"QQ用户登录");
if(!qqhand) //如果QQ 没有打开,则启动他
{
ShellExecute(0,NULL,
QQinfo.QQpath.c_str(),
"","",SW_SHOW
);
qqhand = ::FindWindow(0,"QQ用户登录");
//为QQ弄一个句柄

}
HWND chand = GetDlgItem(qqhand,0x8a);
//获取QQ的号码框句柄
//HWND chand = FindWindowEx(qqhand,NULL,"ComboBox",NULL);
if(chand)
{

char* s= QQinfo.QQ.c_str();

SendMessage(chand,WM_SETTEXT,0,(LPARAM)(s));
//设置QQ号码

//获取qq密码框的句柄
HWND Hmmk = GetDlgItem(qqhand,0x0);
if(Hmmk)
{
char* QQpass = QQinfo.QQpass.c_str();

//发送密码
for(int i=0;
i<sizeof(QQPass);
i++)
{
::SendMessage(Hmmk,WM_CHAR,(WPARAM)(TCHAR(*QQpass++)),0);

}
//单击登陆
HWND HLoginButton = GetDlgItem(qqhand,0x3ea0);
SendMessage(HLoginButton,BM_CLICK,0,0);
}
}
 

Similar threads

S
回复
0
查看
1K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
926
SUNSTONE的Delphi笔记
S
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
顶部