(Xojo Plugin) Generate S3 Signed URL
Demonstrates how to generate a pre-signed S3 URL.
// This example assumes 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 = "ABQXXABC83ABCDEFVQXX"
// Insert your secret key here:
http.AwsSecretKey = "XXXXYYYYabcdABCD12345678xxxxyyyyzzzz"
Dim bucketName As String
bucketName = "testbucket"
Dim path As String
path = "starfish.jpg"
Dim expireTime As New Chilkat.CkDateTime
Dim success As Boolean
success = expireTime.SetFromCurrentSystemTime()
Dim bLocalTime As Boolean
bLocalTime = False
// Set the expiration time to 1 hour from the current time.
success = expireTime.SetFromUnixTime(bLocalTime,expireTime.GetAsUnixTime(bLocalTime) + 3600)
Dim signedUrl As String
signedUrl = http.S3_GenerateUrl(bucketName,path,expireTime)
If (http.LastMethodSuccess <> True) Then
System.DebugLog(http.LastErrorText)
Else
System.DebugLog(signedUrl)
End If
|