UC知道用VB编写QQ自动登录器的问题！！！
来源：百度知道 编辑：UC知道 时间：2024/06/24 00:25:19
Private Sub Form_Load()
Dim myClassName As String * 250
Dim QQHwnd As Long
Dim QQNumberTxtBox As Long
Dim PasswordTxtBox As Long
QQHwnd = FindWindow(vbNullString, "QQ2009 Beta2")
QQNumberTxtBox = GetWindow(QQHwnd, GW_CHILD)
QQNumberTxtBox = GetWindow(QQNumberTxtBox, GW_HWNDNEXT)
Call GetClassName(QQNumberTxtBox, myClassName, 250)
Text1.Text = Text1.Text + myClassName
Call SendMessage(qqnubertxtbox, WM_SETTEXT, 1, "1")
End Sub
我向QQ窗口发送消息，为什么不能向文本框里面输入内容啊？我已经取得了文本框句柄，可是发送消息时就是不能输入，这是为什么呢
Dim myClassName As String * 250
Dim QQHwnd As Long
Dim QQNumberTxtBox As Long
Dim PasswordTxtBox As Long
QQHwnd = FindWindow(vbNullString, "QQ2009 Beta2")
QQNumberTxtBox = GetWindow(QQHwnd, GW_CHILD)
QQNumberTxtBox = GetWindow(QQNumberTxtBox, GW_HWNDNEXT)
Call GetClassName(QQNumberTxtBox, myClassName, 250)
Text1.Text = Text1.Text + myClassName
Call SendMessage(qqnubertxtbox, WM_SETTEXT, 1, "1")
End Sub
我向QQ窗口发送消息，为什么不能向文本框里面输入内容啊？我已经取得了文本框句柄，可是发送消息时就是不能输入，这是为什么呢
腾讯的QQ具有保护技术，包括不能HOOK，不能键盘拦截，不能修改内容 和 不能发送内容 等等。
QQ自动登录可以通过执行QQ命令行参数实现。需要传给QQ一个号码和QQ号码的Base64+MD5加密后的密码。
代码过长，不贴了。网上有VB写的QQ登录器。你可以参考它们的代码。
Google搜索“兔子QQ防盗登录器”（一般都是源代码）
可能是nProtect技术阻止你的自动输入吧
QQ的文本框做了特殊的处理。使用了特殊的密码保护技术。
是QQ的密码保护组件拦截了吧。。。