Chilkat HOME ASP Visual Basic VB.NET C# Visual C++ C MFC Delphi FoxPro Java Perl PHP Python Ruby SQL Server VBScript
|
Delete FTP Directory TreeDelete an entire directory tree on an FTP server.
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 = "ftp.yourftpserver.com" ftp.Username = "****" ftp.Password = "****" ' Connect and login to the FTP server. success = ftp.Connect() If (success <> true) Then MsgBox(ftp.LastErrorText) Exit Sub End If ' Set the current remote directory to the root of ' the tree to be deleted success = ftp.ChangeRemoteDir("/something") If (success <> true) Then MsgBox(ftp.LastErrorText) Exit Sub End If ' Delete the entire tree. All sub-directories and files are deleted. success = ftp.DeleteTree() If (success <> true) Then MsgBox(ftp.LastErrorText) Exit Sub End If ' The /something directory still exists. To delete it, ' we move up one directory level and then delete it. success = ftp.ChangeRemoteDir("..") If (success <> true) Then MsgBox(ftp.LastErrorText) Exit Sub End If success = ftp.RemoveRemoteDir("something") If (success <> true) Then MsgBox(ftp.LastErrorText) Exit Sub End If ftp.Disconnect() |
Need a specific example? Send a request to support@chilkatsoft.com
© 2000-2007 Chilkat Software, Inc. All Rights Reserved.