因?yàn)橐魳?lè)文件來(lái)自互聯(lián)網(wǎng)搜索，各種原因使得音樂(lè)文件經(jīng)常會(huì)掉鏈或者就成了死鏈，要解決這個(gè)問(wèn)題必須先知道哪些歌曲鏈接掉了。

檢測(cè)遠(yuǎn)端文件是否存在，使用XMLHTTP與遠(yuǎn)端文件交互返回的Status而做出決定

已經(jīng)完成功能的函數(shù)如下，此前請(qǐng)確保本地已經(jīng)安裝有 msxml3.dll

（在電腦上注冊(cè)這個(gè)文件，請(qǐng)點(diǎn)擊“開(kāi)始>運(yùn)行”然后輸入：regsvr32 msxml3.dll）

Function chku(murl) on error resume next Set xmlHttp = Server.CreateObject("Microsoft.XMLHTTP") xmlHttp.open "GET",murl,false xmlHttp.send     if xmlHttp.Status <> 200 then         chku=false     else         chku=true     end if End Function

自定義的函數(shù)chku()，通過(guò)XMLHTTP對(duì)象于相關(guān)文件（路徑）交互返回狀態(tài)值Status，通過(guò)該Status值做出判斷函數(shù)輸出。

完整的檢測(cè)代碼如下：

<% url=request.querystring("u") Function chku(murl) on error resume next Set xmlHttp = Server.CreateObject("Microsoft.XMLHTTP") xmlHttp.open "GET",murl,false xmlHttp.send     if xmlHttp.Status <> 200 then         chku=false     else         chku=true     end if End Function if chku(url) then     response.write(url&"(鏈接正常)") else     response.write(url&"(掉鏈、壞鏈、死鏈)") end if %>

• xml
• http
• asp