Sacado de
http://xstandard.com/en/documentation/xhttp/ This example shows how to check the status of a Web siteAn HTTP response code
number 200 means the Web server sends data back OK.
Código ASP:
Ver originalDim objHTTPSet
objHTTP = Server.CreateObject("XStandard.HTTP")
objHTTP.AddRequestHeader "User-Agent", "Mozilla/4.0 (compatible; MyApp 1.0; Windows NT 5.1)"
objHTTP.Get "http://xstandard.com"
If objHTTP.ResponseCode = 200 Then
Response.Write "Web site is up and running!"
Else
Response.Write "Web site is down!!!"
End If
Set objHTTP = Nothing