Chilkat Online Tools

DescribeSnapshots Classic ASP Example

Amazon FSx

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
' This example requires the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.

set rest = Server.CreateObject("Chilkat_9_5_0.Rest")

set authAws = Server.CreateObject("Chilkat_9_5_0.AuthAws")
authAws.AccessKey = "AWS_ACCESS_KEY"
authAws.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.)
authAws.Region = "us-west-2"
authAws.ServiceName = "fsx"
' SetAuthAws causes Chilkat to automatically add the following headers: Authorization, X-Amz-Date
success = rest.SetAuthAws(authAws)

' URL: https://fsx.us-west-2.amazonaws.com/
' Use the same region as specified above.
success = rest.Connect("fsx.us-west-2.amazonaws.com",443,1,1)
If (success <> 1) Then
    Response.Write "<pre>" & Server.HTMLEncode( "ConnectFailReason: " & rest.ConnectFailReason) & "</pre>"
    Response.Write "<pre>" & Server.HTMLEncode( rest.LastErrorText) & "</pre>"
    Response.End
End If

' 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

set json = Server.CreateObject("Chilkat_9_5_0.JsonObject")
success = json.UpdateString("Filters[0].Name","string")
success = json.UpdateString("Filters[0].Values[0]","string")
success = json.UpdateInt("MaxResults",123)
success = json.UpdateString("NextToken","string")
success = json.UpdateString("SnapshotIds[0]","string")

' The JSON request body created by the above code:

' {
'   "Filters": [
'     {
'       "Name": "string",
'       "Values": [
'         "string"
'       ]
'     }
'   ],
'   "MaxResults": number,
'   "NextToken": "string",
'   "SnapshotIds": [
'     "string"
'   ]
' }

success = rest.AddHeader("Content-Type","application/x-amz-json-1.1")
success = rest.AddHeader("X-Amz-Target","AWSSimbaAPIService_v20180301.DescribeSnapshots")

set sbRequestBody = Server.CreateObject("Chilkat_9_5_0.StringBuilder")
success = json.EmitSb(sbRequestBody)
set sbResponseBody = Server.CreateObject("Chilkat_9_5_0.StringBuilder")
success = rest.FullRequestSb("POST","/",sbRequestBody,sbResponseBody)
If (success <> 1) Then
    Response.Write "<pre>" & Server.HTMLEncode( rest.LastErrorText) & "</pre>"
    Response.End
End If

respStatusCode = rest.ResponseStatusCode
Response.Write "<pre>" & Server.HTMLEncode( "response status code = " & respStatusCode) & "</pre>"
If (respStatusCode <> 200) Then
    Response.Write "<pre>" & Server.HTMLEncode( "Response Header:") & "</pre>"
    Response.Write "<pre>" & Server.HTMLEncode( rest.ResponseHeader) & "</pre>"
    Response.Write "<pre>" & Server.HTMLEncode( "Response Body:") & "</pre>"
    Response.Write "<pre>" & Server.HTMLEncode( sbResponseBody.GetAsString()) & "</pre>"
    Response.End
End If

set jResp = Server.CreateObject("Chilkat_9_5_0.JsonObject")
success = jResp.LoadSb(sbResponseBody)

' 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

NextToken = jResp.StringOf("NextToken")
i = 0
count_i = jResp.SizeOfArray("Snapshots")
Do While i < count_i
    jResp.I = i
    CreationTime = jResp.IntOf("Snapshots[i].CreationTime")
    Lifecycle = jResp.StringOf("Snapshots[i].Lifecycle")
    Message = jResp.StringOf("Snapshots[i].LifecycleTransitionReason.Message")
    Name = jResp.StringOf("Snapshots[i].Name")
    ResourceARN = jResp.StringOf("Snapshots[i].ResourceARN")
    SnapshotId = jResp.StringOf("Snapshots[i].SnapshotId")
    VolumeId = jResp.StringOf("Snapshots[i].VolumeId")
    j = 0
    count_j = jResp.SizeOfArray("Snapshots[i].AdministrativeActions")
    Do While j < count_j
        jResp.J = j
        AdministrativeActionType = jResp.StringOf("Snapshots[i].AdministrativeActions[j].AdministrativeActionType")
        FailureDetailsMessage = jResp.StringOf("Snapshots[i].AdministrativeActions[j].FailureDetails.Message")
        ProgressPercent = jResp.IntOf("Snapshots[i].AdministrativeActions[j].ProgressPercent")
        RequestTime = jResp.IntOf("Snapshots[i].AdministrativeActions[j].RequestTime")
        Status = jResp.StringOf("Snapshots[i].AdministrativeActions[j].Status")
        TargetFileSystemValuesCreationTime = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.CreationTime")
        DNSName = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.DNSName")
        FailureDetailsMessage = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.FailureDetails.Message")
        FileSystemId = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.FileSystemId")
        FileSystemType = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.FileSystemType")
        FileSystemTypeVersion = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.FileSystemTypeVersion")
        KmsKeyId = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.KmsKeyId")
        TargetFileSystemValuesLifecycle = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.Lifecycle")
        AutomaticBackupRetentionDays = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.LustreConfiguration.AutomaticBackupRetentionDays")
        CopyTagsToBackups = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.LustreConfiguration.CopyTagsToBackups")
        DailyAutomaticBackupStartTime = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.LustreConfiguration.DailyAutomaticBackupStartTime")
        DataCompressionType = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.LustreConfiguration.DataCompressionType")
        AutoImportPolicy = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.LustreConfiguration.DataRepositoryConfiguration.AutoImportPolicy")
        ExportPath = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.LustreConfiguration.DataRepositoryConfiguration.ExportPath")
        FailureDetailsMessage = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.LustreConfiguration.DataRepositoryConfiguration.FailureDetails.Message")
        ImportedFileChunkSize = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.LustreConfiguration.DataRepositoryConfiguration.ImportedFileChunkSize")
        ImportPath = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.LustreConfiguration.DataRepositoryConfiguration.ImportPath")
        DataRepositoryConfigurationLifecycle = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.LustreConfiguration.DataRepositoryConfiguration.Lifecycle")
        DeploymentType = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.LustreConfiguration.DeploymentType")
        DriveCacheType = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.LustreConfiguration.DriveCacheType")
        Destination = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.LustreConfiguration.LogConfiguration.Destination")
        Level = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.LustreConfiguration.LogConfiguration.Level")
        MountName = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.LustreConfiguration.MountName")
        PerUnitStorageThroughput = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.LustreConfiguration.PerUnitStorageThroughput")
        WeeklyMaintenanceStartTime = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.LustreConfiguration.WeeklyMaintenanceStartTime")
        OntapConfigurationAutomaticBackupRetentionDays = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.OntapConfiguration.AutomaticBackupRetentionDays")
        OntapConfigurationDailyAutomaticBackupStartTime = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.OntapConfiguration.DailyAutomaticBackupStartTime")
        OntapConfigurationDeploymentType = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.OntapConfiguration.DeploymentType")
        Iops = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.OntapConfiguration.DiskIopsConfiguration.Iops")
        Mode = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.OntapConfiguration.DiskIopsConfiguration.Mode")
        EndpointIpAddressRange = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.OntapConfiguration.EndpointIpAddressRange")
        InterclusterDNSName = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.OntapConfiguration.Endpoints.Intercluster.DNSName")
        ManagementDNSName = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.OntapConfiguration.Endpoints.Management.DNSName")
        PreferredSubnetId = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.OntapConfiguration.PreferredSubnetId")
        ThroughputCapacity = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.OntapConfiguration.ThroughputCapacity")
        OntapConfigurationWeeklyMaintenanceStartTime = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.OntapConfiguration.WeeklyMaintenanceStartTime")
        OpenZFSConfigurationAutomaticBackupRetentionDays = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.OpenZFSConfiguration.AutomaticBackupRetentionDays")
        OpenZFSConfigurationCopyTagsToBackups = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.OpenZFSConfiguration.CopyTagsToBackups")
        CopyTagsToVolumes = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.OpenZFSConfiguration.CopyTagsToVolumes")
        OpenZFSConfigurationDailyAutomaticBackupStartTime = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.OpenZFSConfiguration.DailyAutomaticBackupStartTime")
        OpenZFSConfigurationDeploymentType = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.OpenZFSConfiguration.DeploymentType")
        DiskIopsConfigurationIops = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.OpenZFSConfiguration.DiskIopsConfiguration.Iops")
        DiskIopsConfigurationMode = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.OpenZFSConfiguration.DiskIopsConfiguration.Mode")
        RootVolumeId = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.OpenZFSConfiguration.RootVolumeId")
        OpenZFSConfigurationThroughputCapacity = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.OpenZFSConfiguration.ThroughputCapacity")
        OpenZFSConfigurationWeeklyMaintenanceStartTime = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.OpenZFSConfiguration.WeeklyMaintenanceStartTime")
        OwnerId = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.OwnerId")
        TargetFileSystemValuesResourceARN = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.ResourceARN")
        StorageCapacity = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.StorageCapacity")
        StorageType = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.StorageType")
        VpcId = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.VpcId")
        ActiveDirectoryId = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.WindowsConfiguration.ActiveDirectoryId")
        AuditLogDestination = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.WindowsConfiguration.AuditLogConfiguration.AuditLogDestination")
        FileAccessAuditLogLevel = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.WindowsConfiguration.AuditLogConfiguration.FileAccessAuditLogLevel")
        FileShareAccessAuditLogLevel = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.WindowsConfiguration.AuditLogConfiguration.FileShareAccessAuditLogLevel")
        WindowsConfigurationAutomaticBackupRetentionDays = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.WindowsConfiguration.AutomaticBackupRetentionDays")
        WindowsConfigurationCopyTagsToBackups = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.WindowsConfiguration.CopyTagsToBackups")
        WindowsConfigurationDailyAutomaticBackupStartTime = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.WindowsConfiguration.DailyAutomaticBackupStartTime")
        WindowsConfigurationDeploymentType = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.WindowsConfiguration.DeploymentType")
        PreferredFileServerIp = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.WindowsConfiguration.PreferredFileServerIp")
        WindowsConfigurationPreferredSubnetId = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.WindowsConfiguration.PreferredSubnetId")
        RemoteAdministrationEndpoint = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.WindowsConfiguration.RemoteAdministrationEndpoint")
        DomainName = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.WindowsConfiguration.SelfManagedActiveDirectoryConfiguration.DomainName")
        FileSystemAdministratorsGroup = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.WindowsConfiguration.SelfManagedActiveDirectoryConfiguration.FileSystemAdministratorsGroup")
        OrganizationalUnitDistinguishedName = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.WindowsConfiguration.SelfManagedActiveDirectoryConfiguration.OrganizationalUnitDistinguishedName")
        UserName = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.WindowsConfiguration.SelfManagedActiveDirectoryConfiguration.UserName")
        WindowsConfigurationThroughputCapacity = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.WindowsConfiguration.ThroughputCapacity")
        WindowsConfigurationWeeklyMaintenanceStartTime = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.WindowsConfiguration.WeeklyMaintenanceStartTime")
        TargetSnapshotValues = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetSnapshotValues")
        TargetVolumeValuesCreationTime = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.CreationTime")
        TargetVolumeValuesFileSystemId = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.FileSystemId")
        TargetVolumeValuesLifecycle = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.Lifecycle")
        LifecycleTransitionReasonMessage = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.LifecycleTransitionReason.Message")
        TargetVolumeValuesName = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.Name")
        FlexCacheEndpointType = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.OntapConfiguration.FlexCacheEndpointType")
        JunctionPath = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.OntapConfiguration.JunctionPath")
        OntapVolumeType = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.OntapConfiguration.OntapVolumeType")
        SecurityStyle = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.OntapConfiguration.SecurityStyle")
        SizeInMegabytes = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.OntapConfiguration.SizeInMegabytes")
        StorageEfficiencyEnabled = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.OntapConfiguration.StorageEfficiencyEnabled")
        StorageVirtualMachineId = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.OntapConfiguration.StorageVirtualMachineId")
        StorageVirtualMachineRoot = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.OntapConfiguration.StorageVirtualMachineRoot")
        CoolingPeriod = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.OntapConfiguration.TieringPolicy.CoolingPeriod")
        TieringPolicyName = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.OntapConfiguration.TieringPolicy.Name")
        UUID = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.OntapConfiguration.UUID")
        CopyTagsToSnapshots = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.OpenZFSConfiguration.CopyTagsToSnapshots")
        OpenZFSConfigurationDataCompressionType = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.OpenZFSConfiguration.DataCompressionType")
        CopyStrategy = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.OpenZFSConfiguration.OriginSnapshot.CopyStrategy")
        SnapshotARN = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.OpenZFSConfiguration.OriginSnapshot.SnapshotARN")
        ParentVolumeId = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.OpenZFSConfiguration.ParentVolumeId")
        ReadOnly = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.OpenZFSConfiguration.ReadOnly")
        RecordSizeKiB = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.OpenZFSConfiguration.RecordSizeKiB")
        StorageCapacityQuotaGiB = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.OpenZFSConfiguration.StorageCapacityQuotaGiB")
        StorageCapacityReservationGiB = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.OpenZFSConfiguration.StorageCapacityReservationGiB")
        VolumePath = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.OpenZFSConfiguration.VolumePath")
        TargetVolumeValuesResourceARN = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.ResourceARN")
        TargetVolumeValuesVolumeId = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.VolumeId")
        VolumeType = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.VolumeType")
        k = 0
        count_k = jResp.SizeOfArray("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.AdministrativeActions")
        Do While k < count_k
            jResp.K = k
            strVal = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.AdministrativeActions[k]")
            k = k + 1
        Loop
        k = 0
        count_k = jResp.SizeOfArray("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.NetworkInterfaceIds")
        Do While k < count_k
            jResp.K = k
            strVal = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.NetworkInterfaceIds[k]")
            k = k + 1
        Loop
        k = 0
        count_k = jResp.SizeOfArray("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.OntapConfiguration.Endpoints.Intercluster.IpAddresses")
        Do While k < count_k
            jResp.K = k
            strVal = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.OntapConfiguration.Endpoints.Intercluster.IpAddresses[k]")
            k = k + 1
        Loop
        k = 0
        count_k = jResp.SizeOfArray("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.OntapConfiguration.Endpoints.Management.IpAddresses")
        Do While k < count_k
            jResp.K = k
            strVal = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.OntapConfiguration.Endpoints.Management.IpAddresses[k]")
            k = k + 1
        Loop
        k = 0
        count_k = jResp.SizeOfArray("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.OntapConfiguration.RouteTableIds")
        Do While k < count_k
            jResp.K = k
            strVal = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.OntapConfiguration.RouteTableIds[k]")
            k = k + 1
        Loop
        k = 0
        count_k = jResp.SizeOfArray("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.SubnetIds")
        Do While k < count_k
            jResp.K = k
            strVal = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.SubnetIds[k]")
            k = k + 1
        Loop
        k = 0
        count_k = jResp.SizeOfArray("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.Tags")
        Do While k < count_k
            jResp.K = k
            Key = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.Tags[k].Key")
            Value = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.Tags[k].Value")
            k = k + 1
        Loop
        k = 0
        count_k = jResp.SizeOfArray("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.WindowsConfiguration.Aliases")
        Do While k < count_k
            jResp.K = k
            Lifecycle = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.WindowsConfiguration.Aliases[k].Lifecycle")
            Name = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.WindowsConfiguration.Aliases[k].Name")
            k = k + 1
        Loop
        k = 0
        count_k = jResp.SizeOfArray("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.WindowsConfiguration.MaintenanceOperationsInProgress")
        Do While k < count_k
            jResp.K = k
            strVal = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.WindowsConfiguration.MaintenanceOperationsInProgress[k]")
            k = k + 1
        Loop
        k = 0
        count_k = jResp.SizeOfArray("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.WindowsConfiguration.SelfManagedActiveDirectoryConfiguration.DnsIps")
        Do While k < count_k
            jResp.K = k
            strVal = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetFileSystemValues.WindowsConfiguration.SelfManagedActiveDirectoryConfiguration.DnsIps[k]")
            k = k + 1
        Loop
        k = 0
        count_k = jResp.SizeOfArray("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.AdministrativeActions")
        Do While k < count_k
            jResp.K = k
            strVal = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.AdministrativeActions[k]")
            k = k + 1
        Loop
        k = 0
        count_k = jResp.SizeOfArray("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.OpenZFSConfiguration.NfsExports")
        Do While k < count_k
            jResp.K = k

            ' json1 is a Chilkat_9_5_0.JsonObject
            Set json1 = jResp.ObjectOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.OpenZFSConfiguration.NfsExports[k]")
            i1 = 0
            count_i1 = json1.SizeOfArray("ClientConfigurations")
            Do While i1 < count_i1
                json1.I = i1
                Clients = json1.StringOf("ClientConfigurations[i].Clients")
                j1 = 0
                count_j1 = json1.SizeOfArray("ClientConfigurations[i].Options")
                Do While j1 < count_j1
                    json1.J = j1
                    strVal = json1.StringOf("ClientConfigurations[i].Options[j]")
                    j1 = j1 + 1
                Loop
                i1 = i1 + 1
            Loop

            k = k + 1
        Loop
        k = 0
        count_k = jResp.SizeOfArray("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.OpenZFSConfiguration.UserAndGroupQuotas")
        Do While k < count_k
            jResp.K = k
            Id = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.OpenZFSConfiguration.UserAndGroupQuotas[k].Id")
            StorageCapacityQuotaGiB = jResp.IntOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.OpenZFSConfiguration.UserAndGroupQuotas[k].StorageCapacityQuotaGiB")
            v_Type = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.OpenZFSConfiguration.UserAndGroupQuotas[k].Type")
            k = k + 1
        Loop
        k = 0
        count_k = jResp.SizeOfArray("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.Tags")
        Do While k < count_k
            jResp.K = k
            Key = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.Tags[k].Key")
            Value = jResp.StringOf("Snapshots[i].AdministrativeActions[j].TargetVolumeValues.Tags[k].Value")
            k = k + 1
        Loop
        j = j + 1
    Loop
    j = 0
    count_j = jResp.SizeOfArray("Snapshots[i].Tags")
    Do While j < count_j
        jResp.J = j
        Key = jResp.StringOf("Snapshots[i].Tags[j].Key")
        Value = jResp.StringOf("Snapshots[i].Tags[j].Value")
        j = j + 1
    Loop
    i = i + 1
Loop

' A sample JSON response body parsed by the above code:

' {
'   "NextToken": "string",
'   "Snapshots": [
'     {
'       "AdministrativeActions": [
'         {
'           "AdministrativeActionType": "string",
'           "FailureDetails": {
'             "Message": "string"
'           },
'           "ProgressPercent": number,
'           "RequestTime": number,
'           "Status": "string",
'           "TargetFileSystemValues": {
'             "AdministrativeActions": [
'               "AdministrativeAction"
'             ],
'             "CreationTime": number,
'             "DNSName": "string",
'             "FailureDetails": {
'               "Message": "string"
'             },
'             "FileSystemId": "string",
'             "FileSystemType": "string",
'             "FileSystemTypeVersion": "string",
'             "KmsKeyId": "string",
'             "Lifecycle": "string",
'             "LustreConfiguration": {
'               "AutomaticBackupRetentionDays": number,
'               "CopyTagsToBackups": boolean,
'               "DailyAutomaticBackupStartTime": "string",
'               "DataCompressionType": "string",
'               "DataRepositoryConfiguration": {
'                 "AutoImportPolicy": "string",
'                 "ExportPath": "string",
'                 "FailureDetails": {
'                   "Message": "string"
'                 },
'                 "ImportedFileChunkSize": number,
'                 "ImportPath": "string",
'                 "Lifecycle": "string"
'               },
'               "DeploymentType": "string",
'               "DriveCacheType": "string",
'               "LogConfiguration": {
'                 "Destination": "string",
'                 "Level": "string"
'               },
'               "MountName": "string",
'               "PerUnitStorageThroughput": number,
'               "WeeklyMaintenanceStartTime": "string"
'             },
'             "NetworkInterfaceIds": [
'               "string"
'             ],
'             "OntapConfiguration": {
'               "AutomaticBackupRetentionDays": number,
'               "DailyAutomaticBackupStartTime": "string",
'               "DeploymentType": "string",
'               "DiskIopsConfiguration": {
'                 "Iops": number,
'                 "Mode": "string"
'               },
'               "EndpointIpAddressRange": "string",
'               "Endpoints": {
'                 "Intercluster": {
'                   "DNSName": "string",
'                   "IpAddresses": [
'                     "string"
'                   ]
'                 },
'                 "Management": {
'                   "DNSName": "string",
'                   "IpAddresses": [
'                     "string"
'                   ]
'                 }
'               },
'               "PreferredSubnetId": "string",
'               "RouteTableIds": [
'                 "string"
'               ],
'               "ThroughputCapacity": number,
'               "WeeklyMaintenanceStartTime": "string"
'             },
'             "OpenZFSConfiguration": {
'               "AutomaticBackupRetentionDays": number,
'               "CopyTagsToBackups": boolean,
'               "CopyTagsToVolumes": boolean,
'               "DailyAutomaticBackupStartTime": "string",
'               "DeploymentType": "string",
'               "DiskIopsConfiguration": {
'                 "Iops": number,
'                 "Mode": "string"
'               },
'               "RootVolumeId": "string",
'               "ThroughputCapacity": number,
'               "WeeklyMaintenanceStartTime": "string"
'             },
'             "OwnerId": "string",
'             "ResourceARN": "string",
'             "StorageCapacity": number,
'             "StorageType": "string",
'             "SubnetIds": [
'               "string"
'             ],
'             "Tags": [
'               {
'                 "Key": "string",
'                 "Value": "string"
'               }
'             ],
'             "VpcId": "string",
'             "WindowsConfiguration": {
'               "ActiveDirectoryId": "string",
'               "Aliases": [
'                 {
'                   "Lifecycle": "string",
'                   "Name": "string"
'                 }
'               ],
'               "AuditLogConfiguration": {
'                 "AuditLogDestination": "string",
'                 "FileAccessAuditLogLevel": "string",
'                 "FileShareAccessAuditLogLevel": "string"
'               },
'               "AutomaticBackupRetentionDays": number,
'               "CopyTagsToBackups": boolean,
'               "DailyAutomaticBackupStartTime": "string",
'               "DeploymentType": "string",
'               "MaintenanceOperationsInProgress": [
'                 "string"
'               ],
'               "PreferredFileServerIp": "string",
'               "PreferredSubnetId": "string",
'               "RemoteAdministrationEndpoint": "string",
'               "SelfManagedActiveDirectoryConfiguration": {
'                 "DnsIps": [
'                   "string"
'                 ],
'                 "DomainName": "string",
'                 "FileSystemAdministratorsGroup": "string",
'                 "OrganizationalUnitDistinguishedName": "string",
'                 "UserName": "string"
'               },
'               "ThroughputCapacity": number,
'               "WeeklyMaintenanceStartTime": "string"
'             }
'           },
'           "TargetSnapshotValues": "Snapshot",
'           "TargetVolumeValues": {
'             "AdministrativeActions": [
'               "AdministrativeAction"
'             ],
'             "CreationTime": number,
'             "FileSystemId": "string",
'             "Lifecycle": "string",
'             "LifecycleTransitionReason": {
'               "Message": "string"
'             },
'             "Name": "string",
'             "OntapConfiguration": {
'               "FlexCacheEndpointType": "string",
'               "JunctionPath": "string",
'               "OntapVolumeType": "string",
'               "SecurityStyle": "string",
'               "SizeInMegabytes": number,
'               "StorageEfficiencyEnabled": boolean,
'               "StorageVirtualMachineId": "string",
'               "StorageVirtualMachineRoot": boolean,
'               "TieringPolicy": {
'                 "CoolingPeriod": number,
'                 "Name": "string"
'               },
'               "UUID": "string"
'             },
'             "OpenZFSConfiguration": {
'               "CopyTagsToSnapshots": boolean,
'               "DataCompressionType": "string",
'               "NfsExports": [
'                 {
'                   "ClientConfigurations": [
'                     {
'                       "Clients": "string",
'                       "Options": [
'                         "string"
'                       ]
'                     }
'                   ]
'                 }
'               ],
'               "OriginSnapshot": {
'                 "CopyStrategy": "string",
'                 "SnapshotARN": "string"
'               },
'               "ParentVolumeId": "string",
'               "ReadOnly": boolean,
'               "RecordSizeKiB": number,
'               "StorageCapacityQuotaGiB": number,
'               "StorageCapacityReservationGiB": number,
'               "UserAndGroupQuotas": [
'                 {
'                   "Id": number,
'                   "StorageCapacityQuotaGiB": number,
'                   "Type": "string"
'                 }
'               ],
'               "VolumePath": "string"
'             },
'             "ResourceARN": "string",
'             "Tags": [
'               {
'                 "Key": "string",
'                 "Value": "string"
'               }
'             ],
'             "VolumeId": "string",
'             "VolumeType": "string"
'           }
'         }
'       ],
'       "CreationTime": number,
'       "Lifecycle": "string",
'       "LifecycleTransitionReason": {
'         "Message": "string"
'       },
'       "Name": "string",
'       "ResourceARN": "string",
'       "SnapshotId": "string",
'       "Tags": [
'         {
'           "Key": "string",
'           "Value": "string"
'         }
'       ],
'       "VolumeId": "string"
'     }
'   ]
' }

%>
</body>
</html>