ASP利用XMLHTTP检测网址URL是否可访问

idcbe.com

ASP利用XMLHTTP检测网址URL是否可访问,网址是否有效,网站是否在线。检测目标网址是否有效。

我借鉴了网上的一个例子:http://topic.csdn.net/t/20020712/00/868049.html

修改之后,做成函数方式,就变成自己的,如下:

<%Function GetUrlStatus(url)
  set obj = createObject("Microsoft.XMLHTTP") 
  On  Error Resume Next 
  obj.Open "get",url,FALSE 
  obj.Send 
  if Err.Number <> 0 then 
    GetUrlStatus= Err.Description'False
  else 
    if obj.Status = 200 then 
    GetUrlStatus= "OK"'True
    else   
    GetUrlStatus= "Maybe  down,   returned   status:"   &   obj.Status'False
    end   if 
  end if 
  set obj = nothing 
End Function%>

函数引用:<%=GetUrlStatus("http://edwin.jkqun.com/blog/default.asp")%>



[本日志由 edwin 于 2010-04-10 03:42 PM 编辑]
文章来自: 本站原创
引用通告: 查看所有引用 | 我要引用此文章
Tags: ASP XMLHTTP 网址 URL 网站在线
评论: 0 | 引用: 0 | 查看次数: 4774
发表评论
昵 称:
密 码: 游客发言不需要密码.
内 容:
验证码: 验证码
选 项:
虽然发表评论不用注册,但是为了保护您的发言权,建议您注册帐号.
字数限制 50 字 | UBB代码 关闭 | [img]标签 关闭
idcbe.com