检测一个网址是否能打开可以利用XMLHTTP来实现,青岛星网下面给出个范例代码参考。
function urlchk(surl)
on error resume next
set xmlhttp = server.createobject("microsoft.xmlhttp")
xmlhttp.open "get",surl,false
xmlhttp.send
if xmlhttp.status <> 200 then
urlchk=false
else
urlchk=true
end if
end function
surl=http://www.qdxw.net
if urlchk(surl) then
response.write(surl&"(可以正常访问!)")
else
response.write(surl&"(页面打开错误!)")
end if