Chilkat
HOME
Android™
ASP
Visual Basic
VB.NET
C#
iOS (IPhone)
Objective-C
C++
C
MFC
Delphi
FoxPro
Java
Perl
PHP Extension
PHP ActiveX
Python
PowerShell
Ruby
SQL Server
VBScript
CRLF ModeThe 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.
Dim ftp As New Chilkat.Ftp2() Dim success As Boolean ' Any string unlocks the component for the 1st 30-days. success = ftp.UnlockComponent("Anything for 30-day trial") If (success <> true) Then MsgBox(ftp.LastErrorText) Exit Sub End If 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 MsgBox(ftp.LastErrorText) Exit Sub End If ' Set the transfer mode to ASCII success = ftp.SetTypeAscii() If (success <> true) Then MsgBox(ftp.LastErrorText) Exit Sub 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 MsgBox(ftp.LastErrorText) Exit Sub End If Dim localFilename As String localFilename = "hamlet.xml" Dim remoteFilename As String remoteFilename = "hamlet.xml" ' Turn on session logging for the upload: ftp.KeepSessionLog = true ' Download a file. success = ftp.GetFile(remoteFilename,localFilename) If (success <> true) Then MsgBox(ftp.LastErrorText) Exit Sub End If ' View the session log. You can verify visually that ' the transfer was in ascii mode. TextBox1.Text = TextBox1.Text & ftp.SessionLog & vbCrLf ftp.Disconnect() MsgBox("File Downloaded!") |
© 2000-2012 Chilkat Software, Inc. All Rights Reserved.