CSDN博客

img jackal3

ASP程序中显示QQ是否在线的代码

发表于2004/6/24 20:19:00  1115人阅读

分类: ASP

ASP程序中显示QQ是否在线的代码
作者:风云 (2004年01月14日 11点42分02秒)
来源:http://8f6.com
<script runat=server language=javascript>
qq=Request.querystring("qq")+"";
if(qq=="undefined"){Response.redirect("http://www.lybbs.net/lybbs/avatars/144.gif");}else{
function http(url){
zfy=new ActiveXObject("Microsoft.XMLHTTP");
with(zfy){open("GET",url,false,"","");
send();
source=ResponseText;
return source;}
zfy=null;}
x=http("http://search.tencent.com/cgi-bin/friend/user_show_info?ln="+qq);
x=x.replace(//n/g,"");
x=x.replace(/(.*)face(.*)gif/g,"$2");
x=x.replace(/gif(.*)/g,"");
x="http://img.tencent.com/face"+x+"gif";
Response.redirect(x);}
</script>
保存为ASP文件即可。

补充说明:
==================================================================
x=x.replace(//n/g,"");  //因为不支持换行,所以把所有换行符都刪掉。
x=x.replace(/(.*)face(.*)gif/g,"$2");  //由于该页面,所有代码就出现过一次face,所以我们可以把face以前的代码全部删掉。
x=x.replace(/gif(.*)/g,"");  //然后删掉gif后面的所有代码,得出了face和gif中间的“/l/49-1.”这样的一段字符。
==================================================================

0 0

相关博文

我的热门文章

img
取 消
img