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
Download Multiple Files Matching Pattern
The MGetFiles method can be called to download all files matching a wildcarded filename pattern. Dim ftp As New ChilkatFtp2 Dim success As Integer ' Any string unlocks the component for the 1st 30-days. success = ftp.UnlockComponent("Anything for 30-day trial") If (success <> 1) Then MsgBox ftp.LastErrorText Exit Sub End If ftp.Hostname = "www.example-code.com" ftp.Username = "example-code.com" ftp.Password = "*myPassword1*" ' Connect and login to the FTP server. success = ftp.Connect() If (success <> 1) Then MsgBox ftp.LastErrorText Exit Sub End If ' Change to the remote directory where the files are located. ' This step is only necessary if the files are not in the root directory ' of the FTP account. success = ftp.ChangeRemoteDir("vcpp") If (success <> 1) Then MsgBox ftp.LastErrorText Exit Sub End If ' Download all files with filenames matching "ftp_*.asp" ' The files are downloaded into c:/temp Dim numFilesDownloaded As Integer numFilesDownloaded = ftp.MGetFiles("ftp_*.asp","c:/temp") If (numFilesDownloaded < 0) Then MsgBox ftp.LastErrorText Exit Sub End If ftp.Disconnect Text1.Text = Text1.Text & numFilesDownloaded & " Files Downloaded!" & vbCrLf Text1.Refresh |
© 2000-2012 Chilkat Software, Inc. All Rights Reserved.