sUrl = "http://www.request.com/request.php"
set oHttp = Server.CreateObject("MSXML2.ServerXMLHTTP")
 '오류가 발생할경우 무시하고 다음 처리구문으로 이동함

on error resume next    

oHttp.Open "GET", sUrl, False
oHttp.Send ""
'지정한 경로의 서버상태값을 가지고 옵니다. (200, 404, 500 등)

status = oHttp.status

'오류가 있거나 (오류가 없을경우 err.number가 0 값을 돌림) status 값이 200 (로딩 성공) 이 아닐경우

if err.number <> 0 or status <> 200 then
      if status = 404 then

            Response.Write "존재하지 않는 페이지 입니다.(404)"

      elseif status >= 401 and status < 402 then

            Response.Write "접근이 금지된 페이지 입니다.(401)"

      elseif status >= 500 and status <= 600 then
            Response.Write "내부 서버 오류 입니다.(500)"

      else

            Response.Write "서버가 다운되었거나 올바른 경로가 아닙니다."

      end if

'오류가 없음 (문서를 성공적으로 로딩함)

else

      Response.Write oHttp.ResponseText

end if

Set oHttp = Nothing