![]() |
Chilkat HOME Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi DLL Go Java Node.js Objective-C PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(Visual FoxPro) FTP Connect, Examine Server Certificate, and then AuthenticateDemonstrates how to connect to an FTP server, examine the server's SSL/TLS certificate, and then, if it meets the application's security requirements, proceed to authenticate. Note: This example requires Chilkat v11.0.0 or greater.
LOCAL lnSuccess LOCAL loFtp LOCAL loServerCert lnSuccess = 0 * This example assumes Chilkat Ftp2 to have been previously unlocked. * See Unlock Ftp2 for sample code. loFtp = CreateObject('Chilkat.Ftp2') loFtp.Hostname = "www.authtls-ftps-server.com" loFtp.Username = "FTP_LOGIN" loFtp.Password = "FTP_PASSWORD" loFtp.AuthTls = 1 loFtp.Port = 21 * Connect to the FTP server using explicit TLS (AUTH TLS). lnSuccess = loFtp.ConnectOnly() IF (lnSuccess = 0) THEN ? loFtp.LastErrorText RELEASE loFtp CANCEL ENDIF * Get the FTP server's certificate. loServerCert = CreateObject('Chilkat.Cert') lnSuccess = loFtp.GetServerCert(loServerCert) IF (lnSuccess = 0) THEN ? loFtp.LastErrorText RELEASE loFtp RELEASE loServerCert CANCEL ENDIF * Now that we have the certificate, we can check it in any way we desire. * (See the online reference documentation for the certificate object's methods * and properties)... * Assuming the certificate is OK, proceed to authenticate with the FTP server. lnSuccess = loFtp.LoginAfterConnectOnly() IF (lnSuccess = 0) THEN ? loFtp.LastErrorText RELEASE loFtp RELEASE loServerCert CANCEL ENDIF * * Proceed with uploading/download files, etc... * loFtp.Disconnect() ? "Success." RELEASE loFtp RELEASE loServerCert |
© 2000-2025 Chilkat Software, Inc. All Rights Reserved.