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
Append to Existing File on FTP ServerAppend a local file to an existing file on the FTP server.
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 = "www.example-code.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 ' Change to the remote directory where the existing file is located. success = ftp.ChangeRemoteDir("junk") If (success <> true) Then MsgBox(ftp.LastErrorText) Exit Sub End If ' Append moreHamlet.txt to hamlet.txt on the FTP server. Dim localFilename As String localFilename = "moreHamlet.txt" Dim remoteFilename As String remoteFilename = "hamlet.txt" success = ftp.AppendFile(localFilename,remoteFilename) If (success <> true) Then MsgBox(ftp.LastErrorText) Exit Sub End If ftp.Disconnect() MsgBox("File Appended!") |
© 2000-2012 Chilkat Software, Inc. All Rights Reserved.