Parsing json data

[jegadk]

Hi.

Have a problem parsing some json data. Data is from a community webservice. I have saved the data to schools.txt to use it in Erel's json sample project

I have my own webserver with a lot of webservices in json format. All works fine, but this one is a paine. I get different errors, depending on what i write in:

m = Map1.Get("???????")
m = m.Get("????????")
schoolList = m.Get("????????")

I need quick help because i need it to demonstrate how to get the community data in an app.

Attached is a sample project with data txt file.

 

[Erel]

Use an online formatter to better understand the JSON structure: JSON Format - your online JSON Formatter

Your code should be:

Dim list1 As List = Map1.Get("Features") 'each item in this list is a Map

 

[agraham]

Sub Activity_Create(FirstTime As Boolean)
   'Do not forget to load the layout file created with the visual designer. For example:
   Activity.LoadLayout("Main")
   Dim JSON As JSONParser
   Dim Map1 As Map
   JSON.Initialize(File.ReadString(File.DirAssets, "schools.txt"))
   Map1 = JSON.NextObject
   
   Dim m As Map
   Dim featuresList As List
   
   featuresList = Map1.Get("features")
   Msgbox(featuresList.Get(0),"")
   For i = 0 To featuresList.Size - 1
      m = featuresList.Get(i)
      m = m.Get("properties")
      ListView1.AddTwoLines2(m.Get("navn"),m.Get("adresse"),m.Get("id"))
   Next

End Sub

 

[jegadk]

Thank you both. Works like a charm.


Regards
Jesper