精彩:用Asp實現QQ在線查詢功能

這段程序的方法是利用XMLHTTP來讀取騰訊網站的相應HTML代碼獲取QQ的頭像，根據這個想法，我們還可以抓取很多其他網站的信息，如天氣預報、新聞等等。
＜script language="JavaScript"＞  
　　＜!--  
7 E0 ?: |( f2 a5 F: i0 e5 i0 w　　function getFaceImg（QQcode）  
, V3 M# X- M+ n　　{  
# u4 ?; T; Q: r* P9 i0 K/ y3 _　　var Re=new RegExp（"^[1-9]{1}\d+$","g"）;  
7 f: ], t# a) j4 h4 g  G  F" `* N# l　　if （!QQcode　　!Re.test（QQcode）） return;  
) _6 ]$ A7 W3 h. R# E5 y0 d　　var URL="http://search.tencent.com/cgi-bin/friend/oicq_find?oicq_no="+QQcode;  
1 v  b6 A4 L  N( Z7 S　　var http=new ActiveXObject（"Microsoft.XMLHTTP"）;  
　　http.open（"GET",URL,false,"",""）;  
  g- T' S6 o  ]# ?- [　　http.setRequestHeader（"CONTENT-TYPE","text/html; Charset=gb2312"）;  
, H: @1 d5 J& K: i0 p( @' O　　http.send（）;  
　　  
　　if （http.status!=200） return;  
4 R9 e& v0 a0 Q7 B* M/ C8 n6 w% [　　  
0 E+ j, |/ Z5 t, ?4 X$ W　　var webStr=http.responseText;  
　　Re=new RegExp（""（http://img.tencent.com/face/[^"]+）"","ig"）;  
　　if （Re.test（webStr））  
0 M% P) e$ e6 S4 z8 P9 F, ^　　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＞";  
. F+ v9 j0 U) l# U, q& N
　　http=null;  
, }7 o( a* s( k% d& l! Y　　}  
" K! g2 f. u  l. z6 h$ S
　　document.write（"我的QQ狀態："+getFaceImg（"44723461"））;  
　　//--＞  
$ q8 L* L: [1 M/ U+ Z* E( b　　＜/script＞