Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(Visual Basic 6.0) 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.
' This example requires the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. Dim ftp As New ChilkatFtp2 ftp.Hostname = "ftp.chilkatsoft.com" ftp.Username = "MyLogin" ftp.Password = "MyPassword" ' Connect and login to the FTP server. Dim success As Long success = ftp.Connect() If (success <> 1) Then Debug.Print ftp.LastErrorText Exit Sub End If ' Set the transfer mode to ASCII success = ftp.SetTypeAscii() If (success <> 1) Then Debug.Print 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 <> 1) Then Debug.Print 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 = 1 ' Download a file. success = ftp.GetFile(remoteFilename,localFilename) If (success <> 1) Then Debug.Print ftp.LastErrorText Exit Sub End If ' View the session log. You can verify visually that ' the transfer was in ascii mode. Debug.Print ftp.SessionLog success = ftp.Disconnect() Debug.Print "File Downloaded!" |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.