Excel VBA API Post Request BODY

xvw2m8pv  于 2023-05-19  发布在  其他
关注(0)|答案(2)|浏览(100)

我试图从我的Excel VBA创建API请求,已经弄清楚了我的标题,现在我被请求正文部分卡住了。我的目标是让API请求体如下:

{
  "query":
    [
    {"name": "=John Doe"}
    ]
}

这是我目前掌握的情况:

Set json_dict = New Dictionary
json_dict("name") = "John Doe"
TempTxt = JsonConverter.ConvertToJson(json_dict)
MsgBox (TempTxt)

上面代码的结果是

{"name":"SVR-S0128"}
1mrurvl1

1mrurvl11#

使用VBA-JSON:

Dim json As Object
    
Set json = New Dictionary
json.Add "query", New Collection
json("query").Add New Dictionary
json("query")(1).Add "name", "John Doe"
    
Debug.Print JsonConverter.ConvertToJson(json, 2)
nle07wnf

nle07wnf2#

谢谢你的帮助!我还想出了这个代码:

Set json_query = New Dictionary
Set json_name = New Dictionary
json_name("name") = "John Doe"
json_query.Add "query", Array(json_name)
TempTxt = JsonConverter.ConvertToJson(json_query)

相关问题