Excel VBA超时错误-2147012894

我试图从Excel VBA（使用oauth2）使REST调用到SFDC，但每当我得到“Http1.send”行上的错误消息“错误：-2147012894 – 超时错误”。 下面的代码在另一台机器上工作正常。 这两台机器都有Excel 2007 Windows 7

代码：

Dim Http1 As Object Dim URL As String URL = "https://test.salesforce.com/services/data/v32.0/sobjects/opportunity/describe" On Error GoTo errorHandler Set Http1 = CreateObject("MSXML2.ServerXMLHTTP") Http1.Open "GET", URL, False Http1.setTimeouts 0, 0, 0, 0 Http1.setRequestHeader "Authorization", "Bearer " & GetSetting("SF", "Tokens", "AccessKey") 'accesstoken Http1.setRequestHeader "Content-Type", "application/json" Http1.send Set retrieveData = Http1 Set Http1 = Nothing Exit Function errorHandler: MsgBox "Error : " & Err.Number & " - " & Err.description 

请帮助，如果有人遇到这种types的错误。 非常感激。

谢谢