Deserializing JSON about aspjson HOT 3 CLOSED

I was able to do some Investigation by debugging the object and was able to do it like so. Is this the best day to iterate through the collection?

    set JSON = New JSONobject

      JSON.Parse(SessionValue)

       for each item in JSON.pairs

           for each item2 in item.i_value.items

               Response.Write " Key: " & item2("Key")
               Response.Write " Value: " & item2("Value")
               Response.Write " Type: " & item2("Type") & "<br>"

           next

       next

from aspjson.

Hi,

You are almost there.
When you parse an array like string it will generate and return a JSONArr object that is referenced in the property "data" in this case.

<%
'...
Dim JSON, arr, item

Set JSON = New JSONobject
Set arr = JSON.Parse(SessionValue)

For Each item In arr.items
    Response.Write " Key: " & item("Key")
    Response.Write " Value: " & item("Value")
    Response.Write " Type: " & item("Type") & "<br>"
Next
%>

You can see more examples at the bottom of the README page (project home page).

from aspjson.

Works Perfect, Cheers!!

from aspjson.