Chilkat HOME Android™ Classic ASP C C++ C# Mono C# .NET Core C# C# UWP/WinRT DataFlex Delphi ActiveX Delphi DLL Visual FoxPro Java Lianja MFC Objective-C Perl PHP ActiveX PHP Extension PowerBuilder PowerShell PureBasic CkPython Chilkat2-Python Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ Visual Basic 6.0 VB.NET VB.NET UWP/WinRT VBScript Xojo Plugin Node.js Excel Go
(Excel) Quote and SendCommandDemonstrate the Quote and SendCommand methods.
' This example requires the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. Dim ftp As Chilkat.Ftp2 Set ftp = Chilkat.NewFtp2 ftp.Hostname = "ftp.example.com" ftp.Username = "login" ftp.Password = "password" ' Connect and login to the FTP server. success = ftp.Connect() If (success <> True) Then Debug.Print ftp.LastErrorText Exit Sub End If ' Tell the FTP object to keep an in-memory session log ' so we can see the commands sent to the server, ' and the responses received back. ftp.KeepSessionLog = True ' Change the current remote directory via the Quote method: success = ftp.Quote("CWD junk") If (success <> True) Then Debug.Print ftp.LastErrorText Exit Sub End If ' Move back up ' In this case, ChangeRemoteDir sends "CWD .." to the FTP server. success = ftp.ChangeRemoteDir("..") If (success <> True) Then Debug.Print ftp.LastErrorText Exit Sub End If ' Do the same via the SendCommand method where the ' raw FTP server response is returned: serverResponse = ftp.SendCommand("CWD junk") If (ftp.LastMethodSuccess <> True) Then Debug.Print ftp.LastErrorText Else Debug.Print serverResponse End If success = ftp.Disconnect() Debug.Print "Session Log:" Debug.Print ftp.SessionLog |
© 2000-2022 Chilkat Software, Inc. All Rights Reserved.