Chilkat Online Tools

DescribeVolumes 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("VolumeIds[0]","string")

' The JSON request body created by the above code:

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

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

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

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

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

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

' {
'   "NextToken": "string",
'   "Volumes": [
'     {
'       "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": {
'             "AdministrativeActions": [
'               "AdministrativeAction"
'             ],
'             "CreationTime": number,
'             "Lifecycle": "string",
'             "LifecycleTransitionReason": {
'               "Message": "string"
'             },
'             "Name": "string",
'             "ResourceARN": "string",
'             "SnapshotId": "string",
'             "Tags": [
'               {
'                 "Key": "string",
'                 "Value": "string"
'               }
'             ],
'             "VolumeId": "string"
'           },
'           "TargetVolumeValues": "Volume"
'         }
'       ],
'       "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"
'     }
'   ]
' }

%>
</body>
</html>