Pro potřeby systému PROMOTIC je vhodnější použít metodu: Pm.DateDiff.
n = DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]])
interval | (String) Určuje interval (typ časového rozpětí) použitý k výpočtu rozdílu mezi date1 a date2 "yyyy" - rok "q" - kvartál "m" - měsíc "y" - den v roce "d" - den "w" - den v týdnu "ww" - týden v roce "h" - hodina "n" - minuta "s" - sekunda |
---|---|
date1 | (Date) První datum pro výpočet |
date2 | (Date) Druhé datum pro výpočet |
firstdayofweek | [nepovinné] (Integer) Určuje první den v týdnu. Pokud není nastaveno, pak se předpokládá Neděle (viz VBScript konstanty datumu a času). Tento argument ovlivňuje výpočty používající symboly intervalu "w" a "ww". |
firstweekofyear | [nepovinné] (Integer) Určuje první týden v roce. Pokud není nastaveno, pak se předpokládá, že prvním týdnem byl týden, ve kterém byl 1. leden (viz VBScript konstanty datumu a času). |
Ke zjištění počtu dní mezi date1 a date2 lze použít den roku ("y") i den ("d").
Dim s
s = "Počet dnů ode dneška: " & DateDiff("d", Now(), tDate)