Chilkat HOME ASP Visual Basic VB.NET C# Visual C++ C MFC Delphi FoxPro Java Perl PHP Python Ruby SQL Server VBScript
|
Binary and ASCII FTP Transfer ModesThe SetTypeBinary() and SetTypeAscii() method can be called to change the current transfer mode. The default transfer mode is binary. Once SetTypeAscii() or SetTypeBinary() is called, all subsequent transfers will occur in that mode.
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.secureftp-test.com" ftp.Username = "test" ftp.Password = "test" ' 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 ' 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 ' Upload a file. Dim localFilename As String localFilename = "hamlet.xml" Dim remoteFilename As String remoteFilename = "hamlet.xml" ' Turn on session logging for the upload: ftp.KeepSessionLog = true success = ftp.PutFile(localFilename,remoteFilename) 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 TextBox1.Refresh() ftp.Disconnect() MsgBox("File Uploaded!") |
Need a specific example? Send a request to support@chilkatsoft.com
© 2000-2007 Chilkat Software, Inc. All Rights Reserved.