问题描述
这是我的代码(对假数据表示抱歉):
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")