Äquivalent cURL in VBA?

Ich habe eine API für meine Anwendung, die ermöglicht es mir zu machen cURL-Anfragen zu.
Ich brauche, um dies zu implementieren, in VBA so meine desktop-Datenbank können Feuer CURL-Anfragen zu meiner web-app.

curl -i --user admin@admin.com:password -X PUT -d "test=testing" https://mywebsite.com/api

Wie kann ich dies umsetzen in Access VBA? Kann ich mit WinHttp.WinHttpRequest.5.1 ?
Beispiele dafür?
Dank
Adam,

InformationsquelleAutor adam Kearsley | 2013-06-12
  1. 23

    Gelöst es nun Jungs, die gut funktioniert.
    Für andere Völker Bequemlichkeit.

    TargetURL = "https://www.mysite.co.uk/app/api/v1/test"
Set HTTPReq = CreateObject("WinHttp.WinHttpRequest.5.1")
HTTPReq.Option(4) = 13056 '
HTTPReq.Open "PUT", TargetURL, False
HTTPReq.SetCredentials "user", "password", 0
HTTPReq.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
HTTPReq.send ("test[status]=" & Forms!curl!Text0.Value & "&test2[status]=" & Text2.Value)
MsgBox (HTTPReq.responseText)
    • Was ist die Bedeutung der Option(4)? WinHttpRequest-Dokumentation nicht angeben.
    • Ich weiß, es ist 3 Jahre her, aber ich fragte mich auch, was diese Option(4) ist es vorne und fand ich einige nützliche Informationen unter diesem link johankanngard.net/2005/11/11/...
    • Nach der WH-Option docs, die 4 ist die enumeration value "WinHttpRequestOption_SslErrorIgnoreflags". Wenn Sie konvertieren die 13056 zu hex, erhalten Sie 0x3300, die, wenn Sie schauen Sie weiter unten auf der SslErrorIgnoreFlags Beschreibung, können Sie sehen, dass diese ignoriert alle Fehler.
    InformationsquelleAutor adam Kearsley
Schreibe einen Kommentar