Download Directory Tree

Download a directory tree from an FTP server, re-creating it on the local filesystem.

Download Chilkat FTP2 ActiveX

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.secureftp-test.com"
ftp.Username = "test"
ftp.Password = "test"

'  Connect and login to the FTP server.
success = ftp.Connect()
If (success <> 1) Then
    MsgBox ftp.LastErrorText
    WScript.Quit
End If

'  Set the current remote directory to the root of
'  the tree to be downloaded.
'  success = ftp.ChangeRemoteDir("/something");
'  if (success != cktrue) {
' 	msgbox ftp.LastErrorText;
' 	return;
' }

'  Download the entire tree, recreating it at c:/temp/something
success = ftp.DownloadTree("c:/temp/something2")
If (success <> 1) Then
    MsgBox ftp.LastErrorText
    WScript.Quit
End If

ftp.Disconnect