(Visual FoxPro) Wasabi Create Bucket
Demonstrates how to create a new Wasabi bucket.
LOCAL loHttp
LOCAL lnSuccess
* This example assumes the Chilkat API to have been previously unlocked.
* See Global Unlock Sample for sample code.
* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.Http')
loHttp = CreateObject('Chilkat.Http')
* Insert your access key here:
loHttp.AwsAccessKey = "access-key"
* Insert your secret key here:
loHttp.AwsSecretKey = "secret-key"
* To create a bucket located in a different region, use the domain for that region, such as "s3.eu-central-1.wasabisys.com"
loHttp.AwsEndpoint = "s3.wasabisys.com"
* Change the bucket name here to something unique:
lnSuccess = loHttp.S3_CreateBucket("chilkat-wasabi-testbucket")
IF (lnSuccess <> 1) THEN
? loHttp.LastErrorText
ELSE
? "Bucket created."
ENDIF
RELEASE loHttp
|
