(AutoIt) Read/Write JSON with Binary Data such as JPEG Files

Demonstrates how binary files could be stored in JSON in base64 format. Creates JSON containing the contents of a JPG file, and then reads the JSON to extract the JPEG image.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

; First load a small JPG file..
$oBd = ObjCreate("Chilkat.BinData")

Local $bSuccess = $oBd.LoadFile("qa_data/jpg/starfish20.jpg")
; Assume success, but your code should check for success..

; Create JSON containing the binary data in base64 format.
$oJson1 = ObjCreate("Chilkat.JsonObject")
$oJson1.UpdateBd("starfish","base64",$oBd)

Local $sJsonStr = $oJson1.Emit()
ConsoleWrite($sJsonStr & @CRLF)

; Here's the output:
; {"starfish":"/9j/4AAQSkZJRgA ... cN2iuLFsCEbDGxQkI6RO/n//2Q=="}

; Let's create a new JSON object, load it with the above JSON, and extract the JPG image..
$oJson2 = ObjCreate("Chilkat.JsonObject")
$oJson2.Load($sJsonStr)

; Get the binary bytes.
$oBd2 = ObjCreate("Chilkat.BinData")
$oJson2.BytesOf("starfish","base64",$oBd2)

; Save to a file.
$bSuccess = $oBd2.WriteFile("qa_output/starfish20.jpg")

ConsoleWrite("Success." & @CRLF)