Ich verwende ein MSXML.HTTPRequest-Objekt in einem VB-Makro (Excel), um mit einem HTTP-Server zu kommunizieren. Das Problem ist, dass es den folgenden Fehler zeitweise auslöst.

msxml3.dll -2146697211 Das System kann die angegebene Ressource nicht finden.

Auf meinem System ist mir aufgefallen, dass dies passiert ist, als das Netzwerk ausgefallen ist, aber mein Client hat sich darüber beschwert, dass es zeitweise auf seinem Computer passiert. Angesichts der Tatsache, dass auf seinem System Windows 7 installiert ist und es zeitweise funktioniert, glaube ich nicht, dass die richtige Bibliothek nicht installiert wurde. Er hat es in einigen Netzwerken versucht, aber es schlägt immer noch fehl.

Function xmlHTTPPost(strURL, strData)
  Dim objHttp

  On Error Resume Next
  xmlHTTPPost = ""
  Set objHttp = CreateObject("Microsoft.XMLHTTP")
  If Err.Number <> 0 Then
      Err.Clear
      Set objHttp = CreateObject("MSXML2.XMLHTTP")
  End If
  If Err.Number <> 0 Then
      MsgBox "Error creating XMLHTTP object"
      Err.Clear
      Exit Function
  End If
  objHttp.Open "GET", strURL, False
  If Err.Number <> 0 Then
      Err.Clear
      Set objHttp = Nothing
      Exit Function
  End If
  objHttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
  objHttp.setRequestHeader "User-Agent", "Mozilla Compatible (MS IE 3.01 WinNT)"
  objHttp.Send
  If Err.Number <> 0 Then
      MsgBox "Error " & Hex(Err.number) & " sending to server:" & vbCrLf & Err.description
      xmlHTTPPost = "ERROR: " & Err.Source & " " & Err.Number & " " & Err.Description
      Err.Clear
  Else
      xmlHTTPPost = objHttp.responseText
  End If
  Set objHttp = Nothing
End Function

Es funktioniert perfekt auf meiner Box, die eine Windows 7 + Microsoft Office 2007-Installation ist.

Ich habe viel online gesucht und zwei Gründe wurden vage erwähnt.

Netzwerkprobleme aufgrund von Proxy oder Firewall. In diesem Fall sollte die Verbindung niemals und nicht zeitweise hergestellt werden.Problem bei der Installation der Bibliothek. Auch hier sollte es überhaupt nicht funktionieren, aber das ist nicht der Fall.

Ich würde mich sehr über jede Hilfe freuen.