各位老师好!我在一个接口,对方要求:
我写得的代码如下:
Dim apiName As String = "TEST_SCM_CMS_querySitesService" 'api应用程序编程接口名称
Dim version As String = "1.0.0" '版本
Dim ak As String = "Z9SDJaqGJ9G/dobrE/N/MUDzuxA=" 'accessKey访问密钥
Dim sk As String = "bea1e13851cb4b5d95a42f059ed6ddbf" ' secret Key 密钥
Dim hc As New HttpClient("http://10.72.231.22:8086/lis/querysites") '如果需要传递请求参数 可以拼接到请求URL中
hc.Headers.Add("apiName", apiName)
hc.Headers.Add("version", version)
hc.Headers.Add("ak", ak)
hc.Headers.Add("sk", sk)
hc.C '业务数据封装成json格式包含在POST请求的请求体中
hc.Method = "post" '设置调用方式, 必须为 post
Dim jo As New JObject
jo("orderNo") = "TO20220926000004"
jo("pageNo") = 1
jo("pageSize") = 2000
hc.Content = jo.tostring
Output.Show(jo.ToString)
Dim ret As String = hc.GetData '接收反馈数据
Output.Show(ret)
执行结果提示:
.NET Framework 版本:4.0.30319.42000 Foxtable 版本:2022.8.18.1 错误所在事件: 详细错误信息: 远程服务器返回错误: (500) 内部服务器错误。
请老师帮忙看看问题出在哪儿?感激不尽!
[此贴子已经被作者于2022/10/17 15:48:15编辑过]