aspjson read..

<!--#include virtual="/aspJSON1.17.asp" -->

<%

Set oJSON = New aspJSON

'Load JSON string

oJSON.loadJSON(jsonstring)

'Get single value

Response.Write oJSON.data("firstName") & "<br>"

'Loop through collection

For Each phonenr In oJSON.data("phoneNumber")

    Set this = oJSON.data("phoneNumber").item(phonenr)

    Response.Write _

    this.item("type") & ": " & _

    this.item("number") & "<br>"

Next

'Update/Add value

oJSON.data("firstName") = "James"

'Return json string

Response.Write oJSON.JSONoutput()

%>