推薦：怎樣做到一個網站空間多個域名訪問一個網站空間，但是卻可以實現多個域名的訪問的一段ASP代碼： 以下為引用的內容：%if Request.ServerVariables(SERVER_NAME)=&q
平時每逢alexa排名更新時，我都需要將所有相關的同類網站的排名整理一下，看一下這些對手網站的排名更新情況。做的多了，也就煩了，雖然也才30多個網站，但一個個看下來也有點累。因此，想能不能用程序來讀取他的排名數據。
以前記得在什麼網址大全的網站上，一個網站名稱後面還有這個網站的世界排名，相信肯定是用程序讀取的，不然要是一個個查非累死不可。但是瀏覽遍了alexa的網站，也沒有找到能夠直接得到排名數據的方法。雖然它提供了一些代碼，如：，但是圖片的數字就沒辦法讀取到了。
後來想要不用xmlhttp讀它頁面，然後截取出那段數字？麻煩是麻煩點，也許可以一試。於是開始查看顯示排名的那兩頁，
| 以下為引用的內容： http://www.alexa.com/data/details/@url=www.itlearner.com 和http://www.alexa.com/data/details/traffic_details@q=！ amp；url=www.itlearner.com，查看源文件，搜索traffic rank for，搜到我網站的排名是這樣一段代碼：<ti><bbip><traffic><today>4</today></traffic></bbip></ti>5<tprp><pyp><page views rank：><pyp>，</pyp></page views rank：></pyp></tprp><today>7</today><page views per user：><[email protected]><today>6</today></[email protected]></page views per user：><[email protected]><traffic rank for>1</traffic rank for></[email protected]>，撲通，看得這段代碼都大了，再找了一下，看到在顯示traffic rank：today 1 wk. avg. 3 mos. avg. 3 mos. change那邊，前面today和1wk都是用上面那種形式表示的，而到了3 mos也就是最關鍵的數據那邊，確是直接用數字顯示的，太好了！ |
分析了一下前後的代碼，發現數據後面的</td><td class=bodybold align=center bgcolor=#ffffff><img這段代碼是唯一的，於是開始編程工作。
下面的源代碼示例，供大家參考：
| 以下為引用的內容： <% private function bytes2bstr（vin） dim i， thischrcode， nextchrcode strreturn = for i = 1 to lenb（vin） thischrcode = ascb（midb（vin， i， 1）） if thischrcode < ！ amp；h80 then strreturn = strreturn ！ amp； chr（thischrcode） else nextchrcode = ascb（midb（vin， i 1， 1）） strreturn = strreturn ！ amp； chr（clng（thischrcode） * ！amp；h100 cint（nextchrcode）） i = i 1 end if next bytes2bstr = strreturn end function function geturl（url） set retrieval = server.createobject（microsoft.xmlhttp） with retrieval。 open get， url， false， ， 。 send geturl = .responsetext geturl = bytes2bstr（。responsebody） end with set retrieval = nothing end function 以上是使用xmlhttp讀取頁面代碼的通用代碼 function getalexarank（url） on error resume next dim tempstr，trueurl，x，keystr trueurl = http://www.alexa.com/data/details/traffic_details@q=！ amp；url= ！ amp； url tempstr=geturl（trueurl） keystr = </td><td class=bodybold align=center bgcolor=#ffffff><img tempstr = split（tempstr，keystr）（0） x = instrrev（tempstr，>） 1 tempstr = mid（tempstr，x） if err then getalexarank=err.description err.clear else getalexarank=tempstr end if end function |
以上是讀取alexa網站頁面，對代碼進行分析然後得到排名的數據
| 以下為引用的內容： dim url url=www.itlearner.com 要查詢的網址，不要加http:// response.write（getalexarank2（url）） 輸出排名數據 %> |
嘿嘿，以後公司的相關網站排名，就不用再一個一個去查了，只需要把那些網站依此放在程序裡，就可以讓程序一個一個的讀出來了。
分享：怎樣隱藏圖片的真實地址一般情況下，網站的圖片代碼是這樣的。 以下為引用的內容： img src=./attachments/test.jpg />