(Xojo Plugin) FTP through HTTP Tunnel (FTP over HTTP Proxy)

Note: This example requires Chilkat v9.5.0.51 or greater.

FTP through an HTTP tunnel (via an HTTP proxy server that supports HTTP tunneling).

Chilkat Xojo Plugin Download Xojo Plugin for Windows, Linux, Mac OS X, and ARM, ARM64

// This example requires the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.

Dim ftp As New Chilkat.Ftp2

ftp.Hostname = "ftp.example.com"
ftp.Username = "login"
ftp.Password = "password"

// Set the HTTP proxy server properties.
// This is to connect via HTTP/1.1 using CONNECT method
ftp.HttpProxyHostname = "192.168.1.127"
ftp.HttpProxyPort = 8080

// If the proxy server requires authentication...
ftp.HttpProxyUsername = "myProxyUsername"
ftp.HttpProxyPassword = "myProxyPassword"

// FTP over an HTTP proxy requires that FTP Passive mode be used
// for data transfers. It is not possible to use non-passive (active) mode
// for FTP over HTTP.
ftp.Passive = True

// Connect and login to the FTP server.
Dim success As Boolean
success = ftp.Connect()
If (success <> True) Then
    System.DebugLog(ftp.LastErrorText)
    Return
End If

// Change to the remote directory where the file will be uploaded.
success = ftp.ChangeRemoteDir("junk")
If (success <> True) Then
    System.DebugLog(ftp.LastErrorText)
    Return
End If

// Upload a file.
Dim localFilename As String
localFilename = "c:/temp/hamlet.xml"
Dim remoteFilename As String
remoteFilename = "hamlet.xml"

success = ftp.PutFile(localFilename,remoteFilename)
If (success <> True) Then
    System.DebugLog(ftp.LastErrorText)
    Return
End If

success = ftp.Disconnect()

System.DebugLog("File Uploaded!")