Foxtable(狐表)用户栏目专家坐堂 → 怎么样写post参数


  共有2825人关注过本帖树形打印复制链接

主题:怎么样写post参数

帅哥哟,离线,有人找我吗?
aidimeng
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:802 积分:7702 威望:0 精华:0 注册:2015/9/14 14:26:00
怎么样写post参数  发帖心情 Post By:2021/1/27 9:55:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20210127095336.png
图片点击可在新窗口打开查看

 

怎么样写 post的 参数呢

https://api.weixin.qq.com/cgi-bin/token?grant_type=client_credential&appid={0}&secret={1}"

 

类似这样吗? }&secret={1}"

 

参数太多了啊

[此贴子已经被作者于2021/1/27 10:04:34编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/1/27 10:13:00 [只看该作者]


 回到顶部
帅哥哟,离线,有人找我吗?
aidimeng
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:802 积分:7702 威望:0 精华:0 注册:2015/9/14 14:26:00
  发帖心情 Post By:2021/1/27 11:21:00 [只看该作者]

Dim serverIP As String=  "http://192.168.1.150"
Dim serverPort As String = "9000"
Dim apitoken As String="2D8F329162225EA3FDA69CC2C3B2BED15B932E8B306C703BE6F87DC9E30FC7AA"
 Dim url As String = serverIP & ":" & serverPort &"/api/person/add?access_token={"& apitoken &"}"

Dim hc As New HttpClient(url)
hc.C
Dim jo As New JObject
jo("PIN") = "TS001"
'自行添加其它json数据
hc.Content = jo.ToString
Dim ret As String = hc.GetData()
MessageBox.Show(ret)

 

远程服务器返回错误: (405) 不允许的方法。


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/1/27 11:29:00 [只看该作者]

去掉网址里的大括号

 回到顶部
帅哥哟,离线,有人找我吗?
aidimeng
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:802 积分:7702 威望:0 精华:0 注册:2015/9/14 14:26:00
  发帖心情 Post By:2021/1/27 12:17:00 [只看该作者]

可以了

 
{"code":0,"message":"success","data":null}
 


 回到顶部
帅哥哟,离线,有人找我吗?
aidimeng
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:802 积分:7702 威望:0 精华:0 注册:2015/9/14 14:26:00
  发帖心情 Post By:2021/1/27 13:23:00 [只看该作者]

 
 请求网址:http://192.168.1.150:9000/api/reader/accList?pageNo=1&pageSize=10

请求方式 get

是不是可以这样写啊
Dim hc As New HttpClient(url)
hc.C
 
'Dim hc As new HttpClient(ul)
            Dim jo As JObject = JObject.Parse(hc.GetData)
If jo("id") IsNot Nothing Then
MessageBox.Show(jo("name"))
End If


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/1/27 13:45:00 [只看该作者]

get就是拼url,这句代码去掉:hc.C

先百度post、get理解学习一下
[此贴子已经被作者于2021/1/27 13:45:33编辑过]

 回到顶部