Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(DataFlex) SFTP Get File Date/Times in Different FormatsSee more SFTP ExamplesDemonstrates how to get remote file date/times in different formats.
Use ChilkatAx-9.5.0-win32.pkg Procedure Test Handle hoSftp String sHostname Integer iPort Boolean iSuccess String sHandle Variant vDirListing Handle hoDirListing Integer i Integer n Handle hoSbFilename Boolean iCaseSensitive Boolean iBLocalDateTime Variant vFileObj Handle hoFileObj Variant vDt Handle hoDt String sTemp1 Boolean bTemp1 // This requires the Chilkat API to have been previously unlocked. // See Global Unlock Sample for sample code. Get Create (RefClass(cComChilkatSFtp)) To hoSftp If (Not(IsComObjectCreated(hoSftp))) Begin Send CreateComObject of hoSftp End // Connect to the SSH server. Move "my-sftp-server.com" To sHostname Move 22 To iPort Get ComConnect Of hoSftp sHostname iPort To iSuccess If (iSuccess <> True) Begin Get ComLastErrorText Of hoSftp To sTemp1 Showln sTemp1 Procedure_Return End // Authenticate with the SSH server. Get ComAuthenticatePw Of hoSftp "myLogin" "myPassword" To iSuccess If (iSuccess <> True) Begin Get ComLastErrorText Of hoSftp To sTemp1 Showln sTemp1 Procedure_Return End // After authenticating, the SFTP subsystem must be initialized: Get ComInitializeSftp Of hoSftp To iSuccess If (iSuccess <> True) Begin Get ComLastErrorText Of hoSftp To sTemp1 Showln sTemp1 Procedure_Return End // Open a directory on the server... // This example opens the "junk" directory located under the HOME directory of the SSH user account. Get ComOpenDir Of hoSftp "junk" To sHandle Get ComLastMethodSuccess Of hoSftp To bTemp1 If (bTemp1 <> True) Begin Get ComLastErrorText Of hoSftp To sTemp1 Showln sTemp1 Procedure_Return End // Download the directory listing: Get ComReadDir Of hoSftp sHandle To vDirListing If (IsComObject(vDirListing)) Begin Get Create (RefClass(cComChilkatSFtpDir)) To hoDirListing Set pvComObject Of hoDirListing To vDirListing End Get ComLastMethodSuccess Of hoSftp To bTemp1 If (bTemp1 <> True) Begin Get ComLastErrorText Of hoSftp To sTemp1 Showln sTemp1 Procedure_Return End // Close the directory handle Get ComCloseHandle Of hoSftp sHandle To iSuccess If (iSuccess <> True) Begin Get ComLastErrorText Of hoSftp To sTemp1 Showln sTemp1 Procedure_Return End // Iterate over the files. // Examine each filename and indicate those that match *FICHERO*.pdf // (i.e. the filename contains the word "FICHERO" and ends in ".pdf") Move 0 To i Get ComNumFilesAndDirs Of hoDirListing To n Get Create (RefClass(cComChilkatStringBuilder)) To hoSbFilename If (Not(IsComObjectCreated(hoSbFilename))) Begin Send CreateComObject of hoSbFilename End Move False To iCaseSensitive Move False To iBLocalDateTime While (i < n) Get ComGetFileObject Of hoDirListing i To vFileObj If (IsComObject(vFileObj)) Begin Get Create (RefClass(cComChilkatSFtpFile)) To hoFileObj Set pvComObject Of hoFileObj To vFileObj End Get ComFilename Of hoFileObj To sTemp1 Showln sTemp1 // Get the last-modified date/time Get ComGetLastModifiedDt Of hoFileObj To vDt If (IsComObject(vDt)) Begin Get Create (RefClass(cComCkDateTime)) To hoDt Set pvComObject Of hoDt To vDt End // Get the date/time in any format offered by the CkDateTime object. // such as Wed, 18 Oct 2017 09:08:21 GMT Get ComGetAsRfc822 Of hoDt iBLocalDateTime To sTemp1 Showln "RFC822 format: " sTemp1 // such as 1990-12-31T23:59:60Z Get ComGetAsTimestamp Of hoDt iBLocalDateTime To sTemp1 Showln "Timestamp: " sTemp1 // Such as: "02/16/2008 12:15:12" where hour is 0 to 23. Get ComGetAsIso8601 Of hoDt "MM/DD/YYYY hh:mm:ss" iBLocalDateTime To sTemp1 Showln "RFC822 format: " sTemp1 Send Destroy of hoDt Send Destroy of hoFileObj Move (i + 1) To i Loop Send Destroy of hoDirListing Showln "Success." End_Procedure |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.