以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  执行错误  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=173470)

--  作者:aidimeng
--  发布时间:2021/12/1 9:24:00
--  执行错误
在学写某api开发时遇到如下问题
1、开发文档说明
图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20211201092047.png
图片点击可在新窗口打开查看
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、报错

图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20211201092250.png
图片点击可在新窗口打开查看
search的value值怎么使用啊

--  作者:有点蓝
--  发布时间: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
--  
我的错,现在可以了,又一次理解了 传参的方法,地址中一个?就够了。谢谢