VBA MSXML2.XMLHTTP60运行时错误'424'

Question

我正在尝试从VBA调用休息服务

在模块中......

Sub banana()
  Dim c as Class1
  Set c = New Class1
  c.JiraAccess
End Sub

在名为Class1

的类模块中

Sub JiraAccess()
  Dim b as MSXML2.XMLHTTP60
  Set b = New MSXML2.XMLHTTP60
  With b
    .Open "POST", "url", False
  End With
End Sub

如果排除对.Open的调用，代码运行但显然什么也没做。我已经包含了对Microsoft XML，v6（来自Tools-Reference）

的引用

包含.Open调用会导致标题出现424错误。

认为dll可能没有注册，我这样做是为了以防万一......

regsvr32 msxml6.dll

并获得一个弹出窗口，说注册成功。

我重新启动了Excel但得到了相同的运行时错误。

不确定这里去哪里。我在W7上。

非常感谢您的任何帮助。