学VB一个月了,想做个QQ群登器,遇到问题了
用API,findwindow找到QQ登录框的主窗口句柄,和登录按钮的窗口句柄都不难,对于帐号,和密码的两个框是在一个框架中,所有句柄相同,
他们没有标题,只能通过类名查找,用编程助手小工具,可以看到他们的类名,不过findwindow总是返回0,应该是找不到
不知道怎么才能解决。
另其实我用的 API都是 现搜现用的,如果能解决了这个问题,还是有个怎么把帐号密码放上去的问题,
是用 API的postmessage函数吗,模拟按键用VB自己的sendKEYs语句,不知道按TAB切换应该怎么表示,我来这里没几天,希望大家帮帮忙~:) --------------------编程问答-------------------- up --------------------编程问答-------------------- QQ有保护.API没用.
sendkeys吧 --------------------编程问答-------------------- 最好用Postmessage函数,给你提供一个向指定控件发送字符串的函数:
'将一个字符串通过PostMessage传送出去
Public Sub subPostString(ByVal strP As String)
Dim intP As Integer
Dim intK As Integer
Dim lngAsc As Long
Dim lngP As Long
Dim strT As String
On Error GoTo errSub
For intP = 0 To Len(strP) - 1
strT = Mid(strP, intP + 1, 1)
If Asc(strT) <= 0 Then
lngAsc = AscW(StrConv(strT, 128))
If lngAsc < 0 Then
lngAsc = lngAsc + 65536 '2^16
End If
Else
lngAsc = Asc(strT)
End If
lngP = PostMessage(lngHandle, WM_CHAR, lngAsc, 0)
Next intP
Exit Sub
errSub:
End Sub
lngHandle:指定控件的句柄
WM_CHAR:API常量 --------------------编程问答-------------------- 发现两个相同的控件,类名一样,可以重复调用句柄,就能得到两个不同的句柄 --------------------编程问答-------------------- lz自学能力挺强呀,才学一个月就敢做这个 --------------------编程问答-------------------- 我见过的多半都是类似qq.exe /uin12345678 加密的密码 的命令行,现在不能用了? --------------------编程问答--------------------
同意 --------------------编程问答-------------------- LZ
多半是东抄西抄的拼凑代码吧...
qq2009用sendkey
qq2008可以用命令行 --------------------编程问答--------------------
2009版里面失效了。 --------------------编程问答-------------------- 可见LZ的编程功底很强 --------------------编程问答-------------------- QQ已经做了很多工作了,好像最新版QQ已经没有可用的登陆器了。 --------------------编程问答-------------------- 楼主,是人才啊 --------------------编程问答-------------------- 我见过的多半都是类似qq.exe /uin12345678 加密的密码 的命令行,现在不能用了? --------------------编程问答-------------------- QQ2009的窗体句柄不能直接获取。 --------------------编程问答-------------------- 哈哈..我也正在想做..每次手动开若干QQ太麻烦了
我之前是用autoit做的脚本..自动启动QQ并且在号码框控件直接输入号码..但是密码没法输入..
现在想用vb做一个..能自动输入号码和密码的..
我现在是用System.Diagnostics.Process.Start来启动N个QQ,
postmessage这个应该可以对控件直接进行输入吧?
补充:VB , API