Asp.net 读取并获取远程json的项值

如何使用vb从asp.net（4.5）中的远程json输出项目“total_sales”或totals.orders

然后使用：

---

我相信这就是你要找的。使用JSON字符串，我检索总销售额

首先添加参考：

Imports System.Web.HttpContext
Imports System.Runtime.Serialization.Json

接下来获取远程JSON，我将假设响应是您提供的字符串。我们使用HttpWebRequest获取远程JSON

    Dim req As HttpWebRequest = WebRequest.Create("www.SomeURL.com/?Parameter=somevalue")
    Dim resp As HttpWebResponse = req.GetResponse()

    Dim enc As Encoding = System.Text.Encoding.GetEncoding(1252)
    Dim loResponseStream As StreamReader = New StreamReader(resp.GetResponseStream(), enc)
    Dim Response As String = loResponseStream.ReadToEnd()
    Dim jss As JavaScriptSerializer = New JavaScriptSerializer()
    Dim dict As Object = jss.Deserialize(Of Dictionary(Of String, Object))(Response)
    Dim KeyValue As String = (dict("sales")("total_sales"))
    loResponseStream.Close()

R/

---

普雷斯科特…

url是“yourJsonString”吗？假设一定有流技术。yourJsonString包含json，请找到如何从url下载它

Imports System.Web.HttpContext
Imports System.Runtime.Serialization.Json

    Dim req As HttpWebRequest = WebRequest.Create("www.SomeURL.com/?Parameter=somevalue")
    Dim resp As HttpWebResponse = req.GetResponse()

    Dim enc As Encoding = System.Text.Encoding.GetEncoding(1252)
    Dim loResponseStream As StreamReader = New StreamReader(resp.GetResponseStream(), enc)
    Dim Response As String = loResponseStream.ReadToEnd()
    Dim jss As JavaScriptSerializer = New JavaScriptSerializer()
    Dim dict As Object = jss.Deserialize(Of Dictionary(Of String, Object))(Response)
    Dim KeyValue As String = (dict("sales")("total_sales"))
    loResponseStream.Close()