UpdateDestination VB6 Example
' This example requires the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.
Dim rest As New ChilkatRest
Dim success As Long
Dim authAws As New ChilkatAuthAws
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 = "firehose"
' SetAuthAws causes Chilkat to automatically add the following headers: Authorization, X-Amz-Date
success = rest.SetAuthAws(authAws)
' URL: https://firehose.us-west-2.amazonaws.com/
' Use the same region as specified above.
success = rest.Connect("firehose.us-west-2.amazonaws.com",443,1,1)
If (success <> 1) Then
Debug.Print "ConnectFailReason: " & rest.ConnectFailReason
Debug.Print rest.LastErrorText
Exit Sub
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
Dim json As New ChilkatJsonObject
success = json.UpdateInt("AmazonopensearchserviceDestinationUpdate.BufferingHints.IntervalInSeconds",123)
success = json.UpdateInt("AmazonopensearchserviceDestinationUpdate.BufferingHints.SizeInMBs",123)
success = json.UpdateInt("AmazonopensearchserviceDestinationUpdate.CloudWatchLoggingOptions.Enabled",123)
success = json.UpdateString("AmazonopensearchserviceDestinationUpdate.CloudWatchLoggingOptions.LogGroupName","string")
success = json.UpdateString("AmazonopensearchserviceDestinationUpdate.CloudWatchLoggingOptions.LogStreamName","string")
success = json.UpdateString("AmazonopensearchserviceDestinationUpdate.ClusterEndpoint","string")
success = json.UpdateString("AmazonopensearchserviceDestinationUpdate.DomainARN","string")
success = json.UpdateString("AmazonopensearchserviceDestinationUpdate.IndexName","string")
success = json.UpdateString("AmazonopensearchserviceDestinationUpdate.IndexRotationPeriod","string")
success = json.UpdateInt("AmazonopensearchserviceDestinationUpdate.ProcessingConfiguration.Enabled",123)
success = json.UpdateString("AmazonopensearchserviceDestinationUpdate.ProcessingConfiguration.Processors[0].Parameters[0].ParameterName","string")
success = json.UpdateString("AmazonopensearchserviceDestinationUpdate.ProcessingConfiguration.Processors[0].Parameters[0].ParameterValue","string")
success = json.UpdateString("AmazonopensearchserviceDestinationUpdate.ProcessingConfiguration.Processors[0].Type","string")
success = json.UpdateInt("AmazonopensearchserviceDestinationUpdate.RetryOptions.DurationInSeconds",123)
success = json.UpdateString("AmazonopensearchserviceDestinationUpdate.RoleARN","string")
success = json.UpdateString("AmazonopensearchserviceDestinationUpdate.S3Update.BucketARN","string")
success = json.UpdateInt("AmazonopensearchserviceDestinationUpdate.S3Update.BufferingHints.IntervalInSeconds",123)
success = json.UpdateInt("AmazonopensearchserviceDestinationUpdate.S3Update.BufferingHints.SizeInMBs",123)
success = json.UpdateInt("AmazonopensearchserviceDestinationUpdate.S3Update.CloudWatchLoggingOptions.Enabled",123)
success = json.UpdateString("AmazonopensearchserviceDestinationUpdate.S3Update.CloudWatchLoggingOptions.LogGroupName","string")
success = json.UpdateString("AmazonopensearchserviceDestinationUpdate.S3Update.CloudWatchLoggingOptions.LogStreamName","string")
success = json.UpdateString("AmazonopensearchserviceDestinationUpdate.S3Update.CompressionFormat","string")
success = json.UpdateString("AmazonopensearchserviceDestinationUpdate.S3Update.EncryptionConfiguration.KMSEncryptionConfig.AWSKMSKeyARN","string")
success = json.UpdateString("AmazonopensearchserviceDestinationUpdate.S3Update.EncryptionConfiguration.NoEncryptionConfig","string")
success = json.UpdateString("AmazonopensearchserviceDestinationUpdate.S3Update.ErrorOutputPrefix","string")
success = json.UpdateString("AmazonopensearchserviceDestinationUpdate.S3Update.Prefix","string")
success = json.UpdateString("AmazonopensearchserviceDestinationUpdate.S3Update.RoleARN","string")
success = json.UpdateString("AmazonopensearchserviceDestinationUpdate.TypeName","string")
success = json.UpdateString("CurrentDeliveryStreamVersionId","string")
success = json.UpdateString("DeliveryStreamName","string")
success = json.UpdateString("DestinationId","string")
success = json.UpdateInt("ElasticsearchDestinationUpdate.BufferingHints.IntervalInSeconds",123)
success = json.UpdateInt("ElasticsearchDestinationUpdate.BufferingHints.SizeInMBs",123)
success = json.UpdateInt("ElasticsearchDestinationUpdate.CloudWatchLoggingOptions.Enabled",123)
success = json.UpdateString("ElasticsearchDestinationUpdate.CloudWatchLoggingOptions.LogGroupName","string")
success = json.UpdateString("ElasticsearchDestinationUpdate.CloudWatchLoggingOptions.LogStreamName","string")
success = json.UpdateString("ElasticsearchDestinationUpdate.ClusterEndpoint","string")
success = json.UpdateString("ElasticsearchDestinationUpdate.DomainARN","string")
success = json.UpdateString("ElasticsearchDestinationUpdate.IndexName","string")
success = json.UpdateString("ElasticsearchDestinationUpdate.IndexRotationPeriod","string")
success = json.UpdateInt("ElasticsearchDestinationUpdate.ProcessingConfiguration.Enabled",123)
success = json.UpdateString("ElasticsearchDestinationUpdate.ProcessingConfiguration.Processors[0].Parameters[0].ParameterName","string")
success = json.UpdateString("ElasticsearchDestinationUpdate.ProcessingConfiguration.Processors[0].Parameters[0].ParameterValue","string")
success = json.UpdateString("ElasticsearchDestinationUpdate.ProcessingConfiguration.Processors[0].Type","string")
success = json.UpdateInt("ElasticsearchDestinationUpdate.RetryOptions.DurationInSeconds",123)
success = json.UpdateString("ElasticsearchDestinationUpdate.RoleARN","string")
success = json.UpdateString("ElasticsearchDestinationUpdate.S3Update.BucketARN","string")
success = json.UpdateInt("ElasticsearchDestinationUpdate.S3Update.BufferingHints.IntervalInSeconds",123)
success = json.UpdateInt("ElasticsearchDestinationUpdate.S3Update.BufferingHints.SizeInMBs",123)
success = json.UpdateInt("ElasticsearchDestinationUpdate.S3Update.CloudWatchLoggingOptions.Enabled",123)
success = json.UpdateString("ElasticsearchDestinationUpdate.S3Update.CloudWatchLoggingOptions.LogGroupName","string")
success = json.UpdateString("ElasticsearchDestinationUpdate.S3Update.CloudWatchLoggingOptions.LogStreamName","string")
success = json.UpdateString("ElasticsearchDestinationUpdate.S3Update.CompressionFormat","string")
success = json.UpdateString("ElasticsearchDestinationUpdate.S3Update.EncryptionConfiguration.KMSEncryptionConfig.AWSKMSKeyARN","string")
success = json.UpdateString("ElasticsearchDestinationUpdate.S3Update.EncryptionConfiguration.NoEncryptionConfig","string")
success = json.UpdateString("ElasticsearchDestinationUpdate.S3Update.ErrorOutputPrefix","string")
success = json.UpdateString("ElasticsearchDestinationUpdate.S3Update.Prefix","string")
success = json.UpdateString("ElasticsearchDestinationUpdate.S3Update.RoleARN","string")
success = json.UpdateString("ElasticsearchDestinationUpdate.TypeName","string")
success = json.UpdateString("ExtendedS3DestinationUpdate.BucketARN","string")
success = json.UpdateInt("ExtendedS3DestinationUpdate.BufferingHints.IntervalInSeconds",123)
success = json.UpdateInt("ExtendedS3DestinationUpdate.BufferingHints.SizeInMBs",123)
success = json.UpdateInt("ExtendedS3DestinationUpdate.CloudWatchLoggingOptions.Enabled",123)
success = json.UpdateString("ExtendedS3DestinationUpdate.CloudWatchLoggingOptions.LogGroupName","string")
success = json.UpdateString("ExtendedS3DestinationUpdate.CloudWatchLoggingOptions.LogStreamName","string")
success = json.UpdateString("ExtendedS3DestinationUpdate.CompressionFormat","string")
success = json.UpdateInt("ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.Enabled",123)
success = json.UpdateString("ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.InputFormatConfiguration.Deserializer.HiveJsonSerDe.TimestampFormats[0]","string")
success = json.UpdateInt("ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.InputFormatConfiguration.Deserializer.OpenXJsonSerDe.CaseInsensitive",123)
success = json.UpdateString("ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.InputFormatConfiguration.Deserializer.OpenXJsonSerDe.ColumnToJsonKeyMappings.string","string")
success = json.UpdateInt("ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.InputFormatConfiguration.Deserializer.OpenXJsonSerDe.ConvertDotsInJsonKeysToUnderscores",123)
success = json.UpdateInt("ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.BlockSizeBytes",123)
success = json.UpdateString("ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.BloomFilterColumns[0]","string")
success = json.UpdateInt("ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.BloomFilterFalsePositiveProbability",123)
success = json.UpdateString("ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.Compression","string")
success = json.UpdateInt("ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.DictionaryKeyThreshold",123)
success = json.UpdateInt("ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.EnablePadding",123)
success = json.UpdateString("ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.FormatVersion","string")
success = json.UpdateInt("ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.PaddingTolerance",123)
success = json.UpdateInt("ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.RowIndexStride",123)
success = json.UpdateInt("ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.StripeSizeBytes",123)
success = json.UpdateInt("ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.ParquetSerDe.BlockSizeBytes",123)
success = json.UpdateString("ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.ParquetSerDe.Compression","string")
success = json.UpdateInt("ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.ParquetSerDe.EnableDictionaryCompression",123)
success = json.UpdateInt("ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.ParquetSerDe.MaxPaddingBytes",123)
success = json.UpdateInt("ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.ParquetSerDe.PageSizeBytes",123)
success = json.UpdateString("ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.ParquetSerDe.WriterVersion","string")
success = json.UpdateString("ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.SchemaConfiguration.CatalogId","string")
success = json.UpdateString("ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.SchemaConfiguration.DatabaseName","string")
success = json.UpdateString("ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.SchemaConfiguration.Region","string")
success = json.UpdateString("ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.SchemaConfiguration.RoleARN","string")
success = json.UpdateString("ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.SchemaConfiguration.TableName","string")
success = json.UpdateString("ExtendedS3DestinationUpdate.DataFormatConversionConfiguration.SchemaConfiguration.VersionId","string")
success = json.UpdateInt("ExtendedS3DestinationUpdate.DynamicPartitioningConfiguration.Enabled",123)
success = json.UpdateInt("ExtendedS3DestinationUpdate.DynamicPartitioningConfiguration.RetryOptions.DurationInSeconds",123)
success = json.UpdateString("ExtendedS3DestinationUpdate.EncryptionConfiguration.KMSEncryptionConfig.AWSKMSKeyARN","string")
success = json.UpdateString("ExtendedS3DestinationUpdate.EncryptionConfiguration.NoEncryptionConfig","string")
success = json.UpdateString("ExtendedS3DestinationUpdate.ErrorOutputPrefix","string")
success = json.UpdateString("ExtendedS3DestinationUpdate.Prefix","string")
success = json.UpdateInt("ExtendedS3DestinationUpdate.ProcessingConfiguration.Enabled",123)
success = json.UpdateString("ExtendedS3DestinationUpdate.ProcessingConfiguration.Processors[0].Parameters[0].ParameterName","string")
success = json.UpdateString("ExtendedS3DestinationUpdate.ProcessingConfiguration.Processors[0].Parameters[0].ParameterValue","string")
success = json.UpdateString("ExtendedS3DestinationUpdate.ProcessingConfiguration.Processors[0].Type","string")
success = json.UpdateString("ExtendedS3DestinationUpdate.RoleARN","string")
success = json.UpdateString("ExtendedS3DestinationUpdate.S3BackupMode","string")
success = json.UpdateString("ExtendedS3DestinationUpdate.S3BackupUpdate.BucketARN","string")
success = json.UpdateInt("ExtendedS3DestinationUpdate.S3BackupUpdate.BufferingHints.IntervalInSeconds",123)
success = json.UpdateInt("ExtendedS3DestinationUpdate.S3BackupUpdate.BufferingHints.SizeInMBs",123)
success = json.UpdateInt("ExtendedS3DestinationUpdate.S3BackupUpdate.CloudWatchLoggingOptions.Enabled",123)
success = json.UpdateString("ExtendedS3DestinationUpdate.S3BackupUpdate.CloudWatchLoggingOptions.LogGroupName","string")
success = json.UpdateString("ExtendedS3DestinationUpdate.S3BackupUpdate.CloudWatchLoggingOptions.LogStreamName","string")
success = json.UpdateString("ExtendedS3DestinationUpdate.S3BackupUpdate.CompressionFormat","string")
success = json.UpdateString("ExtendedS3DestinationUpdate.S3BackupUpdate.EncryptionConfiguration.KMSEncryptionConfig.AWSKMSKeyARN","string")
success = json.UpdateString("ExtendedS3DestinationUpdate.S3BackupUpdate.EncryptionConfiguration.NoEncryptionConfig","string")
success = json.UpdateString("ExtendedS3DestinationUpdate.S3BackupUpdate.ErrorOutputPrefix","string")
success = json.UpdateString("ExtendedS3DestinationUpdate.S3BackupUpdate.Prefix","string")
success = json.UpdateString("ExtendedS3DestinationUpdate.S3BackupUpdate.RoleARN","string")
success = json.UpdateInt("HttpEndpointDestinationUpdate.BufferingHints.IntervalInSeconds",123)
success = json.UpdateInt("HttpEndpointDestinationUpdate.BufferingHints.SizeInMBs",123)
success = json.UpdateInt("HttpEndpointDestinationUpdate.CloudWatchLoggingOptions.Enabled",123)
success = json.UpdateString("HttpEndpointDestinationUpdate.CloudWatchLoggingOptions.LogGroupName","string")
success = json.UpdateString("HttpEndpointDestinationUpdate.CloudWatchLoggingOptions.LogStreamName","string")
success = json.UpdateString("HttpEndpointDestinationUpdate.EndpointConfiguration.AccessKey","string")
success = json.UpdateString("HttpEndpointDestinationUpdate.EndpointConfiguration.Name","string")
success = json.UpdateString("HttpEndpointDestinationUpdate.EndpointConfiguration.Url","string")
success = json.UpdateInt("HttpEndpointDestinationUpdate.ProcessingConfiguration.Enabled",123)
success = json.UpdateString("HttpEndpointDestinationUpdate.ProcessingConfiguration.Processors[0].Parameters[0].ParameterName","string")
success = json.UpdateString("HttpEndpointDestinationUpdate.ProcessingConfiguration.Processors[0].Parameters[0].ParameterValue","string")
success = json.UpdateString("HttpEndpointDestinationUpdate.ProcessingConfiguration.Processors[0].Type","string")
success = json.UpdateString("HttpEndpointDestinationUpdate.RequestConfiguration.CommonAttributes[0].AttributeName","string")
success = json.UpdateString("HttpEndpointDestinationUpdate.RequestConfiguration.CommonAttributes[0].AttributeValue","string")
success = json.UpdateString("HttpEndpointDestinationUpdate.RequestConfiguration.ContentEncoding","string")
success = json.UpdateInt("HttpEndpointDestinationUpdate.RetryOptions.DurationInSeconds",123)
success = json.UpdateString("HttpEndpointDestinationUpdate.RoleARN","string")
success = json.UpdateString("HttpEndpointDestinationUpdate.S3BackupMode","string")
success = json.UpdateString("HttpEndpointDestinationUpdate.S3Update.BucketARN","string")
success = json.UpdateInt("HttpEndpointDestinationUpdate.S3Update.BufferingHints.IntervalInSeconds",123)
success = json.UpdateInt("HttpEndpointDestinationUpdate.S3Update.BufferingHints.SizeInMBs",123)
success = json.UpdateInt("HttpEndpointDestinationUpdate.S3Update.CloudWatchLoggingOptions.Enabled",123)
success = json.UpdateString("HttpEndpointDestinationUpdate.S3Update.CloudWatchLoggingOptions.LogGroupName","string")
success = json.UpdateString("HttpEndpointDestinationUpdate.S3Update.CloudWatchLoggingOptions.LogStreamName","string")
success = json.UpdateString("HttpEndpointDestinationUpdate.S3Update.CompressionFormat","string")
success = json.UpdateString("HttpEndpointDestinationUpdate.S3Update.EncryptionConfiguration.KMSEncryptionConfig.AWSKMSKeyARN","string")
success = json.UpdateString("HttpEndpointDestinationUpdate.S3Update.EncryptionConfiguration.NoEncryptionConfig","string")
success = json.UpdateString("HttpEndpointDestinationUpdate.S3Update.ErrorOutputPrefix","string")
success = json.UpdateString("HttpEndpointDestinationUpdate.S3Update.Prefix","string")
success = json.UpdateString("HttpEndpointDestinationUpdate.S3Update.RoleARN","string")
success = json.UpdateInt("RedshiftDestinationUpdate.CloudWatchLoggingOptions.Enabled",123)
success = json.UpdateString("RedshiftDestinationUpdate.CloudWatchLoggingOptions.LogGroupName","string")
success = json.UpdateString("RedshiftDestinationUpdate.CloudWatchLoggingOptions.LogStreamName","string")
success = json.UpdateString("RedshiftDestinationUpdate.ClusterJDBCURL","string")
success = json.UpdateString("RedshiftDestinationUpdate.CopyCommand.CopyOptions","string")
success = json.UpdateString("RedshiftDestinationUpdate.CopyCommand.DataTableColumns","string")
success = json.UpdateString("RedshiftDestinationUpdate.CopyCommand.DataTableName","string")
success = json.UpdateString("RedshiftDestinationUpdate.Password","string")
success = json.UpdateInt("RedshiftDestinationUpdate.ProcessingConfiguration.Enabled",123)
success = json.UpdateString("RedshiftDestinationUpdate.ProcessingConfiguration.Processors[0].Parameters[0].ParameterName","string")
success = json.UpdateString("RedshiftDestinationUpdate.ProcessingConfiguration.Processors[0].Parameters[0].ParameterValue","string")
success = json.UpdateString("RedshiftDestinationUpdate.ProcessingConfiguration.Processors[0].Type","string")
success = json.UpdateInt("RedshiftDestinationUpdate.RetryOptions.DurationInSeconds",123)
success = json.UpdateString("RedshiftDestinationUpdate.RoleARN","string")
success = json.UpdateString("RedshiftDestinationUpdate.S3BackupMode","string")
success = json.UpdateString("RedshiftDestinationUpdate.S3BackupUpdate.BucketARN","string")
success = json.UpdateInt("RedshiftDestinationUpdate.S3BackupUpdate.BufferingHints.IntervalInSeconds",123)
success = json.UpdateInt("RedshiftDestinationUpdate.S3BackupUpdate.BufferingHints.SizeInMBs",123)
success = json.UpdateInt("RedshiftDestinationUpdate.S3BackupUpdate.CloudWatchLoggingOptions.Enabled",123)
success = json.UpdateString("RedshiftDestinationUpdate.S3BackupUpdate.CloudWatchLoggingOptions.LogGroupName","string")
success = json.UpdateString("RedshiftDestinationUpdate.S3BackupUpdate.CloudWatchLoggingOptions.LogStreamName","string")
success = json.UpdateString("RedshiftDestinationUpdate.S3BackupUpdate.CompressionFormat","string")
success = json.UpdateString("RedshiftDestinationUpdate.S3BackupUpdate.EncryptionConfiguration.KMSEncryptionConfig.AWSKMSKeyARN","string")
success = json.UpdateString("RedshiftDestinationUpdate.S3BackupUpdate.EncryptionConfiguration.NoEncryptionConfig","string")
success = json.UpdateString("RedshiftDestinationUpdate.S3BackupUpdate.ErrorOutputPrefix","string")
success = json.UpdateString("RedshiftDestinationUpdate.S3BackupUpdate.Prefix","string")
success = json.UpdateString("RedshiftDestinationUpdate.S3BackupUpdate.RoleARN","string")
success = json.UpdateString("RedshiftDestinationUpdate.S3Update.BucketARN","string")
success = json.UpdateInt("RedshiftDestinationUpdate.S3Update.BufferingHints.IntervalInSeconds",123)
success = json.UpdateInt("RedshiftDestinationUpdate.S3Update.BufferingHints.SizeInMBs",123)
success = json.UpdateInt("RedshiftDestinationUpdate.S3Update.CloudWatchLoggingOptions.Enabled",123)
success = json.UpdateString("RedshiftDestinationUpdate.S3Update.CloudWatchLoggingOptions.LogGroupName","string")
success = json.UpdateString("RedshiftDestinationUpdate.S3Update.CloudWatchLoggingOptions.LogStreamName","string")
success = json.UpdateString("RedshiftDestinationUpdate.S3Update.CompressionFormat","string")
success = json.UpdateString("RedshiftDestinationUpdate.S3Update.EncryptionConfiguration.KMSEncryptionConfig.AWSKMSKeyARN","string")
success = json.UpdateString("RedshiftDestinationUpdate.S3Update.EncryptionConfiguration.NoEncryptionConfig","string")
success = json.UpdateString("RedshiftDestinationUpdate.S3Update.ErrorOutputPrefix","string")
success = json.UpdateString("RedshiftDestinationUpdate.S3Update.Prefix","string")
success = json.UpdateString("RedshiftDestinationUpdate.S3Update.RoleARN","string")
success = json.UpdateString("RedshiftDestinationUpdate.Username","string")
success = json.UpdateString("S3DestinationUpdate.BucketARN","string")
success = json.UpdateInt("S3DestinationUpdate.BufferingHints.IntervalInSeconds",123)
success = json.UpdateInt("S3DestinationUpdate.BufferingHints.SizeInMBs",123)
success = json.UpdateInt("S3DestinationUpdate.CloudWatchLoggingOptions.Enabled",123)
success = json.UpdateString("S3DestinationUpdate.CloudWatchLoggingOptions.LogGroupName","string")
success = json.UpdateString("S3DestinationUpdate.CloudWatchLoggingOptions.LogStreamName","string")
success = json.UpdateString("S3DestinationUpdate.CompressionFormat","string")
success = json.UpdateString("S3DestinationUpdate.EncryptionConfiguration.KMSEncryptionConfig.AWSKMSKeyARN","string")
success = json.UpdateString("S3DestinationUpdate.EncryptionConfiguration.NoEncryptionConfig","string")
success = json.UpdateString("S3DestinationUpdate.ErrorOutputPrefix","string")
success = json.UpdateString("S3DestinationUpdate.Prefix","string")
success = json.UpdateString("S3DestinationUpdate.RoleARN","string")
success = json.UpdateInt("SplunkDestinationUpdate.CloudWatchLoggingOptions.Enabled",123)
success = json.UpdateString("SplunkDestinationUpdate.CloudWatchLoggingOptions.LogGroupName","string")
success = json.UpdateString("SplunkDestinationUpdate.CloudWatchLoggingOptions.LogStreamName","string")
success = json.UpdateInt("SplunkDestinationUpdate.HECAcknowledgmentTimeoutInSeconds",123)
success = json.UpdateString("SplunkDestinationUpdate.HECEndpoint","string")
success = json.UpdateString("SplunkDestinationUpdate.HECEndpointType","string")
success = json.UpdateString("SplunkDestinationUpdate.HECToken","string")
success = json.UpdateInt("SplunkDestinationUpdate.ProcessingConfiguration.Enabled",123)
success = json.UpdateString("SplunkDestinationUpdate.ProcessingConfiguration.Processors[0].Parameters[0].ParameterName","string")
success = json.UpdateString("SplunkDestinationUpdate.ProcessingConfiguration.Processors[0].Parameters[0].ParameterValue","string")
success = json.UpdateString("SplunkDestinationUpdate.ProcessingConfiguration.Processors[0].Type","string")
success = json.UpdateInt("SplunkDestinationUpdate.RetryOptions.DurationInSeconds",123)
success = json.UpdateString("SplunkDestinationUpdate.S3BackupMode","string")
success = json.UpdateString("SplunkDestinationUpdate.S3Update.BucketARN","string")
success = json.UpdateInt("SplunkDestinationUpdate.S3Update.BufferingHints.IntervalInSeconds",123)
success = json.UpdateInt("SplunkDestinationUpdate.S3Update.BufferingHints.SizeInMBs",123)
success = json.UpdateInt("SplunkDestinationUpdate.S3Update.CloudWatchLoggingOptions.Enabled",123)
success = json.UpdateString("SplunkDestinationUpdate.S3Update.CloudWatchLoggingOptions.LogGroupName","string")
success = json.UpdateString("SplunkDestinationUpdate.S3Update.CloudWatchLoggingOptions.LogStreamName","string")
success = json.UpdateString("SplunkDestinationUpdate.S3Update.CompressionFormat","string")
success = json.UpdateString("SplunkDestinationUpdate.S3Update.EncryptionConfiguration.KMSEncryptionConfig.AWSKMSKeyARN","string")
success = json.UpdateString("SplunkDestinationUpdate.S3Update.EncryptionConfiguration.NoEncryptionConfig","string")
success = json.UpdateString("SplunkDestinationUpdate.S3Update.ErrorOutputPrefix","string")
success = json.UpdateString("SplunkDestinationUpdate.S3Update.Prefix","string")
success = json.UpdateString("SplunkDestinationUpdate.S3Update.RoleARN","string")
' The JSON request body created by the above code:
' {
' "AmazonopensearchserviceDestinationUpdate": {
' "BufferingHints": {
' "IntervalInSeconds": number,
' "SizeInMBs": number
' },
' "CloudWatchLoggingOptions": {
' "Enabled": boolean,
' "LogGroupName": "string",
' "LogStreamName": "string"
' },
' "ClusterEndpoint": "string",
' "DomainARN": "string",
' "IndexName": "string",
' "IndexRotationPeriod": "string",
' "ProcessingConfiguration": {
' "Enabled": boolean,
' "Processors": [
' {
' "Parameters": [
' {
' "ParameterName": "string",
' "ParameterValue": "string"
' }
' ],
' "Type": "string"
' }
' ]
' },
' "RetryOptions": {
' "DurationInSeconds": number
' },
' "RoleARN": "string",
' "S3Update": {
' "BucketARN": "string",
' "BufferingHints": {
' "IntervalInSeconds": number,
' "SizeInMBs": number
' },
' "CloudWatchLoggingOptions": {
' "Enabled": boolean,
' "LogGroupName": "string",
' "LogStreamName": "string"
' },
' "CompressionFormat": "string",
' "EncryptionConfiguration": {
' "KMSEncryptionConfig": {
' "AWSKMSKeyARN": "string"
' },
' "NoEncryptionConfig": "string"
' },
' "ErrorOutputPrefix": "string",
' "Prefix": "string",
' "RoleARN": "string"
' },
' "TypeName": "string"
' },
' "CurrentDeliveryStreamVersionId": "string",
' "DeliveryStreamName": "string",
' "DestinationId": "string",
' "ElasticsearchDestinationUpdate": {
' "BufferingHints": {
' "IntervalInSeconds": number,
' "SizeInMBs": number
' },
' "CloudWatchLoggingOptions": {
' "Enabled": boolean,
' "LogGroupName": "string",
' "LogStreamName": "string"
' },
' "ClusterEndpoint": "string",
' "DomainARN": "string",
' "IndexName": "string",
' "IndexRotationPeriod": "string",
' "ProcessingConfiguration": {
' "Enabled": boolean,
' "Processors": [
' {
' "Parameters": [
' {
' "ParameterName": "string",
' "ParameterValue": "string"
' }
' ],
' "Type": "string"
' }
' ]
' },
' "RetryOptions": {
' "DurationInSeconds": number
' },
' "RoleARN": "string",
' "S3Update": {
' "BucketARN": "string",
' "BufferingHints": {
' "IntervalInSeconds": number,
' "SizeInMBs": number
' },
' "CloudWatchLoggingOptions": {
' "Enabled": boolean,
' "LogGroupName": "string",
' "LogStreamName": "string"
' },
' "CompressionFormat": "string",
' "EncryptionConfiguration": {
' "KMSEncryptionConfig": {
' "AWSKMSKeyARN": "string"
' },
' "NoEncryptionConfig": "string"
' },
' "ErrorOutputPrefix": "string",
' "Prefix": "string",
' "RoleARN": "string"
' },
' "TypeName": "string"
' },
' "ExtendedS3DestinationUpdate": {
' "BucketARN": "string",
' "BufferingHints": {
' "IntervalInSeconds": number,
' "SizeInMBs": number
' },
' "CloudWatchLoggingOptions": {
' "Enabled": boolean,
' "LogGroupName": "string",
' "LogStreamName": "string"
' },
' "CompressionFormat": "string",
' "DataFormatConversionConfiguration": {
' "Enabled": boolean,
' "InputFormatConfiguration": {
' "Deserializer": {
' "HiveJsonSerDe": {
' "TimestampFormats": [
' "string"
' ]
' },
' "OpenXJsonSerDe": {
' "CaseInsensitive": boolean,
' "ColumnToJsonKeyMappings": {
' "string": "string"
' },
' "ConvertDotsInJsonKeysToUnderscores": boolean
' }
' }
' },
' "OutputFormatConfiguration": {
' "Serializer": {
' "OrcSerDe": {
' "BlockSizeBytes": number,
' "BloomFilterColumns": [
' "string"
' ],
' "BloomFilterFalsePositiveProbability": number,
' "Compression": "string",
' "DictionaryKeyThreshold": number,
' "EnablePadding": boolean,
' "FormatVersion": "string",
' "PaddingTolerance": number,
' "RowIndexStride": number,
' "StripeSizeBytes": number
' },
' "ParquetSerDe": {
' "BlockSizeBytes": number,
' "Compression": "string",
' "EnableDictionaryCompression": boolean,
' "MaxPaddingBytes": number,
' "PageSizeBytes": number,
' "WriterVersion": "string"
' }
' }
' },
' "SchemaConfiguration": {
' "CatalogId": "string",
' "DatabaseName": "string",
' "Region": "string",
' "RoleARN": "string",
' "TableName": "string",
' "VersionId": "string"
' }
' },
' "DynamicPartitioningConfiguration": {
' "Enabled": boolean,
' "RetryOptions": {
' "DurationInSeconds": number
' }
' },
' "EncryptionConfiguration": {
' "KMSEncryptionConfig": {
' "AWSKMSKeyARN": "string"
' },
' "NoEncryptionConfig": "string"
' },
' "ErrorOutputPrefix": "string",
' "Prefix": "string",
' "ProcessingConfiguration": {
' "Enabled": boolean,
' "Processors": [
' {
' "Parameters": [
' {
' "ParameterName": "string",
' "ParameterValue": "string"
' }
' ],
' "Type": "string"
' }
' ]
' },
' "RoleARN": "string",
' "S3BackupMode": "string",
' "S3BackupUpdate": {
' "BucketARN": "string",
' "BufferingHints": {
' "IntervalInSeconds": number,
' "SizeInMBs": number
' },
' "CloudWatchLoggingOptions": {
' "Enabled": boolean,
' "LogGroupName": "string",
' "LogStreamName": "string"
' },
' "CompressionFormat": "string",
' "EncryptionConfiguration": {
' "KMSEncryptionConfig": {
' "AWSKMSKeyARN": "string"
' },
' "NoEncryptionConfig": "string"
' },
' "ErrorOutputPrefix": "string",
' "Prefix": "string",
' "RoleARN": "string"
' }
' },
' "HttpEndpointDestinationUpdate": {
' "BufferingHints": {
' "IntervalInSeconds": number,
' "SizeInMBs": number
' },
' "CloudWatchLoggingOptions": {
' "Enabled": boolean,
' "LogGroupName": "string",
' "LogStreamName": "string"
' },
' "EndpointConfiguration": {
' "AccessKey": "string",
' "Name": "string",
' "Url": "string"
' },
' "ProcessingConfiguration": {
' "Enabled": boolean,
' "Processors": [
' {
' "Parameters": [
' {
' "ParameterName": "string",
' "ParameterValue": "string"
' }
' ],
' "Type": "string"
' }
' ]
' },
' "RequestConfiguration": {
' "CommonAttributes": [
' {
' "AttributeName": "string",
' "AttributeValue": "string"
' }
' ],
' "ContentEncoding": "string"
' },
' "RetryOptions": {
' "DurationInSeconds": number
' },
' "RoleARN": "string",
' "S3BackupMode": "string",
' "S3Update": {
' "BucketARN": "string",
' "BufferingHints": {
' "IntervalInSeconds": number,
' "SizeInMBs": number
' },
' "CloudWatchLoggingOptions": {
' "Enabled": boolean,
' "LogGroupName": "string",
' "LogStreamName": "string"
' },
' "CompressionFormat": "string",
' "EncryptionConfiguration": {
' "KMSEncryptionConfig": {
' "AWSKMSKeyARN": "string"
' },
' "NoEncryptionConfig": "string"
' },
' "ErrorOutputPrefix": "string",
' "Prefix": "string",
' "RoleARN": "string"
' }
' },
' "RedshiftDestinationUpdate": {
' "CloudWatchLoggingOptions": {
' "Enabled": boolean,
' "LogGroupName": "string",
' "LogStreamName": "string"
' },
' "ClusterJDBCURL": "string",
' "CopyCommand": {
' "CopyOptions": "string",
' "DataTableColumns": "string",
' "DataTableName": "string"
' },
' "Password": "string",
' "ProcessingConfiguration": {
' "Enabled": boolean,
' "Processors": [
' {
' "Parameters": [
' {
' "ParameterName": "string",
' "ParameterValue": "string"
' }
' ],
' "Type": "string"
' }
' ]
' },
' "RetryOptions": {
' "DurationInSeconds": number
' },
' "RoleARN": "string",
' "S3BackupMode": "string",
' "S3BackupUpdate": {
' "BucketARN": "string",
' "BufferingHints": {
' "IntervalInSeconds": number,
' "SizeInMBs": number
' },
' "CloudWatchLoggingOptions": {
' "Enabled": boolean,
' "LogGroupName": "string",
' "LogStreamName": "string"
' },
' "CompressionFormat": "string",
' "EncryptionConfiguration": {
' "KMSEncryptionConfig": {
' "AWSKMSKeyARN": "string"
' },
' "NoEncryptionConfig": "string"
' },
' "ErrorOutputPrefix": "string",
' "Prefix": "string",
' "RoleARN": "string"
' },
' "S3Update": {
' "BucketARN": "string",
' "BufferingHints": {
' "IntervalInSeconds": number,
' "SizeInMBs": number
' },
' "CloudWatchLoggingOptions": {
' "Enabled": boolean,
' "LogGroupName": "string",
' "LogStreamName": "string"
' },
' "CompressionFormat": "string",
' "EncryptionConfiguration": {
' "KMSEncryptionConfig": {
' "AWSKMSKeyARN": "string"
' },
' "NoEncryptionConfig": "string"
' },
' "ErrorOutputPrefix": "string",
' "Prefix": "string",
' "RoleARN": "string"
' },
' "Username": "string"
' },
' "S3DestinationUpdate": {
' "BucketARN": "string",
' "BufferingHints": {
' "IntervalInSeconds": number,
' "SizeInMBs": number
' },
' "CloudWatchLoggingOptions": {
' "Enabled": boolean,
' "LogGroupName": "string",
' "LogStreamName": "string"
' },
' "CompressionFormat": "string",
' "EncryptionConfiguration": {
' "KMSEncryptionConfig": {
' "AWSKMSKeyARN": "string"
' },
' "NoEncryptionConfig": "string"
' },
' "ErrorOutputPrefix": "string",
' "Prefix": "string",
' "RoleARN": "string"
' },
' "SplunkDestinationUpdate": {
' "CloudWatchLoggingOptions": {
' "Enabled": boolean,
' "LogGroupName": "string",
' "LogStreamName": "string"
' },
' "HECAcknowledgmentTimeoutInSeconds": number,
' "HECEndpoint": "string",
' "HECEndpointType": "string",
' "HECToken": "string",
' "ProcessingConfiguration": {
' "Enabled": boolean,
' "Processors": [
' {
' "Parameters": [
' {
' "ParameterName": "string",
' "ParameterValue": "string"
' }
' ],
' "Type": "string"
' }
' ]
' },
' "RetryOptions": {
' "DurationInSeconds": number
' },
' "S3BackupMode": "string",
' "S3Update": {
' "BucketARN": "string",
' "BufferingHints": {
' "IntervalInSeconds": number,
' "SizeInMBs": number
' },
' "CloudWatchLoggingOptions": {
' "Enabled": boolean,
' "LogGroupName": "string",
' "LogStreamName": "string"
' },
' "CompressionFormat": "string",
' "EncryptionConfiguration": {
' "KMSEncryptionConfig": {
' "AWSKMSKeyARN": "string"
' },
' "NoEncryptionConfig": "string"
' },
' "ErrorOutputPrefix": "string",
' "Prefix": "string",
' "RoleARN": "string"
' }
' }
' }
success = rest.AddHeader("Content-Type","application/x-amz-json-1.1")
success = rest.AddHeader("X-Amz-Target","Firehose_20150804.UpdateDestination")
Dim sbRequestBody As New ChilkatStringBuilder
success = json.EmitSb(sbRequestBody)
Dim sbResponseBody As New ChilkatStringBuilder
success = rest.FullRequestSb("POST","/",sbRequestBody,sbResponseBody)
If (success <> 1) Then
Debug.Print rest.LastErrorText
Exit Sub
End If
Dim respStatusCode As Long
respStatusCode = rest.ResponseStatusCode
Debug.Print "response status code = " & respStatusCode
If (respStatusCode <> 200) Then
Debug.Print "Response Header:"
Debug.Print rest.ResponseHeader
Debug.Print "Response Body:"
Debug.Print sbResponseBody.GetAsString()
Exit Sub
End If
' If the action is successful, the service sends back an HTTP 200 response with an empty HTTP body.