Function ExecuteIt() As MSXML2.DOMDocument    Dim xmlhttp As MSXML2.xmlhttp
    Dim servlet As String
    Dim xmlbuffer As MSXML2.DOMDocument
    
    Set xmlhttp = CreateObject("MSXML2.XMLHTTP.3.0")
    Set xmlbuffer = New MSXML2.DOMDocument
    
    servlet = getServletURL()    prepareXMLbuffer xmlbuffer
    XMLParseMatrices xmlbuffer
    XMLParseSingles xmlbuffer
        
    xmlhttp.Open "POST", servlet, False
xmlhttp.send xmlbufferThe error information showed “unspecified error”这个是什么原因?