繁體中文当前位置: 首页 > 图文教程 > 网络编程 > PHP > 判断ICQ是否在线的代码
- PHP
- php3:跨平台的服务器端嵌入式脚本语言
- 关于Zend Optimizer
- 用PHP3实现文件上载
- IIS环境下安装PHP5手记
- 在Windows2000ADV下配置Apache+PHP5+MySql5
- Winodws下IIS/Apache+PHP+MySQL的安装配置
- PHP 在Windows 2003 Enterprise Server 、IIS6.0 下的安装
- 在WIN平台上让你的 Apache 2.0.45 支持 PHP
- 从实例开始
- 能得到你是从什么页面过来的，referer的用处
- 在PHP5中使用DOM控制XML
- 旧题新貌:PHP截取中文字符串的问题
- GraPHPite--PHP图像库新秀
- 编译php的配置参数
- PHP程序与服务器端通讯方法小结
- PHP程序与服务器端通讯的方法
- 用php或js获取图片大小,高宽尺寸.
- 有关在Windows下配置PHP+Apache+Optimizer失败的问题解决方案
- LAMPJT最适用的web开发系统详细配置
- 实现一个基于Ajax的调查程序
PHP 中的 判断ICQ是否在线的代码
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 54 ::
收藏到网摘: n/a
<?
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
评论 (0) All
