找回密码
 加入
搜索
楼主: 绿色风

[原创] QQ在线状态批量检测 [好久没发东西玩的了]【UDF现在奉上】

 火... [复制链接]
发表于 2012-8-29 09:42:36 | 显示全部楼层
是否能探测隐身状态
发表于 2012-8-29 09:51:05 | 显示全部楼层
嘻嘻。。看看。。学习下
 楼主| 发表于 2012-8-29 09:51:09 | 显示全部楼层
回复 13# 747957181
回复 17# A3fan
回复 16# airen007

这个结口只有两种状态,在线与不在线. 反馈的是: 0  与  1
发表于 2012-8-29 11:29:55 | 显示全部楼层
是显示自己已经登陆的qq号?
发表于 2012-8-29 15:57:35 | 显示全部楼层
试试怎么样哈哈
发表于 2012-8-29 18:41:52 | 显示全部楼层
下来 see see 。。。。。。
发表于 2012-8-30 08:30:23 | 显示全部楼层
什么好东西?
发表于 2012-8-30 08:37:14 | 显示全部楼层
能检测隐身就好了.
发表于 2012-8-30 12:48:03 | 显示全部楼层
感谢分享~~~~~~
发表于 2012-8-30 12:58:21 | 显示全部楼层
我也写过这个软件..不过看界面就发现我的界面上的功夫差远了..
 楼主| 发表于 2012-8-30 16:07:03 | 显示全部楼层
回复 26# suiyefeng


    http://www.autoitx.com/forum.php ... 2915&highlight=    界面用的这个模板
发表于 2012-8-30 16:41:42 | 显示全部楼层
看看是什么原理
发表于 2012-8-30 17:06:11 | 显示全部楼层
回复 15# 楼上风云


    回复 9# 魔导


    回复 1# 绿色风


    这就是QQ在线状态检测的原理。

        ;~原理是调用QQ的在线API,然后通过返回的数据长度来判断。 http://wpa.qq.com/pa?p=1:348251229:41
        Local $host="wpa.qq.com"
        Local $qqnumber=InputBox("QQ号","请输入你要检测的QQ号","14958306",'',200,80)

        $sData='GET /pa?p=1:'&$qqnumber&':41 HTTP/1.1'&@crlf&'Accept: */*'&@crlf&'Host: wpa.qq.com'&@crlf&@crlf                ;这是要发送的数据
        TCPStartup()                ;启动TCP
    $sIp = TCPNameToIP($host)        ;将域名转为IP
    $sSocket = TCPConnect ($sIp, 80)        ;打开80端口
    TCPSend ($sSocket, $sData)        ;发送http头
    Do        
        $sRecvHeader = TCPRecv($sSocket, 1)
    Until $sRecvHeader <> ""        ;接收数据,指导数据不为空
    Do   ;头部结束后,有2个换行符
        $sRecvHeader &= TCPRecv($sSocket, 1)
    Until StringInStr($sRecvHeader, @Crlf & @Crlf)  ;接收返回头

        $sRecvBin = TCPRecv($sSocket,2048) ;接收返回数据
        If StringLen($sRecvBin)=2506 Then        ;如果返回数据长度是2506  则认为不在线
                MsgBox(64,"提示","你检测的帐号"&$qqnumber&"不在线!")
        Else                        ;否则认为在线。
                MsgBox(64,"提示","你检测的帐号"&$qqnumber&"在线!")
        EndIf
        TCPCloseSocket($sSocket)
        TCPShutdown()
        

评分

参与人数 2金钱 +40 贡献 +7 收起 理由
tryhi + 30 + 5
绿色风 + 10 + 2 不错,不过公开的太早的了。

查看全部评分

发表于 2012-8-30 17:07:51 | 显示全部楼层
明白啦 谢谢回复 29# lanfengc
发表于 2012-8-30 17:26:54 | 显示全部楼层
回复 1# 绿色风


    风哥真是风一样的男子

评分

参与人数 1金钱 +20 收起 理由
绿色风 + 20 hehe...

查看全部评分

您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-11-22 00:19 , Processed in 0.095587 second(s), 16 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表