2013-06-12 107 views
7

我有我的應用程序的API,允許我向它發出cURL請求。 我需要在VBA中實現此功能,以便我的桌面數據庫可以向我的Web應用程序發出CURL請求。VBA中的等效cURL?

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

我該如何在Access VBA中實現?我可以使用WinHttp.WinHttpRequest.5.1嗎? 任何的例子嗎? 謝謝 亞當,

回答

15

解決了它現在的傢伙,效果很好。 爲了其他人的方便。

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

什麼是選項(4)的意義是什麼? [WinHttpRequest文檔](http://msdn.microsoft.com/en-us/library/windows/desktop/aa384106(v = vs.85).aspx)未指定。 – StockB

+2

我知道這是3年前,但我也想知道這個選項(4)是什麼在那裏,我發現這個鏈接下的一些有用的信息http://johankanngard.net/2005/11/11/winhttprequest-com-object -options常數/ – rodedo