Question

我需要知道如何从datatable代码中的JSON字符串填充vb.net。

JSON字符串

{"success":true,"message":"","result":[{"Paper1:null,"StateId":"57ee","School":"1A","Received":"2018-07-03T08:10:05.22","TimeS":"00","STAT":"98","ScoreCard":"76"},{"Paper1:null,"StateId":"52ef","School":"1A","Received":"2018-07-03T08:10:05.22","TimeS":"00","STAT":"88","ScoreCard":"57"}]}

我需要知道如何将上述字符串填充到datatable

上面的字符串在WebResponse中。那么，有什么方法可以读取webresponse（在这里我使用了streamreader或任何其他好的方法）并填充到数据表中？

我在字符串上方得到的代码。

        Dim rqst As WebRequest = WebRequest.Create(uri_variable)
        Dim res_p As WebResponse
        rqst.Method = "GET"
        rqst.Headers.Add("apisign:" & sign) 
        res_p = rqst.GetResponse() 
        Dim reader As New StreamReader(res_p.GetResponseStream())
        Dim JSON_String as string = reader

PS：编辑：我为用户“ CruleD”提供了一个屏幕截图

https://i.stack.imgur.com/EYbP0.png

Answer 1

嘿，这又是

<ul>
    <li *ngFor="let project of projects">
        <app-project [project]=project></app-project>
    </li>
</ul>

使用断点检查JSONC。您将看到它的外观，然后决定要使用它做什么。

Comparing files not working as intended 我在另一个线程中给出了类似的答案。

编辑：

Imports System.Web.Script.Serialization ' for reading of JSON (+add the reference to System.Web.Extensions library)
Dim JSONC = New JavaScriptSerializer().DeserializeObject(JSON_String)

首先获取“结果”的内容，然后选择所需的集合，在这种情况下，首先选择（so 0），然后再次搜索所需的键，例如“ Quantity”，就像最初对结果所做的一样。 / p>

还有其他方法可以执行相同的操作，但是这种方法应该很简单。反序列化有3种类型，请根据需要进行检查。

将数据从JSON字符串添加到数据表-vb.net

1 个答案: