weixin_42788537
weixin_42788537
2019-01-23 00:05

vb.net 使用 HttpWebRequest 下载json的问题,谢谢

  • 小程序
  • microsoft
  • visual studio

大家好,不好意思,有个问题想请教大家下。
我想模仿安卓app,实时获取网站的json数据。
代码如下,现在能正常取得数据。
但是 速度有点慢,假设用浏览器浏览这个json,基本可以秒开,
但是用这个程序下,可能要个 卡住几秒钟。
所以我想问下大家,是不是有更快的方法?
另外 实时更新功能,我是用timer来实现的,有没有更好的方法 ?
我用的是vs2017,.net frame 4.0,vb业余爱好
谢谢大家的意见!

Imports System.Net
Imports System.IO
Public Class Form1
    Sub Getjson2()
        Dim URL2 As String = "http://192.168.1.2:9090/v2/api/flights/15"
        Dim Request As HttpWebRequest = WebRequest.Create(URL2)
        Dim responseFromServer As String
        Dim response As HttpWebResponse
        With Request
            .Headers.Add("Cookie", "SERVERID=B")
            .Headers.Add("Token", "test")
            .KeepAlive = True
            .Headers.Add("Accept-Encoding", "gzip")
            .UserAgent = "okhttp/3.4.1"
            response = CType(Request.GetResponse(), HttpWebResponse)
            Dim dataStream As Stream = response.GetResponseStream
            Dim reader2 As New StreamReader(dataStream)
            responseFromServer = reader2.ReadToEnd()
            Dim jsontext As String = responseFromServer
            reader2.Close()
            dataStream.Close()
            response.Close()
        End With
    End Sub
End Class
  • 点赞
  • 回答
  • 收藏
  • 复制链接分享

1条回答

为你推荐