Chilkat Online Tools

ListDataSources Classic ASP Example

AWS AppSync

<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 = "appsync"
' SetAuthAws causes Chilkat to automatically add the following headers: Authorization, X-Amz-Date
success = rest.SetAuthAws(authAws)

' URL: https://appsync.us-west-2.amazonaws.com/
' Use the same region as specified above.
success = rest.Connect("appsync.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

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

set sbResponseBody = Server.CreateObject("Chilkat_9_5_0.StringBuilder")
success = rest.FullRequestNoBodySb("GET","/v1/apis/{apiId}/datasources",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("dataSources")
Do While i < count_i
    jResp.I = i
    dataSourceArn = jResp.StringOf("dataSources[i].dataSourceArn")
    description = jResp.StringOf("dataSources[i].description")
    AwsRegion = jResp.StringOf("dataSources[i].dynamodbConfig.awsRegion")
    BaseTableTTL = jResp.IntOf("dataSources[i].dynamodbConfig.deltaSyncConfig.baseTableTTL")
    DeltaSyncTableName = jResp.StringOf("dataSources[i].dynamodbConfig.deltaSyncConfig.deltaSyncTableName")
    DeltaSyncTableTTL = jResp.IntOf("dataSources[i].dynamodbConfig.deltaSyncConfig.deltaSyncTableTTL")
    TableName = jResp.StringOf("dataSources[i].dynamodbConfig.tableName")
    UseCallerCredentials = jResp.IntOf("dataSources[i].dynamodbConfig.useCallerCredentials")
    Versioned = jResp.IntOf("dataSources[i].dynamodbConfig.versioned")
    elasticsearchConfigAwsRegion = jResp.StringOf("dataSources[i].elasticsearchConfig.awsRegion")
    Endpoint = jResp.StringOf("dataSources[i].elasticsearchConfig.endpoint")
    AuthorizationType = jResp.StringOf("dataSources[i].httpConfig.authorizationConfig.authorizationType")
    SigningRegion = jResp.StringOf("dataSources[i].httpConfig.authorizationConfig.awsIamConfig.signingRegion")
    SigningServiceName = jResp.StringOf("dataSources[i].httpConfig.authorizationConfig.awsIamConfig.signingServiceName")
    httpConfigEndpoint = jResp.StringOf("dataSources[i].httpConfig.endpoint")
    LambdaFunctionArn = jResp.StringOf("dataSources[i].lambdaConfig.lambdaFunctionArn")
    name = jResp.StringOf("dataSources[i].name")
    openSearchServiceConfigAwsRegion = jResp.StringOf("dataSources[i].openSearchServiceConfig.awsRegion")
    openSearchServiceConfigEndpoint = jResp.StringOf("dataSources[i].openSearchServiceConfig.endpoint")
    RdsHttpEndpointConfigAwsRegion = jResp.StringOf("dataSources[i].relationalDatabaseConfig.rdsHttpEndpointConfig.awsRegion")
    AwsSecretStoreArn = jResp.StringOf("dataSources[i].relationalDatabaseConfig.rdsHttpEndpointConfig.awsSecretStoreArn")
    DatabaseName = jResp.StringOf("dataSources[i].relationalDatabaseConfig.rdsHttpEndpointConfig.databaseName")
    DbClusterIdentifier = jResp.StringOf("dataSources[i].relationalDatabaseConfig.rdsHttpEndpointConfig.dbClusterIdentifier")
    Schema = jResp.StringOf("dataSources[i].relationalDatabaseConfig.rdsHttpEndpointConfig.schema")
    RelationalDatabaseSourceType = jResp.StringOf("dataSources[i].relationalDatabaseConfig.relationalDatabaseSourceType")
    serviceRoleArn = jResp.StringOf("dataSources[i].serviceRoleArn")
    v_type = jResp.StringOf("dataSources[i].type")
    i = i + 1
Loop

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

' {
'   "dataSources": [
'     {
'       "dataSourceArn": "string",
'       "description": "string",
'       "dynamodbConfig": {
'         "awsRegion": "string",
'         "deltaSyncConfig": {
'           "baseTableTTL": number,
'           "deltaSyncTableName": "string",
'           "deltaSyncTableTTL": number
'         },
'         "tableName": "string",
'         "useCallerCredentials": boolean,
'         "versioned": boolean
'       },
'       "elasticsearchConfig": {
'         "awsRegion": "string",
'         "endpoint": "string"
'       },
'       "httpConfig": {
'         "authorizationConfig": {
'           "authorizationType": "string",
'           "awsIamConfig": {
'             "signingRegion": "string",
'             "signingServiceName": "string"
'           }
'         },
'         "endpoint": "string"
'       },
'       "lambdaConfig": {
'         "lambdaFunctionArn": "string"
'       },
'       "name": "string",
'       "openSearchServiceConfig": {
'         "awsRegion": "string",
'         "endpoint": "string"
'       },
'       "relationalDatabaseConfig": {
'         "rdsHttpEndpointConfig": {
'           "awsRegion": "string",
'           "awsSecretStoreArn": "string",
'           "databaseName": "string",
'           "dbClusterIdentifier": "string",
'           "schema": "string"
'         },
'         "relationalDatabaseSourceType": "string"
'       },
'       "serviceRoleArn": "string",
'       "type": "string"
'     }
'   ],
'   "nextToken": "string"
' }

%>
</body>
</html>