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

ASP
无限级分类
ASP漏洞全接触-高级篇
ASP漏洞全接触-入门篇
调试ASP脚本
ASP编程经典例子
ASP技术访问WEB数据库
ASP中巧用Response属性
用ISAPIfilter使INC、ASA文件安全
浅析COM的思想及原理(1)
浅析COM的思想及原理(2)
浅析COM的思想及原理(3)
比较ADO与ODBC的区别
asp提供在线文章翻译的功能
关于文摘插件提交表单的开发
Access通用-自动替换数据库中的字符串
复选框用法
1小时ASP入门
显示目录下所有的文件(含文件夹)
[漏洞]利用Activer server explorer可对文件进行读写访问
给你的FSO对象加把锁

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


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-08-14   浏览: 195 ::
收藏到网摘: 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>