idcbe.com
预览模式: 普通 | 列表

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

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%>

查看更多...

Tags: ASP XMLHTTP 网址 URL 网站在线

分类:日志文章 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 7157