【已解决】怎么获取QQ2012的号码

yinbinly · 发表于 2012-7-7 14:31:15

本帖最后由 yinbinly 于 2012-7-10 11:53 编辑

怎么获取号码10000？用FileRead无法获取到啊？

ooxxgod · 发表于 2012-7-7 15:16:54

楼主想干什么>?

xx44t10 · 发表于 2012-7-7 17:26:47

查ＱＱ目录啊。下的user文件夹下的

dmqhcx88 · 发表于 2012-7-7 17:42:13

好像需要读取QQ内存的具体物理地址吧

T_小六 · 发表于 2012-7-8 03:55:21

怎么在帐号那里输入帐号，我用autoit info侦侧不到帐号那表对话框

xlj310 · 发表于 2012-7-8 07:53:12

回复 5# T_小六

QQ2012那个号码框做了处理了。不过可以通过设置焦点然后输入号码来解决

xlj310 · 发表于 2012-7-8 07:56:01

回复 6# xlj310

我能想到的只能这样，用controlsend貌似不行哦~　
而且不能blockinput(1)


ControlFocus("Edit","","Edit1")
Sleep(300)
Send("+{Tab}")
Sleep(500)
Send("你的QQ号码")
Sleep(50)
Send("{Tab}")
Sleep(200)
Send("你的Qq密码")

yinbinly · 发表于 2012-7-8 11:08:18

回复 7# xlj310

谢谢我不是输入账号是读取账号

xlj310 · 发表于 2012-7-8 11:20:07

回复 8# yinbinly

抱歉，理解错了。
　　不过我的想法依然简单，你可以参考一下，请看代码：


Run("E:\Program Files\Tencent\QQ\Bin\QQ.exe")
WinWait("QQ2012")
WinActivate("QQ2012")
Sleep(350)
ControlFocus("Edit","","Edit1")
Sleep(300)
Send("+{Tab}")
$temp=ClipGet()
Send("^c")
MsgBox(0,"QQ号码",ClipGet())
If $temp<>'' Then ClipPut($temp)

49666684 · 发表于 2012-7-8 14:30:04

貌似可以获取。。

49666684 · 发表于 2012-7-8 14:30:21

为达目的。不择手段，我喜欢~

haijie1223 · 发表于 2012-7-8 17:22:53

#include <WinAPIEx.au3>
Global $QQaddr = -1, $QQ

$QQPID = ProcessList('QQ.exe')

For $i = 1 To $QQPID[0][0]
        $QQ &= getQQ($QQPID[$i][1]) & @CRLF
Next

MsgBox(64, 'QQ', "本机已经登入的QQ号为:" & @CRLF & $QQ)

Func getQQ($pid)
        Local $QQNum
        Local $QQPath = _WinAPI_GetProcessFileName($pid)
        $QQPath = StringMid($QQPath, 1, StringInStr($QQPath, '\', 0, -2))
        If $QQaddr = -1 Then
                Local $addrs = _WinAPI_LoadLibraryEx($QQPath & "Bin\KernelUtil.dll", 1)
                $QQaddr = $addrs
                _WinAPI_FreeLibrary($addrs)
        EndIf
        Local $pHandle = _WinAPI_OpenProcess(0x1F0FFF, 0, $pid)
        If $pHandle Then
                Local $QQNumptr = DllStructCreate('long')
                ConsoleWrite(@error & @CRLF)
                Local $read
                For $i = 0 To 9
                        _WinAPI_ReadProcessMemory($pHandle, $QQaddr + 0x80598 + 4096 * $i, DllStructGetPtr($QQNumptr), 4, $read)
                        $QQNum = DllStructGetData($QQNumptr, 1)
                        If FileExists($QQPath & "Users\" & $QQNum) Then
                                ExitLoop
                        EndIf
                Next
                Return $QQNum
                _WinAPI_CloseHandle($pHandle)
        EndIf
        Return -1
EndFunc   ;==>getQQ

zldfsz · 发表于 2012-7-8 19:15:46

回复 12# haijie1223

登了两个QQ，可是不正确啊

happytc · 发表于 2012-7-8 21:39:50

本帖最后由 happytc 于 2012-7-8 21:41 编辑

回复 13# zldfsz

最新版的QQ，腾讯早就处理了上面的代码，所以都会给个一样的号来骗人。不过这个QQ号不错呀
查了下，居然真有这个QQ号：

hzxymkb · 发表于 2012-7-8 23:28:49

回复 13# zldfsz

大师。我这里正常哦！会不会是你那里放着A片受影响呢？

		自动登录	找回密码
密码			加入

[AU3基础] 【已解决】怎么获取QQ2012的号码

本帖子中包含更多资源

相关帖子

评分

评分

本帖子中包含更多资源

本帖子中包含更多资源