(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.
; First load a small JPG file..
$oBd = ObjCreate("Chilkat_9_5_0.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_9_5_0.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_9_5_0.JsonObject")
$oJson2.Load($sJsonStr)
; Get the binary bytes.
$oBd2 = ObjCreate("Chilkat_9_5_0.BinData")
$oJson2.BytesOf("starfish","base64",$oBd2)
; Save to a file.
$bSuccess = $oBd2.WriteFile("qa_output/starfish20.jpg")
ConsoleWrite("Success." & @CRLF)
|
