Chilkat HOME ASP Visual Basic VB.NET C# Visual C++ C MFC Delphi FoxPro Java Perl PHP Python Ruby SQL Server VBScript
|
Upload Multiple Files Matching PatternThe MPutFiles method can be called to upload all files matching a wildcarded filename pattern from a local filesystem directory. Dim fso, outFile Set fso = CreateObject("Scripting.FileSystemObject") Set outFile = fso.CreateTextFile("output.txt", True) set ftp = CreateObject("Chilkat.Ftp2") ' 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 WScript.Quit End If ftp.Hostname = "ftp.chilkatsoft.com" ftp.Username = "my_login" ftp.Password = "my_password" ' Connect and login to the FTP server. success = ftp.Connect() If (success <> 1) Then MsgBox ftp.LastErrorText WScript.Quit End If ' Change to the remote directory where the files will be uploaded. ' for the FTP account. success = ftp.ChangeRemoteDir("junk") If (success <> 1) Then MsgBox ftp.LastErrorText WScript.Quit End If ' Upload all files with filenames matching "c:/temp/ftp_*.asp" numFilesUploaded = ftp.MPutFiles("c:/temp/ftp_*.asp") If (numFilesUploaded < 0) Then MsgBox ftp.LastErrorText WScript.Quit End If ftp.Disconnect outFile.WriteLine(numFilesUploaded & " Files Uploaded!") outFile.Close |
Need a specific example? Send a request to support@chilkatsoft.com
© 2003-2007 Chilkat Software, Inc. All Rights Reserved.