Access is denied

Hej alle

Jeg har følgende script:

<%
function TearPage (strTearUrl)
   
    response.write "<br>****** " & strTearUrl & " *********<br>"

    set http_obj=createObject("Microsoft.XMLHTTP")
    call http_obj.Open("GET",strTearUrl,false)   
    call http_obj.Send()
       
    if http_obj.status = "200" and http_obj.statusText = "OK" then
        TearPage = trim(http_obj.responseText)
    else
        TearPage = ""
    end if

end function
%>

Desværre giver den fejl ved nogle af de hjemmesider, som er med i min chat-ring. Hvorfor eller rettere hvordan undgåes det at den går ned. Hvis en side siger "access denied" skal den bare returnere TearPage = "" og gå videre.

Output:

****** http://www.xxxxxxxxxx.dk/chat/gateway.asp?channelID=1&foreignChannelID=9&test=true *********

msxml3.dll error '80070005'

Access is denied.

/common/inc_tearPage.asp, line 9