(VB.NET) S3 List Buckets

Demonstrates how to retrieve the XML listing the buckets for an Amazon S3 account.

Download: Chilkat .NET Assemblies

Dim http As New Chilkat.Http()

Dim success As Boolean
success = http.UnlockComponent("Anything for 30-day trial")
If (success <> true) Then
    TextBox1.Text = TextBox1.Text & http.LastErrorText & vbCrLf
    Exit Sub
End If


'  Insert your access key here:
http.AwsAccessKey = "ABQXXABC83ABCDEFVQXX"

'  Insert your secret key here:
http.AwsSecretKey = "XXXXYYYYabcdABCD12345678xxxxyyyyzzzz"

Dim xmlStr As String
xmlStr = http.S3_ListBuckets()

If (xmlStr = vbNullString ) Then
    '  Failed
    TextBox1.Text = TextBox1.Text & http.LastErrorText & vbCrLf
Else
    '  Success
    TextBox1.Text = TextBox1.Text & xmlStr & vbCrLf
End If