以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 执行错误 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=173470) |
-- 作者:aidimeng -- 发布时间:2021/12/1 9:24:00 -- 执行错误 在学写某api开发时遇到如下问题 2、 代码 Dim str As Integer = 1 Dim ran As Integer = Rand.Next(200,3100) Dim r As Integer= str & ran Dim random = System.Web.Security.FormsAuthentication.HashPasswordForStoringInConfigFile(r, "MD5") Dim value As String="10.32.248.5" Dim url As String ="http://192.168.1.254:9999/v1/bindinfo/user-bindinfo?search={0}?random="& ran &"&md5="& random &"" \'Dim jo As new JObject \'jo("deviceIMEI") = deviceimei \'jo("authCode") = authCode \'jo("timestamp") = timestamp Dim hc As New HttpClient(CExp(url,value)) hc.C \'hc.Content = jo.ToString \'Dim ret As String = hc.GetData() \'Output.Show(ret) Dim jo As JObject = JObject.Parse(hc.GetData) MessageBox.Show("2") \'If jo("message") IsNot Nothing Then \'MessageBox.Show(jo("message")) \'End If \'\'If jo("date") IsNot Nothing Then output.show(jo.ToString()) 3、报错 |
-- 作者:有点蓝 -- 发布时间:2021/12/1 9:29:00 -- Dim ret As String = hc.GetData() msgbox(ret)看返回什么结果?
|
-- 作者:aidimeng -- 发布时间:2021/12/1 12:34:00 -- 返回空值 http://192.168.1.254:9999/v1/bindinfo/user-bindinfo?search=10.32.248.200?random=2121&md5=DE872154FFBF91A5DCC0E539DD2D5106 类似这样的请求地址
[此贴子已经被作者于2021/12/1 12:42:47编辑过]
|
-- 作者:有点蓝 -- 发布时间:2021/12/1 13:40:00 -- Dim url As String ="http://192.168.1.254:9999/v1/bindinfo/user-bindinfo?search={0}&random="& ran &"&md5="& random &"" |
-- 作者:aidimeng -- 发布时间:2021/12/1 13:54:00 -- 提示 远程服务器返回错误: (401) 未经授权。 search={0}&random="& 中间不用 ? 吗 我加上 就是空值
|
-- 作者:有点蓝 -- 发布时间:2021/12/1 13:58:00 -- 多个参数之间使用&连接。提示未经授权,就是传输的参数和授权加密不一致 |
-- 作者:aidimeng -- 发布时间:2021/12/1 14:11:00 -- 我的错,现在可以了,又一次理解了 传参的方法,地址中一个?就够了。谢谢 |