Classic ASP

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 Classic ASP Downloads

Download Chilkat for Classic ASP

Classic ASP

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
success = 0

'  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.

set ftp = Server.CreateObject("Chilkat.Ftp2")

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

'  Connect in clear text first (Ssl is false).
success = ftp.ConnectOnly()
If (success = 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( ftp.LastErrorText) & "</pre>"
    Response.End
End If

'  Upgrade the control channel to explicit TLS (AUTH TLS).
success = ftp.ConvertToTls()
If (success = 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( ftp.LastErrorText) & "</pre>"
    Response.End
End If

'  Now authenticate over the encrypted control channel.
ftp.Username = "myFtpLogin"
ftp.Password = "myPassword"
success = ftp.LoginAfterConnectOnly()
If (success = 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( ftp.LastErrorText) & "</pre>"
    Response.End
End If

Response.Write "<pre>" & Server.HTMLEncode( "Control channel upgraded to TLS and logged in.") & "</pre>"

success = ftp.Disconnect()
If (success = 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( ftp.LastErrorText) & "</pre>"
    Response.End
End If


%>
</body>
</html>