Foxtable(狐表)用户栏目专家坐堂 → 按照图片所示我的请求是不是缺少什么?


  共有3152人关注过本帖树形打印复制链接

主题:按照图片所示我的请求是不是缺少什么?

帅哥哟,离线,有人找我吗?
speedIM
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:7 积分:136 威望:0 精华:0 注册:2020/4/5 10:03:00
  发帖心情 Post By:2020/4/11 12:45:00 [显示全部帖子]

Dim result As String
Try
    Dim web As New System.Net.WebClient()
    web.Proxy = Nothing
    web.Headers.Add("Content-Type", "application/json")
    Dim body As New Newtonsoft.Json.Linq.JObject
    body("username") = "xxx"
    body("password") = "xxx"
    result = web.UploadString("xxx", body.ToString())
Catch ex As System.Net.WebException
    Dim stream As System.IO.Stream = ex.Response.GetResponseStream()
    Dim reader As New System.IO.StreamReader(stream)
    result = reader.ReadToEnd()
End Try
[此贴子已经被作者于2020/4/11 12:45:03编辑过]

 回到顶部