B4X

CRLF Mode

See more FTP Examples

The CrlfMode property applies when downloading files in ASCII mode. If CrlfMode is set to 0 (the default), then the ASCII transfer happens normally without alteration. A value of 1 converts all line endings to CR+ LF. A value of 2 converts all line endings to LF-only. A value of 3 converts all line endings to CR-only. B4X

Dim success As Boolean = False

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

Dim ftp As ChilkatFtp2
ftp.Initialize("ftp")

ftp.Hostname = "ftp.chilkatsoft.com"
ftp.Username = "MyLogin"
ftp.Password = "MyPassword"

'  Connect and login to the FTP server.
success = ftp.Connect
If success <> True Then
    Log(ftp.LastErrorText)
    Return
End If


'  Set the transfer mode to ASCII
success = ftp.SetTypeAscii
If success <> True Then
    Log(ftp.LastErrorText)
    Return
End If


'  Set the CrlfMode to ensure that line endings are CR+LF:
ftp.CrlfMode = 1

'  CrlfMode line ending settings:
'  0 = do ASCII transfer without alteration.
'  1 = CR+LF
'  2 = LF-only
'  3 = CR-only

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


Dim localFilename As String = "hamlet.xml"
Dim remoteFilename As String = "hamlet.xml"

'  Turn on session logging for the upload:
ftp.KeepSessionLog = True

'  Download a file.
success = ftp.GetFile(remoteFilename, localFilename)
If success <> True Then
    Log(ftp.LastErrorText)
    Return
End If


'  View the session log.  You can verify visually that
'  the transfer was in ascii mode.
Log(ftp.SessionLog)

success = ftp.Disconnect

Log("File Downloaded!")