WinHttpRequest "Senden" arbeitet an Office 2007 Produkten aber nicht 2013

Question

Ich habe einen Code geschrieben, der Text von unserem Server abruft und diesen Text in ein Word-Dokument schreibt.

Wir sind dabei, von 2007 bis 2013 unsere Office-Suite ein Upgrade, aber ich Probleme haben, wenn in Word 2013

Ich habe es verengt auf die http.send Linie meine zuvor funktionierenden Code zu testen, Das scheint nichts zu senden. Wenn ich den Code auf 2007 Suite starte, bekomme ich eine kleine Wartezeit und dann springt es zum http_OnResponseFinished() Sub, aber in der 2013 Suite tritt es nicht dieses Sub ein.

Die URL ist die richtige und sie sieht gleich aus/gibt die gleichen Daten zwischen den Suiten 2007 und 2013 zurück.

Public Sub Download(Url As String, Optional Async As Boolean = True) 

    Debug.Print "About to download text from url '" & Url & "'." 

    http.Open "GET", Url, True 'http must be opened before it can send the request 

    http.SetRequestHeader "Content-type", "application/json" 

    http.Send 'Sends the request 

' If Wait Then 
'  http.WaitForResponse 
' End If 
End Sub 
Private Sub http_OnResponseFinished() 

    Dim Response As String 

    Response = http.ResponseText 

    WriteTextToWord Response 

    Finished = True 

    Debug.Print "Completed downloading and inserting text, icons and links." 

    If err <> 0 Then 
     Call writeToLog(err.Description) 
    End If 
End Sub 

Answer 1

Ich habe das Problem gefunden.

Ich benutzte einen Proxy-Server weiter oben im Code, der das http-Objekt aus irgendeinem Grund nicht mit Servern verbinden konnte.

Durch das Entfernen des Proxy habe ich das Problem behoben und da die Verwendung dieses Programms nur intern ist, denke ich, dass nicht die Verwendung eines Proxy wird okey sein.