(Excel) S3 Delete File

Demonstrates how to delete a remote file (object) on the Amazon S3 service.

Download Excel Class Modules Chilkat Excel Class Modules

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

Dim http As Chilkat.Http
Set http = Chilkat.NewHttp

' Insert your access key here
http.AwsAccessKey = "AWS_ACCESS_KEY"

' Insert your secret key here
http.AwsSecretKey = "AWS_SECRET_KEY"


bucketName = "chilkattest"

objectName = "starfish.jpg"

http.KeepResponseBody = True

success = http.S3_DeleteObject(bucketName,objectName)

If (success <> True) Then
    Debug.Print http.LastErrorText
    Exit Sub
End If

If (http.LastStatus <> 204) Then
    Debug.Print "Status code = "; http.LastStatus
    Debug.Print http.LastResponseBody
    Debug.Print "Failed."
    Exit Sub
End If

' 204 is the success response status.
' When successful, the response body will be empty.
Debug.Print "Status code = "; http.LastStatus
Debug.Print "Success. Object deleted."