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
|
Simple FTP Download
Simple example to download a file from an FTP server. LOCAL loFtp LOCAL lnSuccess LOCAL lcLocalFilename LOCAL lcRemoteFilename loFtp = CreateObject('Chilkat.Ftp2') * Any string unlocks the component for the 1st 30-days. lnSuccess = loFtp.UnlockComponent("Anything for 30-day trial") IF (lnSuccess <> 1) THEN =MESSAGEBOX(loFtp.LastErrorText) QUIT ENDIF loFtp.Hostname = "www.example-code.com" loFtp.Username = "****" loFtp.Password = "****" * The default data transfer mode is "Active" as opposed to "Passive". * Connect and login to the FTP server. lnSuccess = loFtp.Connect() IF (lnSuccess <> 1) THEN =MESSAGEBOX(loFtp.LastErrorText) QUIT ENDIF * 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. lnSuccess = loFtp.ChangeRemoteDir("junk") IF (lnSuccess <> 1) THEN =MESSAGEBOX(loFtp.LastErrorText) QUIT ENDIF * Download a file. lcLocalFilename = "hamlet.xml" lcRemoteFilename = "hamlet.xml" lnSuccess = loFtp.GetFile(lcRemoteFilename,lcLocalFilename) IF (lnSuccess <> 1) THEN =MESSAGEBOX(loFtp.LastErrorText) QUIT ENDIF loFtp.Disconnect() =MESSAGEBOX("File Downloaded!") |
© 2000-2010 Chilkat Software, Inc. All Rights Reserved.
Mail Component · .NET Email Component · ASP Mail Component · XML Parser