当前位置: 首页 > 图文教程 > 网络编程 > PHP > 判断ICQ是否在线的代码

PHP
php预定义常量
ob_start(),ob_start(''ob_gzhandler'')使用
一个PHP模板,主要想体现一下思路
简单的过滤字符串中的HTML标记
介绍几个array库的新函数 php
用ADODB来让PHP操作ACCESS数据库的方法
ADODB的数据库封包程序库
Adodb的十个实例(清晰版)
PHP通过COM使用ADODB的简单例子
使用adodb lite解决问题
PHP获得用户使用的代理服务器ip即真实ip
adodb与adodb_lite之比较
smarty+adodb+部分自定义类的php开发模式
刚才在简化php的库,结果发现很多东西
PHP中通过ADO调用Access数据库的方法测试不通过
AJAX for PHP简单表数据查询实例
PHP文件上传实例详解!!!
PHP小技巧搜集,每个PHPer都来露一手
超强分页类2.0发布,支持自定义风格,默认4种显示模式
默默简单的写了一个模板引擎

PHP 中的 判断ICQ是否在线的代码


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 179 ::
收藏到网摘: n/a

  //判断ICQ是否在线的代码  

<?   
function get_status($uin)
{   
    $fp = fsockopen ("wwp.icq.com", 80, &$errno, &$errstr, 30);   
    if(!$fp)
    {   
        echo "$errstr ($errno)<br> ";   
    }
    else
    {
        fputs($fp, "GET /scripts/online.dll?icq=$uin&img=5 HTTP/1.0 ");   
        $do = 'yes';   
        while(!feof($fp))  
        {
            $line = fgets ($fp,128);
            $do = ($do == 'yes')?'yes':(eregi("^GIF89", $line))?'yes':'no';
            //echo $line;
             
            if($do == 'yes')
            {
                if(ereg("@", $line))
                {
                    return 'online';   
                }
                elseif(ereg("醱", $line))
                {   
                    return 'offline';   
                }
                elseif(ereg("S", $line))
                {
                    return 'disabled';   
                }
            }
             
        }
        fclose($fp);   
    }   
    return 'unknown!';   
}


$uin="72485936";  // sonymusic 的ICQ,呵呵。
echo get_status($uin);
// offline
?>   

//作者/来源:Alpha.Z