Visual Basic 6.0

FTP Automatic Post-Connect Commands

Demonstrates the AutoFeat, AutoSyst, AutoOptsUtf8, and AutoXcrc properties, which control commands Chilkat issues automatically around connecting and transferring.

Background: Chilkat normally probes and adapts to a server on its own: AutoFeat discovers capabilities with FEAT, AutoSyst learns the OS type to parse legacy listings, and AutoOptsUtf8 enables UTF-8 filenames when the server advertises it. These are on by default and rarely worth changing. AutoXcrc is the exception worth enabling deliberately — it verifies each upload with the server's XCRC checksum, catching corruption automatically where supported.

Chilkat Visual Basic 6.0 Downloads

Download Chilkat for Visual Basic 6.0

Visual Basic 6.0

Dim success As Long
success = 0

Dim ftp As New ChilkatFtp2

ftp.Hostname = "ftp.example.com"
ftp.Username = "myFtpLogin"

'  These auto-* properties control commands Chilkat sends automatically after connecting.  They
'  are on/off by default as noted, and are rarely changed.

'  AutoFeat (default 1): automatically send FEAT to discover server capabilities.
ftp.AutoFeat = 1

'  AutoSyst (default 1): automatically send SYST after login to learn the server OS type.
ftp.AutoSyst = 1

'  AutoOptsUtf8 (default 1): send OPTS UTF8 ON when the FEAT response advertises UTF8.
ftp.AutoOptsUtf8 = 1

'  AutoXcrc (default 0): request an XCRC checksum after each upload and treat a mismatch as
'  a failure, giving automatic post-upload verification where the server supports XCRC.
ftp.AutoXcrc = 1

'  Normally you would not hard-code the password in source.  You should instead obtain it
'  from an interactive prompt, environment variable, or a secrets vault.
ftp.Password = "myPassword"

success = ftp.Connect()
If (success = 0) Then
    Debug.Print ftp.LastErrorText
    Exit Sub
End If

Debug.Print "Connected with the configured automatic features."

success = ftp.Disconnect()
If (success = 0) Then
    Debug.Print ftp.LastErrorText
    Exit Sub
End If