(DataFlex) S3 List Buckets
Demonstrates how to retrieve the XML listing the buckets for an Amazon S3 account.
Use ChilkatAx-win32.pkg
Procedure Test
Handle hoHttp
String sXmlStr
String sTemp1
Boolean bTemp1
// This example requires the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
Get Create (RefClass(cComChilkatHttp)) To hoHttp
If (Not(IsComObjectCreated(hoHttp))) Begin
Send CreateComObject of hoHttp
End
// Insert your access key here:
Set ComAwsAccessKey Of hoHttp To "AWS_ACCESS_KEY"
// Insert your secret key here:
Set ComAwsSecretKey Of hoHttp To "AWS_SECRET_KEY"
Get ComS3_ListBuckets Of hoHttp To sXmlStr
Get ComLastMethodSuccess Of hoHttp To bTemp1
If (bTemp1 <> True) Begin
// Failed
Get ComLastErrorText Of hoHttp To sTemp1
Showln sTemp1
End
Else Begin
// Success. Show the XML response. (Use the online tool at the link below to generate parsing code.)
Showln sXmlStr
End
// Use this online tool to generate parsing code from sample XML:
// Generate Parsing Code from XML
End_Procedure
|