问题描述
我有一个要向GET请求中添加正文的问题。
- 在邮递员中,我可以轻松地将body raw json添加到“ Body”标签中
- 在R中,我使用
httr::GET
,但找不到添加它们的任何选项。我尝试使用选项query
,但返回错误500“缺少参数用户名”
这是我的代码(对假数据表示抱歉):
library(httr)
api <- ".........................../users/authorize"
query <- list("username": "xxxxx","password": "xxxxxxxxxxxx")
resp <- GET(api,query = query)
stop_for_status(resp)
# Error: Internal Server Error (HTTP 500).
content(resp,type = "text",encoding = "utf-8")
# [1] "{\"status\":\"0\",\"error_code\":\"S002\",\"errors\":\"Missing param [username].\"}"
有人可以帮助我处理此案吗?非常感谢。
解决方法
尝试一下:
resp <- httr::POST(body = query,encode = "json")