判断ICQ是否在线的代码
程序员文章站
2022-05-19 16:30:59
...
//判断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
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