如何使用VBA向REST Web服务发送json文件和参数_Json_Excel_Vba_Web Services_Rest

如何使用VBA向REST Web服务发送json文件和参数

json excel vba web-services rest

如何使用VBA向REST Web服务发送json文件和参数,json,excel,vba,web-services,rest,Json,Excel,Vba,Web Services,Rest,我想使用Excel/VBA向REST Web服务发布一个json文件和几个参数。我设法发送了json文件，但我不知道如何包含其他参数。有办法做到这一点吗我使用的VBA代码如下所示：正如您在注释掉的行中看到的，我尝试将参数作为RequestHeader发送，但这也不起作用我还负责WebService，以便在那里更改REST接口。使用Java，我希望使用@QueryParam（“id”）或类似工具读取参数我不想在json“文件”中包含该参数，因为它的结构与我正在使用的实体匹配。看一看。也许你

我想使用Excel/VBA向REST Web服务发布一个json文件和几个参数。我设法发送了json文件，但我不知道如何包含其他参数。有办法做到这一点吗

我使用的VBA代码如下所示：

正如您在注释掉的行中看到的，我尝试将参数作为RequestHeader发送，但这也不起作用

我还负责WebService，以便在那里更改REST接口。使用Java，我希望使用@QueryParam（“id”）或类似工具读取参数

我不想在json“文件”中包含该参数，因为它的结构与我正在使用的实体匹配。

看一看。也许你应该在这个问题上使用

java

标记？看看。也许你应该在这个问题上使用

java

标记？

Dim URL As String, objHTTP As Object

Set objHTTP = CreateObject("WinHttp.WinHttpRequest.5.1")
URL = "http://localhost:8080/services/data/"
objHTTP.Open "POST", URL, False
objHTTP.SetRequestHeader "Content-type", "application/json"
objHTTP.SetRequestHeader "User-Agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)"
'objHTTP.SetRequestHeader "id", "1234"
objHTTP.Send json_table