code example: Using ASP programming to realize QQ online situation inquiry

Programming | online

The method of this procedure is to use XMLHTTP to read the corresponding HTML code of Tencent website to get the head of QQ, according to this idea, we can also crawl many other website information, such as weather forecast, news and so on.

<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+ "" > </a>";

Http=null;
}

document.write ("My QQ Status:" +getfaceimg ("44723461"));
-->
</script>