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 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 = "example-code.com" ftp.Password = "*myPassword1*" ' 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 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 <> true) 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() TextBox1.Text = TextBox1.Text & numFilesDownloaded & " Files Downloaded!" & vbCrLf TextBox1.Refresh() |
© 2000-2012 Chilkat Software, Inc. All Rights Reserved.