Dim hc As New HttpClient("http://zjslbzhjg.dcyun.com:48092/patrol/api/Patrol/GetProjectPatrolInfo?projectType=")
hc.Headers.Add("beginDate","2019-11-02")
hc.Headers.Add("endDate","2019-11-03")
hc.Headers.Add("tokenName","gxtb")
hc.Headers.Add("tokenPwd","gxtb1234")
Dim jo As JObject = Jobject.Parse(hc.GetData)
If jo("status") = "0" Then
' MessageBox.Show("成功")
MessageBox.Show(jo("message"))
End If
对接不上,求大神帮忙 附接口文档