Version 1.17 of this library was originally developed by Gerrit van Kuipers. Since I was unable to contact him or find a public repository hosting this code, I decided to publish this library so other people could benefit of it as I did, and maybe we can improve it a little bit.
To create a new json object:
Set jsonObj = New aspJSON
From string:
jsonObj.loadJSON(json_string)
From a .json file:
jsonObj.loadFromFile("sample.json")
Getting value of item:
jsonObj.data("key")
Getting value of sub item:
jsonObj.data("key").item("child")
Changing data:
jsonObj.data("key") = "value"
Converting to string:
json_object.JSONoutput()
Set json_object = New aspJSON
json_object.data.Add "user", user
json_object.data.Add "pass", pass
Are always welcome.