CreateDeliveryStream 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("AmazonopensearchserviceDestinationConfiguration.BufferingHints.IntervalInSeconds",123)
success = json.UpdateInt("AmazonopensearchserviceDestinationConfiguration.BufferingHints.SizeInMBs",123)
success = json.UpdateInt("AmazonopensearchserviceDestinationConfiguration.CloudWatchLoggingOptions.Enabled",123)
success = json.UpdateString("AmazonopensearchserviceDestinationConfiguration.CloudWatchLoggingOptions.LogGroupName","string")
success = json.UpdateString("AmazonopensearchserviceDestinationConfiguration.CloudWatchLoggingOptions.LogStreamName","string")
success = json.UpdateString("AmazonopensearchserviceDestinationConfiguration.ClusterEndpoint","string")
success = json.UpdateString("AmazonopensearchserviceDestinationConfiguration.DomainARN","string")
success = json.UpdateString("AmazonopensearchserviceDestinationConfiguration.IndexName","string")
success = json.UpdateString("AmazonopensearchserviceDestinationConfiguration.IndexRotationPeriod","string")
success = json.UpdateInt("AmazonopensearchserviceDestinationConfiguration.ProcessingConfiguration.Enabled",123)
success = json.UpdateString("AmazonopensearchserviceDestinationConfiguration.ProcessingConfiguration.Processors[0].Parameters[0].ParameterName","string")
success = json.UpdateString("AmazonopensearchserviceDestinationConfiguration.ProcessingConfiguration.Processors[0].Parameters[0].ParameterValue","string")
success = json.UpdateString("AmazonopensearchserviceDestinationConfiguration.ProcessingConfiguration.Processors[0].Type","string")
success = json.UpdateInt("AmazonopensearchserviceDestinationConfiguration.RetryOptions.DurationInSeconds",123)
success = json.UpdateString("AmazonopensearchserviceDestinationConfiguration.RoleARN","string")
success = json.UpdateString("AmazonopensearchserviceDestinationConfiguration.S3BackupMode","string")
success = json.UpdateString("AmazonopensearchserviceDestinationConfiguration.S3Configuration.BucketARN","string")
success = json.UpdateInt("AmazonopensearchserviceDestinationConfiguration.S3Configuration.BufferingHints.IntervalInSeconds",123)
success = json.UpdateInt("AmazonopensearchserviceDestinationConfiguration.S3Configuration.BufferingHints.SizeInMBs",123)
success = json.UpdateInt("AmazonopensearchserviceDestinationConfiguration.S3Configuration.CloudWatchLoggingOptions.Enabled",123)
success = json.UpdateString("AmazonopensearchserviceDestinationConfiguration.S3Configuration.CloudWatchLoggingOptions.LogGroupName","string")
success = json.UpdateString("AmazonopensearchserviceDestinationConfiguration.S3Configuration.CloudWatchLoggingOptions.LogStreamName","string")
success = json.UpdateString("AmazonopensearchserviceDestinationConfiguration.S3Configuration.CompressionFormat","string")
success = json.UpdateString("AmazonopensearchserviceDestinationConfiguration.S3Configuration.EncryptionConfiguration.KMSEncryptionConfig.AWSKMSKeyARN","string")
success = json.UpdateString("AmazonopensearchserviceDestinationConfiguration.S3Configuration.EncryptionConfiguration.NoEncryptionConfig","string")
success = json.UpdateString("AmazonopensearchserviceDestinationConfiguration.S3Configuration.ErrorOutputPrefix","string")
success = json.UpdateString("AmazonopensearchserviceDestinationConfiguration.S3Configuration.Prefix","string")
success = json.UpdateString("AmazonopensearchserviceDestinationConfiguration.S3Configuration.RoleARN","string")
success = json.UpdateString("AmazonopensearchserviceDestinationConfiguration.TypeName","string")
success = json.UpdateString("AmazonopensearchserviceDestinationConfiguration.VpcConfiguration.RoleARN","string")
success = json.UpdateString("AmazonopensearchserviceDestinationConfiguration.VpcConfiguration.SecurityGroupIds[0]","string")
success = json.UpdateString("AmazonopensearchserviceDestinationConfiguration.VpcConfiguration.SubnetIds[0]","string")
success = json.UpdateString("DeliveryStreamEncryptionConfigurationInput.KeyARN","string")
success = json.UpdateString("DeliveryStreamEncryptionConfigurationInput.KeyType","string")
success = json.UpdateString("DeliveryStreamName","string")
success = json.UpdateString("DeliveryStreamType","string")
success = json.UpdateInt("ElasticsearchDestinationConfiguration.BufferingHints.IntervalInSeconds",123)
success = json.UpdateInt("ElasticsearchDestinationConfiguration.BufferingHints.SizeInMBs",123)
success = json.UpdateInt("ElasticsearchDestinationConfiguration.CloudWatchLoggingOptions.Enabled",123)
success = json.UpdateString("ElasticsearchDestinationConfiguration.CloudWatchLoggingOptions.LogGroupName","string")
success = json.UpdateString("ElasticsearchDestinationConfiguration.CloudWatchLoggingOptions.LogStreamName","string")
success = json.UpdateString("ElasticsearchDestinationConfiguration.ClusterEndpoint","string")
success = json.UpdateString("ElasticsearchDestinationConfiguration.DomainARN","string")
success = json.UpdateString("ElasticsearchDestinationConfiguration.IndexName","string")
success = json.UpdateString("ElasticsearchDestinationConfiguration.IndexRotationPeriod","string")
success = json.UpdateInt("ElasticsearchDestinationConfiguration.ProcessingConfiguration.Enabled",123)
success = json.UpdateString("ElasticsearchDestinationConfiguration.ProcessingConfiguration.Processors[0].Parameters[0].ParameterName","string")
success = json.UpdateString("ElasticsearchDestinationConfiguration.ProcessingConfiguration.Processors[0].Parameters[0].ParameterValue","string")
success = json.UpdateString("ElasticsearchDestinationConfiguration.ProcessingConfiguration.Processors[0].Type","string")
success = json.UpdateInt("ElasticsearchDestinationConfiguration.RetryOptions.DurationInSeconds",123)
success = json.UpdateString("ElasticsearchDestinationConfiguration.RoleARN","string")
success = json.UpdateString("ElasticsearchDestinationConfiguration.S3BackupMode","string")
success = json.UpdateString("ElasticsearchDestinationConfiguration.S3Configuration.BucketARN","string")
success = json.UpdateInt("ElasticsearchDestinationConfiguration.S3Configuration.BufferingHints.IntervalInSeconds",123)
success = json.UpdateInt("ElasticsearchDestinationConfiguration.S3Configuration.BufferingHints.SizeInMBs",123)
success = json.UpdateInt("ElasticsearchDestinationConfiguration.S3Configuration.CloudWatchLoggingOptions.Enabled",123)
success = json.UpdateString("ElasticsearchDestinationConfiguration.S3Configuration.CloudWatchLoggingOptions.LogGroupName","string")
success = json.UpdateString("ElasticsearchDestinationConfiguration.S3Configuration.CloudWatchLoggingOptions.LogStreamName","string")
success = json.UpdateString("ElasticsearchDestinationConfiguration.S3Configuration.CompressionFormat","string")
success = json.UpdateString("ElasticsearchDestinationConfiguration.S3Configuration.EncryptionConfiguration.KMSEncryptionConfig.AWSKMSKeyARN","string")
success = json.UpdateString("ElasticsearchDestinationConfiguration.S3Configuration.EncryptionConfiguration.NoEncryptionConfig","string")
success = json.UpdateString("ElasticsearchDestinationConfiguration.S3Configuration.ErrorOutputPrefix","string")
success = json.UpdateString("ElasticsearchDestinationConfiguration.S3Configuration.Prefix","string")
success = json.UpdateString("ElasticsearchDestinationConfiguration.S3Configuration.RoleARN","string")
success = json.UpdateString("ElasticsearchDestinationConfiguration.TypeName","string")
success = json.UpdateString("ElasticsearchDestinationConfiguration.VpcConfiguration.RoleARN","string")
success = json.UpdateString("ElasticsearchDestinationConfiguration.VpcConfiguration.SecurityGroupIds[0]","string")
success = json.UpdateString("ElasticsearchDestinationConfiguration.VpcConfiguration.SubnetIds[0]","string")
success = json.UpdateString("ExtendedS3DestinationConfiguration.BucketARN","string")
success = json.UpdateInt("ExtendedS3DestinationConfiguration.BufferingHints.IntervalInSeconds",123)
success = json.UpdateInt("ExtendedS3DestinationConfiguration.BufferingHints.SizeInMBs",123)
success = json.UpdateInt("ExtendedS3DestinationConfiguration.CloudWatchLoggingOptions.Enabled",123)
success = json.UpdateString("ExtendedS3DestinationConfiguration.CloudWatchLoggingOptions.LogGroupName","string")
success = json.UpdateString("ExtendedS3DestinationConfiguration.CloudWatchLoggingOptions.LogStreamName","string")
success = json.UpdateString("ExtendedS3DestinationConfiguration.CompressionFormat","string")
success = json.UpdateInt("ExtendedS3DestinationConfiguration.DataFormatConversionConfiguration.Enabled",123)
success = json.UpdateString("ExtendedS3DestinationConfiguration.DataFormatConversionConfiguration.InputFormatConfiguration.Deserializer.HiveJsonSerDe.TimestampFormats[0]","string")
success = json.UpdateInt("ExtendedS3DestinationConfiguration.DataFormatConversionConfiguration.InputFormatConfiguration.Deserializer.OpenXJsonSerDe.CaseInsensitive",123)
success = json.UpdateString("ExtendedS3DestinationConfiguration.DataFormatConversionConfiguration.InputFormatConfiguration.Deserializer.OpenXJsonSerDe.ColumnToJsonKeyMappings.string","string")
success = json.UpdateInt("ExtendedS3DestinationConfiguration.DataFormatConversionConfiguration.InputFormatConfiguration.Deserializer.OpenXJsonSerDe.ConvertDotsInJsonKeysToUnderscores",123)
success = json.UpdateInt("ExtendedS3DestinationConfiguration.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.BlockSizeBytes",123)
success = json.UpdateString("ExtendedS3DestinationConfiguration.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.BloomFilterColumns[0]","string")
success = json.UpdateInt("ExtendedS3DestinationConfiguration.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.BloomFilterFalsePositiveProbability",123)
success = json.UpdateString("ExtendedS3DestinationConfiguration.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.Compression","string")
success = json.UpdateInt("ExtendedS3DestinationConfiguration.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.DictionaryKeyThreshold",123)
success = json.UpdateInt("ExtendedS3DestinationConfiguration.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.EnablePadding",123)
success = json.UpdateString("ExtendedS3DestinationConfiguration.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.FormatVersion","string")
success = json.UpdateInt("ExtendedS3DestinationConfiguration.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.PaddingTolerance",123)
success = json.UpdateInt("ExtendedS3DestinationConfiguration.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.RowIndexStride",123)
success = json.UpdateInt("ExtendedS3DestinationConfiguration.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.OrcSerDe.StripeSizeBytes",123)
success = json.UpdateInt("ExtendedS3DestinationConfiguration.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.ParquetSerDe.BlockSizeBytes",123)
success = json.UpdateString("ExtendedS3DestinationConfiguration.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.ParquetSerDe.Compression","string")
success = json.UpdateInt("ExtendedS3DestinationConfiguration.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.ParquetSerDe.EnableDictionaryCompression",123)
success = json.UpdateInt("ExtendedS3DestinationConfiguration.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.ParquetSerDe.MaxPaddingBytes",123)
success = json.UpdateInt("ExtendedS3DestinationConfiguration.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.ParquetSerDe.PageSizeBytes",123)
success = json.UpdateString("ExtendedS3DestinationConfiguration.DataFormatConversionConfiguration.OutputFormatConfiguration.Serializer.ParquetSerDe.WriterVersion","string")
success = json.UpdateString("ExtendedS3DestinationConfiguration.DataFormatConversionConfiguration.SchemaConfiguration.CatalogId","string")
success = json.UpdateString("ExtendedS3DestinationConfiguration.DataFormatConversionConfiguration.SchemaConfiguration.DatabaseName","string")
success = json.UpdateString("ExtendedS3DestinationConfiguration.DataFormatConversionConfiguration.SchemaConfiguration.Region","string")
success = json.UpdateString("ExtendedS3DestinationConfiguration.DataFormatConversionConfiguration.SchemaConfiguration.RoleARN","string")
success = json.UpdateString("ExtendedS3DestinationConfiguration.DataFormatConversionConfiguration.SchemaConfiguration.TableName","string")
success = json.UpdateString("ExtendedS3DestinationConfiguration.DataFormatConversionConfiguration.SchemaConfiguration.VersionId","string")
success = json.UpdateInt("ExtendedS3DestinationConfiguration.DynamicPartitioningConfiguration.Enabled",123)
success = json.UpdateInt("ExtendedS3DestinationConfiguration.DynamicPartitioningConfiguration.RetryOptions.DurationInSeconds",123)
success = json.UpdateString("ExtendedS3DestinationConfiguration.EncryptionConfiguration.KMSEncryptionConfig.AWSKMSKeyARN","string")
success = json.UpdateString("ExtendedS3DestinationConfiguration.EncryptionConfiguration.NoEncryptionConfig","string")
success = json.UpdateString("ExtendedS3DestinationConfiguration.ErrorOutputPrefix","string")
success = json.UpdateString("ExtendedS3DestinationConfiguration.Prefix","string")
success = json.UpdateInt("ExtendedS3DestinationConfiguration.ProcessingConfiguration.Enabled",123)
success = json.UpdateString("ExtendedS3DestinationConfiguration.ProcessingConfiguration.Processors[0].Parameters[0].ParameterName","string")
success = json.UpdateString("ExtendedS3DestinationConfiguration.ProcessingConfiguration.Processors[0].Parameters[0].ParameterValue","string")
success = json.UpdateString("ExtendedS3DestinationConfiguration.ProcessingConfiguration.Processors[0].Type","string")
success = json.UpdateString("ExtendedS3DestinationConfiguration.RoleARN","string")
success = json.UpdateString("ExtendedS3DestinationConfiguration.S3BackupConfiguration.BucketARN","string")
success = json.UpdateInt("ExtendedS3DestinationConfiguration.S3BackupConfiguration.BufferingHints.IntervalInSeconds",123)
success = json.UpdateInt("ExtendedS3DestinationConfiguration.S3BackupConfiguration.BufferingHints.SizeInMBs",123)
success = json.UpdateInt("ExtendedS3DestinationConfiguration.S3BackupConfiguration.CloudWatchLoggingOptions.Enabled",123)
success = json.UpdateString("ExtendedS3DestinationConfiguration.S3BackupConfiguration.CloudWatchLoggingOptions.LogGroupName","string")
success = json.UpdateString("ExtendedS3DestinationConfiguration.S3BackupConfiguration.CloudWatchLoggingOptions.LogStreamName","string")
success = json.UpdateString("ExtendedS3DestinationConfiguration.S3BackupConfiguration.CompressionFormat","string")
success = json.UpdateString("ExtendedS3DestinationConfiguration.S3BackupConfiguration.EncryptionConfiguration.KMSEncryptionConfig.AWSKMSKeyARN","string")
success = json.UpdateString("ExtendedS3DestinationConfiguration.S3BackupConfiguration.EncryptionConfiguration.NoEncryptionConfig","string")
success = json.UpdateString("ExtendedS3DestinationConfiguration.S3BackupConfiguration.ErrorOutputPrefix","string")
success = json.UpdateString("ExtendedS3DestinationConfiguration.S3BackupConfiguration.Prefix","string")
success = json.UpdateString("ExtendedS3DestinationConfiguration.S3BackupConfiguration.RoleARN","string")
success = json.UpdateString("ExtendedS3DestinationConfiguration.S3BackupMode","string")
success = json.UpdateInt("HttpEndpointDestinationConfiguration.BufferingHints.IntervalInSeconds",123)
success = json.UpdateInt("HttpEndpointDestinationConfiguration.BufferingHints.SizeInMBs",123)
success = json.UpdateInt("HttpEndpointDestinationConfiguration.CloudWatchLoggingOptions.Enabled",123)
success = json.UpdateString("HttpEndpointDestinationConfiguration.CloudWatchLoggingOptions.LogGroupName","string")
success = json.UpdateString("HttpEndpointDestinationConfiguration.CloudWatchLoggingOptions.LogStreamName","string")
success = json.UpdateString("HttpEndpointDestinationConfiguration.EndpointConfiguration.AccessKey","string")
success = json.UpdateString("HttpEndpointDestinationConfiguration.EndpointConfiguration.Name","string")
success = json.UpdateString("HttpEndpointDestinationConfiguration.EndpointConfiguration.Url","string")
success = json.UpdateInt("HttpEndpointDestinationConfiguration.ProcessingConfiguration.Enabled",123)
success = json.UpdateString("HttpEndpointDestinationConfiguration.ProcessingConfiguration.Processors[0].Parameters[0].ParameterName","string")
success = json.UpdateString("HttpEndpointDestinationConfiguration.ProcessingConfiguration.Processors[0].Parameters[0].ParameterValue","string")
success = json.UpdateString("HttpEndpointDestinationConfiguration.ProcessingConfiguration.Processors[0].Type","string")
success = json.UpdateString("HttpEndpointDestinationConfiguration.RequestConfiguration.CommonAttributes[0].AttributeName","string")
success = json.UpdateString("HttpEndpointDestinationConfiguration.RequestConfiguration.CommonAttributes[0].AttributeValue","string")
success = json.UpdateString("HttpEndpointDestinationConfiguration.RequestConfiguration.ContentEncoding","string")
success = json.UpdateInt("HttpEndpointDestinationConfiguration.RetryOptions.DurationInSeconds",123)
success = json.UpdateString("HttpEndpointDestinationConfiguration.RoleARN","string")
success = json.UpdateString("HttpEndpointDestinationConfiguration.S3BackupMode","string")
success = json.UpdateString("HttpEndpointDestinationConfiguration.S3Configuration.BucketARN","string")
success = json.UpdateInt("HttpEndpointDestinationConfiguration.S3Configuration.BufferingHints.IntervalInSeconds",123)
success = json.UpdateInt("HttpEndpointDestinationConfiguration.S3Configuration.BufferingHints.SizeInMBs",123)
success = json.UpdateInt("HttpEndpointDestinationConfiguration.S3Configuration.CloudWatchLoggingOptions.Enabled",123)
success = json.UpdateString("HttpEndpointDestinationConfiguration.S3Configuration.CloudWatchLoggingOptions.LogGroupName","string")
success = json.UpdateString("HttpEndpointDestinationConfiguration.S3Configuration.CloudWatchLoggingOptions.LogStreamName","string")
success = json.UpdateString("HttpEndpointDestinationConfiguration.S3Configuration.CompressionFormat","string")
success = json.UpdateString("HttpEndpointDestinationConfiguration.S3Configuration.EncryptionConfiguration.KMSEncryptionConfig.AWSKMSKeyARN","string")
success = json.UpdateString("HttpEndpointDestinationConfiguration.S3Configuration.EncryptionConfiguration.NoEncryptionConfig","string")
success = json.UpdateString("HttpEndpointDestinationConfiguration.S3Configuration.ErrorOutputPrefix","string")
success = json.UpdateString("HttpEndpointDestinationConfiguration.S3Configuration.Prefix","string")
success = json.UpdateString("HttpEndpointDestinationConfiguration.S3Configuration.RoleARN","string")
success = json.UpdateString("KinesisStreamSourceConfiguration.KinesisStreamARN","string")
success = json.UpdateString("KinesisStreamSourceConfiguration.RoleARN","string")
success = json.UpdateInt("RedshiftDestinationConfiguration.CloudWatchLoggingOptions.Enabled",123)
success = json.UpdateString("RedshiftDestinationConfiguration.CloudWatchLoggingOptions.LogGroupName","string")
success = json.UpdateString("RedshiftDestinationConfiguration.CloudWatchLoggingOptions.LogStreamName","string")
success = json.UpdateString("RedshiftDestinationConfiguration.ClusterJDBCURL","string")
success = json.UpdateString("RedshiftDestinationConfiguration.CopyCommand.CopyOptions","string")
success = json.UpdateString("RedshiftDestinationConfiguration.CopyCommand.DataTableColumns","string")
success = json.UpdateString("RedshiftDestinationConfiguration.CopyCommand.DataTableName","string")
success = json.UpdateString("RedshiftDestinationConfiguration.Password","string")
success = json.UpdateInt("RedshiftDestinationConfiguration.ProcessingConfiguration.Enabled",123)
success = json.UpdateString("RedshiftDestinationConfiguration.ProcessingConfiguration.Processors[0].Parameters[0].ParameterName","string")
success = json.UpdateString("RedshiftDestinationConfiguration.ProcessingConfiguration.Processors[0].Parameters[0].ParameterValue","string")
success = json.UpdateString("RedshiftDestinationConfiguration.ProcessingConfiguration.Processors[0].Type","string")
success = json.UpdateInt("RedshiftDestinationConfiguration.RetryOptions.DurationInSeconds",123)
success = json.UpdateString("RedshiftDestinationConfiguration.RoleARN","string")
success = json.UpdateString("RedshiftDestinationConfiguration.S3BackupConfiguration.BucketARN","string")
success = json.UpdateInt("RedshiftDestinationConfiguration.S3BackupConfiguration.BufferingHints.IntervalInSeconds",123)
success = json.UpdateInt("RedshiftDestinationConfiguration.S3BackupConfiguration.BufferingHints.SizeInMBs",123)
success = json.UpdateInt("RedshiftDestinationConfiguration.S3BackupConfiguration.CloudWatchLoggingOptions.Enabled",123)
success = json.UpdateString("RedshiftDestinationConfiguration.S3BackupConfiguration.CloudWatchLoggingOptions.LogGroupName","string")
success = json.UpdateString("RedshiftDestinationConfiguration.S3BackupConfiguration.CloudWatchLoggingOptions.LogStreamName","string")
success = json.UpdateString("RedshiftDestinationConfiguration.S3BackupConfiguration.CompressionFormat","string")
success = json.UpdateString("RedshiftDestinationConfiguration.S3BackupConfiguration.EncryptionConfiguration.KMSEncryptionConfig.AWSKMSKeyARN","string")
success = json.UpdateString("RedshiftDestinationConfiguration.S3BackupConfiguration.EncryptionConfiguration.NoEncryptionConfig","string")
success = json.UpdateString("RedshiftDestinationConfiguration.S3BackupConfiguration.ErrorOutputPrefix","string")
success = json.UpdateString("RedshiftDestinationConfiguration.S3BackupConfiguration.Prefix","string")
success = json.UpdateString("RedshiftDestinationConfiguration.S3BackupConfiguration.RoleARN","string")
success = json.UpdateString("RedshiftDestinationConfiguration.S3BackupMode","string")
success = json.UpdateString("RedshiftDestinationConfiguration.S3Configuration.BucketARN","string")
success = json.UpdateInt("RedshiftDestinationConfiguration.S3Configuration.BufferingHints.IntervalInSeconds",123)
success = json.UpdateInt("RedshiftDestinationConfiguration.S3Configuration.BufferingHints.SizeInMBs",123)
success = json.UpdateInt("RedshiftDestinationConfiguration.S3Configuration.CloudWatchLoggingOptions.Enabled",123)
success = json.UpdateString("RedshiftDestinationConfiguration.S3Configuration.CloudWatchLoggingOptions.LogGroupName","string")
success = json.UpdateString("RedshiftDestinationConfiguration.S3Configuration.CloudWatchLoggingOptions.LogStreamName","string")
success = json.UpdateString("RedshiftDestinationConfiguration.S3Configuration.CompressionFormat","string")
success = json.UpdateString("RedshiftDestinationConfiguration.S3Configuration.EncryptionConfiguration.KMSEncryptionConfig.AWSKMSKeyARN","string")
success = json.UpdateString("RedshiftDestinationConfiguration.S3Configuration.EncryptionConfiguration.NoEncryptionConfig","string")
success = json.UpdateString("RedshiftDestinationConfiguration.S3Configuration.ErrorOutputPrefix","string")
success = json.UpdateString("RedshiftDestinationConfiguration.S3Configuration.Prefix","string")
success = json.UpdateString("RedshiftDestinationConfiguration.S3Configuration.RoleARN","string")
success = json.UpdateString("RedshiftDestinationConfiguration.Username","string")
success = json.UpdateString("S3DestinationConfiguration.BucketARN","string")
success = json.UpdateInt("S3DestinationConfiguration.BufferingHints.IntervalInSeconds",123)
success = json.UpdateInt("S3DestinationConfiguration.BufferingHints.SizeInMBs",123)
success = json.UpdateInt("S3DestinationConfiguration.CloudWatchLoggingOptions.Enabled",123)
success = json.UpdateString("S3DestinationConfiguration.CloudWatchLoggingOptions.LogGroupName","string")
success = json.UpdateString("S3DestinationConfiguration.CloudWatchLoggingOptions.LogStreamName","string")
success = json.UpdateString("S3DestinationConfiguration.CompressionFormat","string")
success = json.UpdateString("S3DestinationConfiguration.EncryptionConfiguration.KMSEncryptionConfig.AWSKMSKeyARN","string")
success = json.UpdateString("S3DestinationConfiguration.EncryptionConfiguration.NoEncryptionConfig","string")
success = json.UpdateString("S3DestinationConfiguration.ErrorOutputPrefix","string")
success = json.UpdateString("S3DestinationConfiguration.Prefix","string")
success = json.UpdateString("S3DestinationConfiguration.RoleARN","string")
success = json.UpdateInt("SplunkDestinationConfiguration.CloudWatchLoggingOptions.Enabled",123)
success = json.UpdateString("SplunkDestinationConfiguration.CloudWatchLoggingOptions.LogGroupName","string")
success = json.UpdateString("SplunkDestinationConfiguration.CloudWatchLoggingOptions.LogStreamName","string")
success = json.UpdateInt("SplunkDestinationConfiguration.HECAcknowledgmentTimeoutInSeconds",123)
success = json.UpdateString("SplunkDestinationConfiguration.HECEndpoint","string")
success = json.UpdateString("SplunkDestinationConfiguration.HECEndpointType","string")
success = json.UpdateString("SplunkDestinationConfiguration.HECToken","string")
success = json.UpdateInt("SplunkDestinationConfiguration.ProcessingConfiguration.Enabled",123)
success = json.UpdateString("SplunkDestinationConfiguration.ProcessingConfiguration.Processors[0].Parameters[0].ParameterName","string")
success = json.UpdateString("SplunkDestinationConfiguration.ProcessingConfiguration.Processors[0].Parameters[0].ParameterValue","string")
success = json.UpdateString("SplunkDestinationConfiguration.ProcessingConfiguration.Processors[0].Type","string")
success = json.UpdateInt("SplunkDestinationConfiguration.RetryOptions.DurationInSeconds",123)
success = json.UpdateString("SplunkDestinationConfiguration.S3BackupMode","string")
success = json.UpdateString("SplunkDestinationConfiguration.S3Configuration.BucketARN","string")
success = json.UpdateInt("SplunkDestinationConfiguration.S3Configuration.BufferingHints.IntervalInSeconds",123)
success = json.UpdateInt("SplunkDestinationConfiguration.S3Configuration.BufferingHints.SizeInMBs",123)
success = json.UpdateInt("SplunkDestinationConfiguration.S3Configuration.CloudWatchLoggingOptions.Enabled",123)
success = json.UpdateString("SplunkDestinationConfiguration.S3Configuration.CloudWatchLoggingOptions.LogGroupName","string")
success = json.UpdateString("SplunkDestinationConfiguration.S3Configuration.CloudWatchLoggingOptions.LogStreamName","string")
success = json.UpdateString("SplunkDestinationConfiguration.S3Configuration.CompressionFormat","string")
success = json.UpdateString("SplunkDestinationConfiguration.S3Configuration.EncryptionConfiguration.KMSEncryptionConfig.AWSKMSKeyARN","string")
success = json.UpdateString("SplunkDestinationConfiguration.S3Configuration.EncryptionConfiguration.NoEncryptionConfig","string")
success = json.UpdateString("SplunkDestinationConfiguration.S3Configuration.ErrorOutputPrefix","string")
success = json.UpdateString("SplunkDestinationConfiguration.S3Configuration.Prefix","string")
success = json.UpdateString("SplunkDestinationConfiguration.S3Configuration.RoleARN","string")
success = json.UpdateString("Tags[0].Key","string")
success = json.UpdateString("Tags[0].Value","string")
' The JSON request body created by the above code:
' {
' "AmazonopensearchserviceDestinationConfiguration": {
' "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",
' "S3BackupMode": "string",
' "S3Configuration": {
' "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",
' "VpcConfiguration": {
' "RoleARN": "string",
' "SecurityGroupIds": [
' "string"
' ],
' "SubnetIds": [
' "string"
' ]
' }
' },
' "DeliveryStreamEncryptionConfigurationInput": {
' "KeyARN": "string",
' "KeyType": "string"
' },
' "DeliveryStreamName": "string",
' "DeliveryStreamType": "string",
' "ElasticsearchDestinationConfiguration": {
' "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",
' "S3BackupMode": "string",
' "S3Configuration": {
' "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",
' "VpcConfiguration": {
' "RoleARN": "string",
' "SecurityGroupIds": [
' "string"
' ],
' "SubnetIds": [
' "string"
' ]
' }
' },
' "ExtendedS3DestinationConfiguration": {
' "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",
' "S3BackupConfiguration": {
' "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"
' },
' "S3BackupMode": "string"
' },
' "HttpEndpointDestinationConfiguration": {
' "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",
' "S3Configuration": {
' "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"
' }
' },
' "KinesisStreamSourceConfiguration": {
' "KinesisStreamARN": "string",
' "RoleARN": "string"
' },
' "RedshiftDestinationConfiguration": {
' "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",
' "S3BackupConfiguration": {
' "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"
' },
' "S3BackupMode": "string",
' "S3Configuration": {
' "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"
' },
' "S3DestinationConfiguration": {
' "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"
' },
' "SplunkDestinationConfiguration": {
' "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",
' "S3Configuration": {
' "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"
' }
' },
' "Tags": [
' {
' "Key": "string",
' "Value": "string"
' }
' ]
' }
success = rest.AddHeader("Content-Type","application/x-amz-json-1.1")
success = rest.AddHeader("X-Amz-Target","Firehose_20150804.CreateDeliveryStream")
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
Dim jResp As New ChilkatJsonObject
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
Dim DeliveryStreamARN As String
DeliveryStreamARN = jResp.StringOf("DeliveryStreamARN")
' A sample JSON response body parsed by the above code:
' {
' "DeliveryStreamARN": "string"
' }
