电脑技术学习

判断ICQ是否在线的代码

dn001
//判断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;;;

标签: