Chilkat HOME ASP Visual Basic VB.NET C# Visual C++ C MFC Delphi FoxPro Java Perl PHP Python Ruby SQL Server VBScript
|
Simple FTP DownloadSimple example to download a file from an 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 = "****" ftp.Password = "****" ' The default data transfer mode is "Active" as opposed to "Passive". ' 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 file is located. ' This step is only necessary if the file is not in the root directory ' for the FTP account. success = ftp.ChangeRemoteDir("junk") If (success <> true) Then MsgBox(ftp.LastErrorText) Exit Sub End If ' Download a file. Dim localFilename As String localFilename = "hamlet.xml" Dim remoteFilename As String remoteFilename = "hamlet.xml" success = ftp.GetFile(remoteFilename,localFilename) If (success <> true) Then MsgBox(ftp.LastErrorText) Exit Sub End If ftp.Disconnect() MsgBox("File Downloaded!") |
Need a specific example? Send a request to support@chilkatsoft.com
© 2000-2007 Chilkat Software, Inc. All Rights Reserved.