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
(Tcl) Date/Time Expires Within N Seconds/Minutes/Hours/DaysDemonstrates the how to tell if a date/time is within N seconds, minutes, hours, or days of the current system time.
load ./chilkat.dll set dt [new_CkDateTime] # Set to the current system date/time. CkDateTime_SetFromCurrentSystemTime $dt puts "Now: [CkDateTime_getAsTimestamp $dt 1]" # Add 10 minutes, making the date 10 minutes in the future. CkDateTime_AddSeconds $dt 600 puts "10 minutes from now: [CkDateTime_getAsTimestamp $dt 1]" # Is the date/time within 10 seconds of expiration (i.e. within 10 seconds of now)? set b [CkDateTime_ExpiresWithin $dt 10 "seconds"] puts "Expires within 10 seconds: $b" # Does the date/time expire within 5 minutes? set b [CkDateTime_ExpiresWithin $dt 5 "minutes"] puts "Expires within 5 minutes: $b" # Does the date/time expire within 15 minutes? set b [CkDateTime_ExpiresWithin $dt 15 "minutes"] puts "Expires within 15 minutes: $b" # Does the date/time expire within 1 hour? set b [CkDateTime_ExpiresWithin $dt 1 "hour"] puts "Expires within 1 hour: $b" # Does the date/time expire within 1 day? set b [CkDateTime_ExpiresWithin $dt 1 "day"] puts "Expires within 1 day: $b" # Output: # Now: 2017-05-05T23:48:00-0500 # 10 minutes from now: 2017-05-05T23:58:00-0500 # Expires within 10 seconds: False # Expires within 5 minutes: False # Expires within 15 minutes: True # Expires within 1 hour: True # Expires within 1 day: True delete_CkDateTime $dt |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.