以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]VB.net 代码是否能用?怎么用  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=189900)

--  作者:fczhaobo
--  发布时间:2024/1/3 19:06:00
--  [求助]VB.net 代码是否能用?怎么用
Private Sub SurroundingSub()
    Dim client = New RestClient("/tool/open_api/api/goods/cat-detail?id=<id>")
    client.Timeout = -1
    Dim request = New RestRequest(Method.[GET])
    request.AddHeader("X-Signature", "{{signature}}")
    request.AddHeader("X-Timestamps", "{{timestamps}}")
    request.AddHeader("X-Nonce", "{{nonce}}")
    request.AddHeader("X-Apikey", "{{api_key}}")
    client.UserAgent = "Apifox/1.0.0 (https://apifox.com)"
    Dim response As IRestResponse = client.Execute(request)
    Console.WriteLine(response.Content)
End Sub
[此贴子已经被作者于2024/1/3 19:06:38编辑过]

--  作者:fczhaobo
--  发布时间:2024/1/4 14:07:00
--  
请老师帮忙
--  作者:有点蓝
--  发布时间:2024/1/4 14:12:00
--  
补齐命名空间,放到全局代码

public Sub SurroundingSub()
    Dim client = New xxx命名空间.RestClient("/tool/open_api/api/goods/cat-detail?id=<id>")
    client.Timeout = -1
    Dim request = New xxx命名空间.RestRequest(xxx命名空间.Method.[GET])
    request.AddHeader("X-Signature", "{{signature}}")
    request.AddHeader("X-Timestamps", "{{timestamps}}")
    request.AddHeader("X-Nonce", "{{nonce}}")
    request.AddHeader("X-Apikey", "{{api_key}}")
    client.UserAgent = "Apifox/1.0.0 (https://apifox.com)"
    Dim response As xxx命名空间.IRestResponse = client.Execute(request)
    output.show(response.Content)
End Sub

按钮事件直接调用即可
SurroundingSub()

--  作者:fczhaobo
--  发布时间:2024/1/4 21:21:00
--  
老师,补齐命名空间,能详细的说一下吗?
--  作者:有点蓝
--  发布时间:2024/1/4 21:33:00
--  
如果不懂什么是命名空间,网上搜搜。

至于1楼使用的什么命名空间,到抄代码的地方找。代码从哪来的去问那里