Error from VB excel macro code - msxml3.dll -2146697211 The system cannot locate the resource specified

问题

I am using an MSXML.HTTPRequest object in a VB macro (excel) to communicate with an HTTP server. The problem is that it throws the following error intermittently.

msxml3.dll -2146697211 The system cannot locate the resource specified.

I noticed on my system that this happened when the network was down, but my client has complained of it happening intermittently on his machine. Given that his system has Windows 7 installed and it is working at times, I don't think it is an issue of the correct library not being installed. He has tried it on a few networks, but it still fails.

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

It's working perfectly on my box, which is a Windows 7 + Microsoft Office 2007 installation.

I have searched a lot online, and two reasons have been vaguely mentioned.

1. Network issues due to proxy or firewall. In this case it should never connect, not intermittently.
2. Library installation issue. Again, it shouldn't work at all but that's not the case.

回答1:

For now I was able to solve this by changing the method from GET to POST. The error was intermittent but fortunately it started showing up on my dev machine once, and changing the HTTP method to POST did the trick. It's very odd that should happen though, but it worked.

回答2:

I am also getting this sometimes in my server. Once I restart the server, it starts working fine and again intermittently fails. Again I had to restart. The error messages are random and intermittent.

回答3:

FWIW, I got the same error. As it (eventually) turned out, there were errors in the XML file. Silly me, I would have thought Microsoft would have provided a more meaningful error message. If you get this error, try using one of the many XML check programs available.

回答4:

Use MSXML v6.0, MSXML v3.0 is no longer distributed with Office or Windows. v6.0 is only distributed with Windows 7. But office 2010+ no longer comes with any version of MSXML any more. This explains the reasons for your issue.

It's also described in Wikipedia: http://en.wikipedia.org/wiki/MSXML

来源：https://stackoverflow.com/questions/11726661/error-from-vb-excel-macro-code-msxml3-dll-2146697211-the-system-cannot-locate