同步MSXML2.XMLHTTP生成＆＃34;完成此操作所需的数据尚不可用。＆＃34;

Question

在VBScript中，实例化了：

On Error Resume Next
Set xmlhttp = CreateObject("MSXML2.ServerXMLHTTP")

我正在做一系列同步HTTP PUT：

xmlhttp.open "PUT", TheURL, False
xmlhttp.setRequestHeader "Content-type","application/json"
xmlhttp.setRequestHeader "Accept","application/json"
xmlhttp.send TheXML
If xmlhttp.readyState <> 4 Then
    xmlhttp.waitForResponse 1
End If
If xmlhttp.status >= 300 Then
    WScript.Echo "Failure: " & TheURL & "<BR>" & TheXML
End If

在几次检查错误后发现：

  

-2147483638：尚未提供完成此操作所需的数据。

鉴于我已经使用同步调用完成了这些调用，这怎么可能？如何避免此错误？