2013-06-12 21 views
7

Ho un'API per la mia applicazione che mi consente di effettuare richieste CURL. Ho bisogno di implementarlo in VBA in modo che il mio database desktop possa avviare richieste CURL alla mia app web.CURL equivalente in VBA?

curl -i --user [email protected]:password -X PUT -d "test=testing" https://mywebsite.com/api 

Come posso implementarlo in Access VBA? Posso usare WinHttp.WinHttpRequest.5.1? Qualche esempio? Grazie Adam,

risposta

15

Risolto, ragazzi, funziona bene. Per comodità di altri popoli.

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) 
+3

Qual è il significato dell'opzione (4)? La [documentazione WinHttpRequest] (http://msdn.microsoft.com/en-us/library/windows/desktop/aa384106 (v = vs.85) .aspx) non specifica. – StockB

+2

So che sono 3 anni fa, ma mi sono anche chiesto cosa sia questa Opzione (4) e ho trovato alcune informazioni utili sotto questo link http://johankanngard.net/2005/11/11/winhttprequest-com-object -options-costanti / – rodedo