XML http

Hejsa, Jeg er relativt grøn i XML og jeg forsøger at lave et XML kald her, men jeg kan ikke få det til at funke.

Jeg har lavet en form, textbox og knap

Jeg forstår ikke hvorfor den ikke vil hente siden ned, den returnerer bare en unspecified error, når objHttp.Open  bliver kaldt. Jeg har set på dokumentationen, og det er de rigtige parametre jeg sætter ind...

Please help!

min kode:

Dim objHttp As Object
\'-------------------------------------------------------------------------
\'  Form Event Handlers
\'-------------------------------------------------------------------------
Private Sub Form_Load()
    \'create the DOM document
    Set objHttp = CreateObject(\"Microsoft.XMLHTTP\")
End Sub

Sub GetThisPage(strURL)

  \'set the parameters and get the page
  \'On Error Resume Next    \'turn off default error handler
  Dim varStatus As String, strStatus As String, strText As String
 
 
  varStatus = \"\"          \'initialize return strings
  strStatusText = \"\"
  objHttp.Open \"GET\", strURL, False, Null, Null
  objHttp.Send            \'send the request to the server
 
 
  \'collect the results
  varStatus = objHttp.Status
\' strStatusText = objHttp.statusText
  strText = objHttp.responseText


End Sub

Private Sub Fetch_page_Click()
GetThisPage (\"www.altavista.com\")
End Sub