home *** CD-ROM | disk | FTP | other *** search
/ PC World 2006 February / PCWorld_2006-02_cd.bin / software / vyzkuste / triky / triky.exe / autoit-v3-setup.exe / Examples / _DateToDayValue.au3 < prev    next >
Text File  |  2005-01-03  |  318b  |  11 lines
  1. #include <Date.au3>
  2.  
  3. ; Julian date of today.
  4. $sJulDate = _DateToDayValue (@YEAR, @MON, @MDAY)
  5. MsgBox(4096, "", "Todays Julian date is: " & $sJulDate)
  6.  
  7. ; 14 days ago calculation.
  8. Dim $Y, $M, $D
  9. $sJulDate = _DayValueToDate ($sJulDate-14, $Y, $M, $D)
  10. MsgBox(4096, "", "14 days ago:" & $M & "/" & $D & "/" & $Y)
  11.