Tcl

S3 Delete Bucket

See more Amazon S3 Examples

Demonstrates how to delete a bucket. Tcl

load ./chilkat.dll

set success 0

# This example assumes the Chilkat API to have been previously unlocked.
# See Global Unlock Sample for sample code.

set http [new_CkHttp]

# Insert your access key here:
CkHttp_put_AwsAccessKey $http "ABQXXABC83ABCDEFVQXX"

# Insert your secret key here:
CkHttp_put_AwsSecretKey $http "XXXXYYYYabcdABCD12345678xxxxyyyyzzzz"

CkHttp_put_KeepResponseBody $http 1

set success [CkHttp_S3_DeleteBucket $http "chilkattestbucket"]

if {$success != 1} then {
    puts [CkHttp_lastErrorText $http]
    # Also examine the error response body from AWS:
    puts [CkHttp_lastResponseBody $http]
} else {
    puts "Bucket deleted."
}


delete_CkHttp $http