欢迎您访问程序员文章站本站旨在为大家提供分享程序员计算机编程知识!
您现在的位置是: 首页  >  后端开发

判断ICQ是否在线的代码

程序员文章站 2022-05-13 08:50:09
...
//判断ICQ是否在线的代码 

 
function get_status($uin)
{ 
  $fp = fsockopen ("wwp.icq.com", 80, &$errno, &$errstr, 30); 
  if(!$fp)
  { 
    echo "$errstr ($errno)
"; 
  }
  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