Paket-Label für DHL erstellen
Lorenz
Gesendet: 29.09.16 17:10
Betreff: Paket-Label für DHL erstellen


Regular

Beiträge: 83
252525
Hallo in die Runde,

ich soll aus einer Accdb heraus Labels für DHL-Pakete erzeugen. DHL stellt eine API zur Verfügung, die wohl so ähnlich wie unten angesprochen werden kann (PW ist natürlich nicht echt), wenn der Verweis auf "MS-XML, v. 6.0" drin ist:

Sub SOAP_lesen()
Dim htpTest As MSXML2.XMLHTTP60 'Verweis "Microsoft XML, v6.0"

Set htpTest = New XMLHTTP60
htpTest.Open "POST", "https://cig.dhl.de/services/sandbox/soap", False, "hoelscher", "geheim"
htpTest.setRequestHeader "bcs_user", "2222222222_01"
htpTest.setRequestHeader "bcs_password", "pass"
htpTest.setRequestHeader "Content-Type", "text/xml"

htpTest.send
Debug.Print htpTest.responseText
End Sub


Ich bekomme aber immer eine 500er-Servermeldung zurück und habe jetzt keine Idee mehr, was ich noch ändern könnte. Hat eine/r von Euch zufällig schon mal so etwas gelöst und kann mir weiterhelfen?

Danke,
Lorenz
Top of the page Bottom of the page