2016-03-18 115 views
-1

我有在这里使用VB.NET反序列化JSON的一个大问题是JSON样本:反序列化JSON VB.NET

[{"id":"1","numerTel":"48123123123","pozostalo":"50","reffer":"","email":""},{"id":"2","numerTel":"48123123123","pozostalo":"10","reffer":"","email":""}] 

这是从MySQL由JSON SELECT *查询,我的VB应用程序被连接到PHP脚本谁返回数据与json数组。我如何反序列化这个并使用每一行,我想解析每一行。 这是我的实际代码在VB:

Dim jsonResponse As String = "[{""id"":""1"",""numerTel"":""48123123123"",""pozostalo"":""50"",""reffer"":"""",""email"":""""},{""id"":""2"",""numerTel"":""48123123123"",""pozostalo"":""10"",""reffer"":"""",""email"":""""}]" 
     Dim aba As MyC = JsonHelper.JsonDeserialize(Of MyC)(jsonResponse) 

和类:

Public Class MyC 
     Public Property id() As String 
      Get 
       Return m_id 
      End Get 
      Set 
       m_id = Value 
      End Set 
     End Property 
     Private m_id As String 
     Public Property numerTel() As String 
      Get 
       Return m_numerTel 
      End Get 
      Set 
       m_numerTel = Value 
      End Set 
     End Property 
     Private m_numerTel As String 
     Public Property pozostalo() As String 
      Get 
       Return m_pozostalo 
      End Get 
      Set 
       m_pozostalo = Value 
      End Set 
     End Property 
     Private m_pozostalo As String 
     Public Property reffer() As String 
      Get 
       Return m_reffer 
      End Get 
      Set 
       m_reffer = Value 
      End Set 
     End Property 
     Private m_reffer As String 
     Public Property email() As String 
      Get 
       Return m_email 
      End Get 
      Set 
       m_email = Value 
      End Set 
     End Property 
     Private m_email As String 

    End Class 

感谢您的帮助!

+1

什么是“大问题”?见:[问]。一般来说,如果你反序列化,你也不必解析。 – Plutonix

+0

你忘了描述问题的部分。此代码以何种方式无法按预期工作? – David

回答

0

JSON并不代表MyC的实例。它代表了List(Of MyC)(或任何可枚举的集合,实际上)的一个实例。

Dim aba As List(Of MyC) = JsonHelper.JsonDeserialize(Of List(Of MyC))(jsonResponse) 
+0

好吧,我怎样才能访问每个其他行, – kaska3er

+0

例如:从ID:0获取价值reffer: – kaska3er

+0

我找到解决方案感谢您的帮助 – kaska3er