当前位置: 首页 > 图文教程 > 网络编程 > ASP > 实用篇:用asp实现QQ在线查询

ASP
ASP实现不存在的网页就自动发送邮件
多个绑定多域名的ASP代码
ASP导出Excel数据的四种方法
用控件的方式解决问题-在客户端关联WEB控件引用
用ASP建立一个简单的聊天室
用Asp隐藏文件路径,实现防盗链
ASP实例:即时显示当前页面浏览人数
网页视频播放器程序代码通用代码
Cookies 欺骗漏洞的防范(vbs+js 实现)
ASP应用程序设计的Web状态管理分析
ASP中Session技巧
ASP教程:透彻掌握ASP分页技术
ASP获取字符串长度的自定义函数
通过实例讲解来学习ASP中的函数
ASP实例代码:长文章分页代码设置方法
深入理解ASP中FSO的神奇功能
用ASP代码得到客户端IP和当前地址
服务端 VBScript 与 JScript 几个相同特性的写法
JS+DIV模拟SELECT表单域
插入ASP代码让网站数据库成为ASP木马

ASP 中的 实用篇:用asp实现QQ在线查询


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

  用下面的代码即可实现与QQ网站一样的QQ网友在线查询的方式。

  <script language="JavaScript">

    <!--

     function getFaceImg(QQcode)

     {
   var Re=new RegExp("^[1-9]{1}\\d+$","g");

     if (!QQcode  !Re.test(QQcode)) return;

     var URL="http://search.tencent.com/cgi-bin/friend/oicq_find?oicq_no="+QQcode;

     var http=new ActiveXObject("Microsoft.XMLHTTP");

     http.open("GET",URL,false,"","");

     http.setRequestHeader("CONTENT-TYPE","text/html; Charset=gb2312");

     http.send();

     if (http.status!=200) return;  

   var webStr=http.responseText;

   Re=new RegExp("\"(http://img.tencent.com/face/[^\"]+)\"","ig");

   if (Re.test(webStr))

   return "<a href=\"http://search.tencent.com/cgi-bin/friend/user_show_info?ln="+QQcode+"\" target=_blank title=\"QQ:"+QQcode+"\"><img src=\""+RegExp.$1+"\" width=16 height=16 border=0></a>";  

   http=null;

   } 

   document.write("我的QQ状态:"+getFaceImg("44723461"));

  //-->

  </script>