Domino 9 und frühere Versionen > ND6: Entwicklung

Datum - Anzahl Tage ausgehend von einem bestimmten Tag

<< < (3/3)

koehlerbv:
Heidi, wir werden ganz bestimmt nicht böse (warum auch?), aber gelesen hats Du im verlinkten Artikel immer noch nicht.

Dein

--- Code: ---Dim aktDate As Variant
Dim fixDate As Variant
aktDate = Cdat("Februar 27, 2009")
fixDate = Cdat("Februar 26, 2009")

Messagebox  (Format(fixDate , "Short Date")   -  Format(aktDate, "Short Date")) /86400
--- Ende Code ---

geht viel einfacher mit

--- Code: ---Messagebox (Datenumber (2009, 2, 27) - Datenumber (2009, 2, 26))
--- Ende Code ---

Das Gedöns mit der NotesDateTime-Klasse ist ebenfalls unnötig - Du weisst doch schon, dass Datumsangaben auf Datumsseriennummern basieren.

Bernhard

Navigation

[0] Themen-Index

[*] Vorherige Sete