DescribeApplications autoit Example
; This example requires the Chilkat API to have been previously unlocked.
; See Global Unlock Sample for sample code.
$oRest = ObjCreate("Chilkat_9_5_0.Rest")
Local $bSuccess
$oAuthAws = ObjCreate("Chilkat_9_5_0.AuthAws")
$oAuthAws.AccessKey = "AWS_ACCESS_KEY"
$oAuthAws.SecretKey = "AWS_SECRET_KEY"
; Don't forget to change the region to your particular region. (Also make the same change in the call to Connect below.)
$oAuthAws.Region = "us-west-2"
$oAuthAws.ServiceName = "appstream"
; SetAuthAws causes Chilkat to automatically add the following headers: Authorization, X-Amz-Date
$oRest.SetAuthAws($oAuthAws)
; URL: https://appstream2.us-west-2.amazonaws.com/
; Use the same region as specified above.
$bSuccess = $oRest.Connect("appstream2.us-west-2.amazonaws.com",443,True,True)
If ($bSuccess <> True) Then
ConsoleWrite("ConnectFailReason: " & $oRest.ConnectFailReason & @CRLF)
ConsoleWrite($oRest.LastErrorText & @CRLF)
Exit
EndIf
; The following code creates the JSON request body.
; The JSON created by this code is shown below.
; Use this online tool to generate code from sample JSON:
; Generate Code to Create JSON
$oJson = ObjCreate("Chilkat_9_5_0.JsonObject")
$oJson.UpdateString("Arns[0]","string")
$oJson.UpdateInt("MaxResults",123)
$oJson.UpdateString("NextToken","string")
; The JSON request body created by the above code:
; {
; "Arns": [
; "string"
; ],
; "MaxResults": number,
; "NextToken": "string"
; }
$oRest.AddHeader("Content-Type","application/x-amz-json-1.1")
$oRest.AddHeader("X-Amz-Target","PhotonAdminProxyService.DescribeApplications")
$oSbRequestBody = ObjCreate("Chilkat_9_5_0.StringBuilder")
$oJson.EmitSb($oSbRequestBody)
$oSbResponseBody = ObjCreate("Chilkat_9_5_0.StringBuilder")
$bSuccess = $oRest.FullRequestSb("POST","/",$oSbRequestBody,$oSbResponseBody)
If ($bSuccess <> True) Then
ConsoleWrite($oRest.LastErrorText & @CRLF)
Exit
EndIf
Local $iRespStatusCode = $oRest.ResponseStatusCode
ConsoleWrite("response status code = " & $iRespStatusCode & @CRLF)
If ($iRespStatusCode <> 200) Then
ConsoleWrite("Response Header:" & @CRLF)
ConsoleWrite($oRest.ResponseHeader & @CRLF)
ConsoleWrite("Response Body:" & @CRLF)
ConsoleWrite($oSbResponseBody.GetAsString() & @CRLF)
Exit
EndIf
$oJResp = ObjCreate("Chilkat_9_5_0.JsonObject")
$oJResp.LoadSb($oSbResponseBody)
; The following code parses the JSON response.
; A sample JSON response is shown below the sample code.
; Use this online tool to generate parsing code from sample JSON:
; Generate Parsing Code from JSON
Local $sAppBlockArn
Local $sArn
Local $iCreatedTime
Local $sDescription
Local $sDisplayName
Local $iEnabled
Local $sS3Bucket
Local $sS3Key
Local $sIconURL
Local $sLaunchParameters
Local $sLaunchPath
Local $sV_String
Local $sName
Local $sWorkingDirectory
Local $iJ
Local $iCount_j
Local $strVal
Local $sNextToken = $oJResp.StringOf("NextToken")
Local $i = 0
Local $iCount_i = $oJResp.SizeOfArray("Applications")
While $i < $iCount_i
$oJResp.I = $i
$sAppBlockArn = $oJResp.StringOf("Applications[i].AppBlockArn")
$sArn = $oJResp.StringOf("Applications[i].Arn")
$iCreatedTime = $oJResp.IntOf("Applications[i].CreatedTime")
$sDescription = $oJResp.StringOf("Applications[i].Description")
$sDisplayName = $oJResp.StringOf("Applications[i].DisplayName")
$iEnabled = $oJResp.IntOf("Applications[i].Enabled")
$sS3Bucket = $oJResp.StringOf("Applications[i].IconS3Location.S3Bucket")
$sS3Key = $oJResp.StringOf("Applications[i].IconS3Location.S3Key")
$sIconURL = $oJResp.StringOf("Applications[i].IconURL")
$sLaunchParameters = $oJResp.StringOf("Applications[i].LaunchParameters")
$sLaunchPath = $oJResp.StringOf("Applications[i].LaunchPath")
$sV_String = $oJResp.StringOf("Applications[i].Metadata.string")
$sName = $oJResp.StringOf("Applications[i].Name")
$sWorkingDirectory = $oJResp.StringOf("Applications[i].WorkingDirectory")
$iJ = 0
$iCount_j = $oJResp.SizeOfArray("Applications[i].InstanceFamilies")
While $iJ < $iCount_j
$oJResp.J = $iJ
$strVal = $oJResp.StringOf("Applications[i].InstanceFamilies[j]")
$iJ = $iJ + 1
Wend
$iJ = 0
$iCount_j = $oJResp.SizeOfArray("Applications[i].Platforms")
While $iJ < $iCount_j
$oJResp.J = $iJ
$strVal = $oJResp.StringOf("Applications[i].Platforms[j]")
$iJ = $iJ + 1
Wend
$i = $i + 1
Wend
; A sample JSON response body parsed by the above code:
; {
; "Applications": [
; {
; "AppBlockArn": "string",
; "Arn": "string",
; "CreatedTime": number,
; "Description": "string",
; "DisplayName": "string",
; "Enabled": boolean,
; "IconS3Location": {
; "S3Bucket": "string",
; "S3Key": "string"
; },
; "IconURL": "string",
; "InstanceFamilies": [
; "string"
; ],
; "LaunchParameters": "string",
; "LaunchPath": "string",
; "Metadata": {
; "string": "string"
; },
; "Name": "string",
; "Platforms": [
; "string"
; ],
; "WorkingDirectory": "string"
; }
; ],
; "NextToken": "string"
; }