(Lianja) Wasabi FTP Upload
Demonstrates how to upload a file to Wasabi using FTP.
Note: This example requires Chilkat v9.5.0.89 or greater.
llSuccess = .F.
// This example assumes the Chilkat HTTP API to have been previously unlocked.
// See Global Unlock Sample for sample code.
loFtp = createobject("CkFtp2")
// Use the domain for the bucket you'll be managing.
loFtp.Hostname = "s3.s3.us-west-1.wasabisys.com"
// Use your root account username (email address) and root account password
loFtp.Username = "root_account_username"
loFtp.Password = "root_account_password"
loFtp.Ssl = .T.
loFtp.Port = 990
llSuccess = loFtp.Connect()
if (llSuccess = .F.) then
? loFtp.LastErrorText
release loFtp
return
endif
// Upload a file (starfish.jpg) to the bucket named "chilkat"
lcLocalFilePath = "qa_data/jpg/starfish.jpg"
lcRemoteBucketPath = "/chilkat/starfish.jpg"
llSuccess = loFtp.PutFile(lcLocalFilePath,lcRemoteBucketPath)
if (llSuccess = .F.) then
? loFtp.LastErrorText
release loFtp
return
endif
? "File uploaded."
release loFtp
|