JSONgen: JSON generator

[Jefrey]

Hey folks!

I bring this JSON generator I made, which uses a syntax that reminds OOP a little.

Here's an example:

#include "JSONgen.au3"

$oJson = New_Json()

; Let's add some stand-alone elements
Json_AddElement($oJson, "test") ; A string
Local $aArray[2] = ['hai', 'halo']
Json_AddElement($oJson, $aArray) ; An array

; Let's add some associative elements
Json_AddElement($oJson, "hey", 2.55)
Json_AddElement($oJson, "delete", "me") ; We will delete this one
Json_AddElement($oJson, "hoo", True)
Json_AddElement($oJson, "edit", "this") ; And edit this one

; Let's do some editing
Json_DeleteElement($oJson, "delete") ; Deleting that one
Json_EditElement($oJson, "edit", "that") ; Editing that one

; Let's now add an associated (non-associative) array :)
Local $aArray[2] = ['hey', 'bye']
Json_AddElement($oJson, 'array', $aArray)

; Now we get the JSON
$sTheJsonCode = Json_GetJson($oJson)

MsgBox(0, "Json code", $sTheJsonCode)

This will show:

{"0":"test","1":["hai","halo"],"hey":2.55,"hoo":true,"edit":"that","array":["hey","bye"]}

Includes help.

License: CC BY 4.0 (http://creativecommons.org/licenses/by/4.0/)

Download: https://www.autoitscript.com/forum/files/file/345-jsongen-json-generator/

Edited July 9, 2015 by Jefrey

[guinness]

Nice approach

[mLipok]

Added to the Wiki

[guinness]

I made a couple of changes @Jefrey

Func JSON() ; As it's a constructor, remove the new prefix
    Local $aSelf[1][3] ; Use Local instead of Dim, as Dim should be used in special cases
    Return $aSelf
EndFunc

; ----------

 

[argumentum]

I made a couple of changes @Jefrey

; Use Local instead of Dim, as Dim should be used in special cases

please explain the proper use of Dim, as I'm clueless of it's proper use.
Local, Global and ReDim I get. Dim, I don't.

Thanks

Edit: I get it. after declared I could Dim as it's already declared as Local or Global

Edited July 12, 2015 by argumentum
got it :)

[guinness]

The help file explains it quite well under Dim.