Leggere contenuto txt in un server remoto

[FreeSoul]

Ho la necessità di leggere un file di testo che è fisicamente su di un altro server web.
In pratica, leggendo questo file posso sapere se il server web è on-line. Diversamente posso deviare il visitatore su una pagina di avviso off-line.

Come posso fare?

[burruchaga]

url = "http://www.domionoesterno.it/file.txt" 

Set xmlhttp = Server.CreateObject("MSXML2.ServerXMLHTTP")
   xmlhttp.Open "GET", url, False 
   xmlhttp.Send
   
   'quì recupero il contenuto testuale 
   pagetxt = CStr(xmlhttp.ResponseText)
   
   'quì controllo lo stato della pagina
   pagestatus = xmlhttp.Status 
Set xmlhttp = Nothing 

'se lo stato della richiesta è = 200 allora la pagina è disponibile
If CInt(pagestatus) = 200 Then

   pagetxt = Replace(pagetxt,vbCrLf,"
")
   Response.write pagetxt 

Else 
   Response.write "Si è verificato il seguente errore: " & pagestatus

End If

[FreeSoul]

grazie

[FreeSoul]

Mi d errore:

msxml3.dll error '80072ee7'
The server name or address could not be resolved

Il server esterno è uno spazio free.
Cè qualche altra soluzione?

[FreeSoul]