測試網(wǎng)站某頁面是否可以訪問

2013/2/7 10:54:321464 閱讀

dz=trim(request("dz")) 
on error resume next 
Set xmlHttp = Server.CreateObject("Microsoft.XMLHTTP") 
xmlHttp.open "GET",dz,false 
xmlHttp.send 
if xmlHttp.Status <> 200 then 
response.write("西橋網(wǎng)絡(luò)提醒您：頁面打開錯誤！") 
else 
response.write("西橋網(wǎng)絡(luò)提醒您：網(wǎng)站可以正常訪問！") 
end if 


'注：測試地址必須帶http://
注：可以轉(zhuǎn)載，必須注明出處（http://www.qc944.com），謝謝合作

下一條：win2003內(nèi)置系統(tǒng)管理員賬號名稱修改方法

上一條：IE中Ctrl+回車（Enter），打開是習(xí)慣的.com