Lianja

Upgrade an FTP Control Channel to TLS (ConvertToTls)

Demonstrates the Chilkat Ftp2.ConvertToTls method, which upgrades an already-connected clear FTP control channel to explicit TLS. It takes no arguments and is used with a manually staged connection created by ConnectOnly while Ssl is disabled.

Background: This exposes the explicit-FTPS AUTH TLS upgrade as a discrete step for the rare case where you need to do something on the clear connection first — inspect the greeting, apply a workaround — before securing it. In the normal case you simply set AuthTls and let Connect perform the upgrade automatically; this manual path exists for staged control.

Chilkat Lianja Downloads

Download Chilkat for Lianja

Lianja

llSuccess = .F.

//  Demonstrates the Ftp2.ConvertToTls method, which upgrades an already-connected clear FTP control
//  channel to explicit TLS.  It takes no arguments.  It is used with a manually staged connection
//  created by ConnectOnly while Ssl is disabled.

loFtp = createobject("CkFtp2")

loFtp.Hostname = "ftp.example.com"
loFtp.Port = 21

//  Connect in clear text first (Ssl is false).
llSuccess = loFtp.ConnectOnly()
if (llSuccess = .F.) then
    ? loFtp.LastErrorText
    release loFtp
    return
endif

//  Upgrade the control channel to explicit TLS (AUTH TLS).
llSuccess = loFtp.ConvertToTls()
if (llSuccess = .F.) then
    ? loFtp.LastErrorText
    release loFtp
    return
endif

//  Now authenticate over the encrypted control channel.
loFtp.Username = "myFtpLogin"
loFtp.Password = "myPassword"
llSuccess = loFtp.LoginAfterConnectOnly()
if (llSuccess = .F.) then
    ? loFtp.LastErrorText
    release loFtp
    return
endif

? "Control channel upgraded to TLS and logged in."

llSuccess = loFtp.Disconnect()
if (llSuccess = .F.) then
    ? loFtp.LastErrorText
    release loFtp
    return
endif



release loFtp