将 JSON 响应转换为 gridview
沙希德
我需要在 Gridview 中显示来自 API 的以下 JSON 响应：
[
{
"count": 271,
"headings": [
"Application",
"Host",
"os_type",
"os_version",
"model",
"vendor",
"virtual"
],
"kind": "BSI",
"next": "NextROW",
"next_offset": 100,
"offset": 0,
"results": [
[
"Customer Documents Archive System",
"Microsoft Network LoadBalancer mainserver running on 10.75.0.99",
null,
null,
null,
null,
null
],
[
"Customer Documents Archive System Group",
"Microsoft Network LoadBalancer server1 running on 10.128.2.143",
null,
null,
null,
null,
null
],
[
"Customer Documents Archive System Group",
"Microsoft Network LoadBalancer server2 running on 10.21.5.100",
null,
null,
null,
null,
null
],
[
"KIOSK",
"EastServer",
null,
null,
null,
null,
null
],
[
"Hotline",
"EastServer",
null,
null,
null,
null,
null
],
[
"ProjectWise",
"NorthServer",
"Windows",
"Server 2012 R2",
"VMware Virtual Platform",
"VMware, Inc.",
true
],
[
"SMS System",
"CentralServer",
"Windows",
"Server 2016",
"VMware Virtual Platform",
"VMware, Inc.",
true
]
],
"results_id": "QnVzaW5lc3N"
}
]
我正在使用以下代码：
Dim steamreader As StreamReader = New StreamReader(stream)
Dim strdata As String = steamreader.ReadToEnd
Dim rs As List(Of Root) = JsonConvert.DeserializeObject(Of List(Of Root))(strdata)
GridView1.DataSource = rs
GridView1.DataBind()
Public Class Root
Public Property count As Integer
Public Property headings As List(Of String)
Public Property kind As String
Public Property [next] As String
Public Property next_offset As Integer
Public Property offset As Integer
Public Property results As List(Of List(Of Object))
Public Property results_id As String
End Class
网格视图 HTML：
<asp:GridView ID = "GridView1" runat = "server">
JSON 数据所需的输出：
上面的代码不起作用。任何人都可以指导我如何使用 JSON 响应中的“标题”作为 Gridview 列标题和“结果”中的相应数据作为列的行数据在 gridview 中显示来自 JSON 的数据？
安德鲁·莫顿
从数据的排列方式来看，您需要将每组结果的数据提取到 DataTable 中，并将这些数据表添加到 DataSet 中。
我使用了 Windows 窗体，但您应该能够轻松地将其调整为使用 ASP.NET GridView：
Imports System.IO
Imports Newtonsoft.Json
Public Class Form1
Public Class Root
Public Property count As Integer
Public Property headings As List(Of String)
Public Property kind As String
Public Property [next] As String
Public Property next_offset As Integer
Public Property offset As Integer
Public Property results As List(Of List(Of Object))
Public Property results_id As String
End Class
Sub ShowData(f As String)
Dim allResults As List(Of Root)
Using sr As StreamReader = New StreamReader(f)
Dim dataAsJson As String = sr.ReadToEnd()
allResults = JsonConvert.DeserializeObject(Of List(Of Root))(dataAsJson)
End Using
Dim ds As New DataSet()
For Each resultSet In allResults
Dim dt As New DataTable(resultSet.results_id)
For Each heading In resultSet.headings
dt.Columns.Add(New DataColumn With {.ColumnName = heading, .DataType = Type.GetType("System.String")})
Next
For i = 0 To resultSet.results.Count - 1
Dim nr = dt.NewRow()
For j = 0 To resultSet.results(i).Count - 1
Dim thisItem = resultSet.results(i).Item(j)
nr(j) = If(thisItem Is Nothing, "-", CStr(thisItem))
Next
dt.Rows.Add(nr)
Next
ds.Tables.Add(dt)
Next
DataGridView1.DataSource = ds.Tables(0)
End Sub
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim j = "C:\temp\SO68055446.json"
ShowData(j)
End Sub
End Class
本文收集自互联网，转载请注明来源。
如有侵权，请联系 [email protected] 删除。
编辑于
相关文章
TOP 榜单
- 1
蓝屏死机没有修复解决方案
- 2
计算数据帧中每行的NA
- 3
UITableView的项目向下滚动后更改颜色，然后快速备份
- 4
Node.js中未捕获的异常错误，发生调用
- 5
在 Python 2.7 中。如何从文件中读取特定文本并分配给变量
- 6
Linux的官方Adobe Flash存储库是否已过时？
- 7
验证REST API参数
- 8
ggplot：对齐多个分面图-所有大小不同的分面
- 9
Mac OS X更新后的GRUB 2问题
- 10
通过 Git 在运行 Jenkins 作业时获取 ClassNotFoundException
- 11
带有错误“ where”条件的查询如何返回结果？
- 12
用日期数据透视表和日期顺序查询
- 13
VB.net将2条特定行导出到DataGridView
- 14
如何从视图一次更新多行（ASP.NET - Core）
- 15
Java Eclipse中的错误13，如何解决？
- 16
尝试反复更改屏幕上按钮的位置 - kotlin android studio
- 17
离子动态工具栏背景色
- 18
应用发明者仅从列表中选择一个随机项一次
- 19
当我尝试下载 StanfordNLP en 模型时，出现错误
- 20
python中的boto3文件上传
- 21
在同一Pushwoosh应用程序上Pushwoosh多个捆绑ID
我来说两句