.net MSXML2.ServerXMLHTTP.6.0发送请求-与服务器的连接异常终止-win7

我在ERP系统中有一些代码，通过.Net包装器调用RESTAPI。 它是一个JSON API。 我的代码没有意义直接发布，因为它在ERP系统中。 但是下面的代码有点像这样

奇怪的是，它在我们的测试/开发站点上工作。它在Win10 PC上的客户站点上工作。但在Win7 PC上不工作。这会产生错误： 与服务器的连接被异常终止 错误代码：0x80020009

它试图禁用PC上的所有防火墙，但没有结果。去哪里看

代码： Dim objXmlHttpMain作为变型 Dim strJSONToSend作为变型

strJSONToSend = "{""Type"":""Push"", ""Push"":{""type"": ""messaging_extension_reply"", ""conversation_iden"": ""<MobileNumber>"", ""message"":""Test""}}"


Set objXmlHttpMain = CreateObject("MSXML2.ServerXMLHTTP.6.0")

objXmlHttpMain.Open "POST", "https://api.pushbullet.com/v2/ephemerals", False

objXmlHttpMain.setRequestHeader "Access-Token", strAccessToken
objXmlHttpMain.setRequestHeader "Content-Type", "application/json"
objXmlHttpMain.setProxy 2, strProxy
objXmlHttpMain.setProxyCredentials strUser, strPass

objXmlHttpMain.Send strJSONToSend

Debug.Print objXmlHttpMain.responseText

strJSONToSend=“{”类型“：”推送“，”推送“：{”类型“：”消息传递“，”扩展“，”回复“，”会话“：”，“消息“：”测试“}”
设置objXmlHttpMain=CreateObject（“MSXML2.ServerXMLHTTP.6.0”）
objXmlHttpMain.Open“POST”https://api.pushbullet.com/v2/ephemerals”“错
objXmlHttpMain.setRequestHeader“访问令牌”，strAccessToken
objXmlHttpMain.setRequestHeader“内容类型”、“应用程序/json”
objXmlHttpMain.setProxy 2，strProxy
objXmlHttpMain.setProxyCredentials strUser，strPass
objXmlHttpMain.发送strJSONToSend
Debug.Print objXmlHttpMain.responseText

您必须查看电线的另一端。如果你不能从公司得到很好的支持，那就把他们甩了。汉斯，在我看来，错误一定是在我这边。它在不同的PC上的不同站点上工作。在客户网站上，它不能在一台特定的PC上工作。