(Xojo Plugin) Wasabi Delete Bucket Objects
Demonstrates how to delete one or more objects in a bucket.Note: This example requires Chilkat v11.0.0 or greater.
Dim success As Boolean
success = False
// This example requires the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
Dim http As New Chilkat.Http
// Insert your access key here:
http.AwsAccessKey = "access-key"
// Insert your secret key here:
http.AwsSecretKey = "secret-key"
// Use the endpoint matching the bucket's region.
http.AwsEndpoint = "s3.us-west-1.wasabisys.com"
Dim bucketName As String
bucketName = "chilkattest"
Dim objectName1 As String
objectName1 = "seahorse.jpg"
Dim objectName2 As String
objectName2 = "seahorse2.jpg"
Dim st As New Chilkat.StringTable
success = st.Append(objectName1)
success = st.Append(objectName2)
Dim resp As New Chilkat.HttpResponse
success = http.S3_DeleteObjects(bucketName,st,resp)
If (success = False) Then
System.DebugLog(http.LastErrorText)
Return
End If
System.DebugLog("Response status code = " + Str(http.LastStatus))
// Display the XML response.
System.DebugLog(resp.BodyStr)
|