(AutoIt) Create Google Photos Album

Demonstrates how to create a Google Photos album.

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

; This example requires the Chilkat API to have been previously unlocked.
; See Global Unlock Sample for sample code.

; Get the previously obtained access token.
; See Get Google Photos Access Token.

$oJsonToken = ObjCreate("Chilkat.JsonObject")
Local $bSuccess = $oJsonToken.LoadFile("qa_data/tokens/googlePhotos.json")
If ($bSuccess = False) Then
    ConsoleWrite($oJsonToken.LastErrorText & @CRLF)
    Exit
EndIf

$oHttp = ObjCreate("Chilkat.Http")

$oHttp.AuthToken = $oJsonToken.StringOf("access_token")

; Create an album named "animals"
$oJson = ObjCreate("Chilkat.JsonObject")
$oJson.UpdateString("album.title","animals")

Local $oResp = $oHttp.PostJson("https://photoslibrary.googleapis.com/v1/albums",$oJson.Emit())
If ($oHttp.LastMethodSuccess = False) Then
    ConsoleWrite($oHttp.LastErrorText & @CRLF)
    Exit
EndIf

; Show the response body.
ConsoleWrite($oResp.BodyStr & @CRLF)

; Examine the response status code.  Success is indicated by a status code of 200.
ConsoleWrite("response status code: " & $oResp.StatusCode & @CRLF)

$oJson.Load($oResp.BodyStr)

; Sample response:

; {
;   "id": "AKcbugHaQTvUKSi3M2RQxOhxhdEaLc5mfUcqFoIU_kpQaROyUD70BcFt7_mnz5PcwwsjPKeKnLHN",
;   "title": "animals",
;   "productUrl": "https://photos.google.com/lr/album/AKcbugHaQTvUKSi3M2RQxOhxhdEaLc5mfUcqFoIU_kpQaROyUD70BcFt7_mnz5PcwwsjPKeKnLHN",
;   "isWriteable": true
; }

; Use this online tool to generate parsing code from sample JSON: 
; Generate Parsing Code from JSON

Local $sId
Local $sTitle
Local $sProductUrl
Local $bIsWriteable

$sId = $oJson.StringOf("id")
$sTitle = $oJson.StringOf("title")
$sProductUrl = $oJson.StringOf("productUrl")
$bIsWriteable = $oJson.BoolOf("isWriteable")

ConsoleWrite("id = " & $sId & @CRLF)