JSON-Kodierung und-Dekodierung mit Objekten in Visual Basic 2010

Ich habe den folgenden code:

Imports Newtonsoft.Json
Imports Newtonsoft.Json.Linq
Module Module1

Structure JSONList
    Dim Name, Email As String
    Dim Age As Integer
End Structure

Sub Main()
    Dim Data(1) As JSONList

    Data(0).Name = "Josh"
    Data(0).Age = 17
    Data(0).Email = "[email protected]"
    Data(1).Name = "Greg"
    Data(1).Age = 17
    Data(1).Email = "[email protected]"

    Dim JSONEncode As String
    JSONEncode = JsonConvert.SerializeObject(Data)
    Console.WriteLine(JSONEncode)
    Console.WriteLine()
    Console.WriteLine()

    Dim JSONDecode() As JSONList = JsonConvert.DeserializeObject(JSONEncode)
    Console.WriteLine(JSONDecode(0).Name)

    Console.ReadKey()


End Sub

End Module

Den ersten Codierung Teil des Skripts verwendet wird, zum speichern der kodierten string einer Datenbank, die Ausgabe ist:

[{"Name":"Josh","Email":"[email protected]","Age":17},{"Name":"Greg","Email":"[email protected]","Age":17}]

Wenn ich jetzt versuche zu entschlüsseln dieser JSON-string, bekomme ich eine Fehlermeldung Unable to cast object of type 'Newtonsoft.Json.Linq.JArray' to type 'JSONList[]'.

Ich brauche die Daten werden codiert im JSON-format, so dass ich kann es in meiner website verwendet PHP zu entschlüsseln. Ich benutze Visual Basic 2010 zusammen mit JSON.NET.

InformationsquelleAutor Josh Luke Blease | 2013-09-23

  1. 1

    Das problem ist, dass JsonConvert.DeserializeObject deserialises in ein Objekt vom Typ Newtonsoft.Json.Linq.JArray.net kann nicht konvertiert automatisch in ein array von JSONList. Ein wenig Umstellung erforderlich ist:

    Dim jsonObject As Newtonsoft.Json.Linq.JArray =
                                        JsonConvert.DeserializeObject(JSONEncode)

Dim JSONDecode() As JSONList = (
                                 From j In jsonObject
                                 Select New JSONList() With {.Age = j("Age"),
                                                             .Email = j("Email"),
                                                             .Name = j("Name")}
                               ).ToArray()

    InformationsquelleAutor Adrian Wragg

  2. 0

    Als @ - Adrian sagte, JsonConvert.DeserializeObject deserialisiert werden, um JArray, die .Net kann nicht automatisch konvertiert in ein array von Ihrem JSONList Struktur. Jedoch, Sie brauchen nicht zu tun, eine manuelle Konvertierung; Sie müssen einfach zu verwenden, die überlastung der DeserializeObject akzeptiert-Typ-parameter. Dies ermöglicht Json.Net Deserialisieren direkt zu Ihrem Typ ohne Besondere conversion-code.

    Dim JSONDecode() As JSONList = _
                 JsonConvert.DeserializeObject(Of JSONList())(JSONEncode)

    InformationsquelleAutor Brian Rogers

Schreibe einen Kommentar