Domino 9 und frühere Versionen > Entwicklung
Kalendereintrag Date, Time
koehlerbv:
Sorry, TMC, leider wieder nur ein Schnellschuss (diesmal aber getestet ;-)
Statt den Verrenkungen mit NotesDateTime etc. folgender Vorschlag:
--- Code: ---Dim ws As New NotesUIWorkspace
Dim vStartDate As Variant
Dim vStartTime As Variant
Dim vStartDateTime As Variant
vStartDate = ws.CurrentDocument.Document.StartDate (0)
vStartTime = ws.CurrentDocument.Document.StartTime (0)
Msgbox "StartDate: " & Cstr (vStartDate) & Chr$ (10) &_
"StartTime: " & Cstr (vStartTime)
vStartDateTime = vStartDate + vStartTime
Msgbox "StartDateTime: " & Cstr (vStartDateTime)
--- Ende Code ---
Hilft Dir das weiter ?
Herzliche Wochenendegrüsse von Ober... nach Unter... - na, Du weisst schon ;-)
Bernhard
TMC:
danke Euch beiden !
Ich habe mich jetzt für Glombi's Lösung entschieden
(war jetzt irgendwie schneller für mich, außerdem mach ich sonst alles im Script bereits im Backend....)
Grüße,
TMC
koehlerbv:
Das eine (Glombi's) ist garantiert so gut wie das andere (dem Ich sein's ;-).
Nur der Vollständigkeit halber: Auch mein Code läuft im Backend, ich hab's halt eben nur in einer Maske mit 'nem Knöpfchen auf die Schnelle ausprobiert. Daher
--- Zitat ---ws.CurrentDocument.Document.StartDate (0)
--- Ende Zitat ---
was ja aber eindeutig auf's Backend verweist ;-)
Bernhard aus dem richtig warmen, sonnigen Chiemgau (TMC: Wie siehts denn gerade bei Euch im "niedrigeren Bayern" aus ?)
Glombi:
@Bernhard:
Ich wusste gar nicht, dass man so einfach Zeit/Datumswerte addieren kann. Offenbar geht das ja dann viel einfacher, da haste Recht.
Was passiert eigentlich, wenn ich
01.01.2003 + 01.01.2003 mache?
Gibts dann den 02.02.4006 - na wenn ich Zeit hab, probier ich es mal aus.
Andreas
P.S.: Hier ist es wettermäßig nicht ganz so gut wie bei Euch im Süden. Aber morgen muss es schön sein, denn dann ist Erntedankfest und die Kiddies müssen ja irgendwie beschäftigt sein...
koehlerbv:
Hallo, Andreas (und alle anderen),
der Umgang mit Datums-/Zeitwerten ist wirklich ein weites Feld in LN ;-)
Wenn Du wie beschrieben Datumswerte addierst, bekommst Du eine Datumsseriennummer, die sich aus den jeweils vergangenen Tagen seit dem 30.12.1899 ergeben.
Heute + Heute (Für die Nachwelt: Heute = 11.10.2003) würde beispielsweise den 23.07.2107 ergeben.
Was der vereinfachte Umgang von Datums-/Zeitwerten via Variants (vom Typ 8, glaube ich) allerdings auch bedeutet (und das "umständliche Dealing" von Notes ursächlich begründet): Zeitzonen fallen unter den Tisch. In einer internationalen Umgebung muß man also über die NotesDateTime Class gehen.
Ciao,
Bernhard
Navigation
[0] Themen-Index
[#] Nächste Seite
[*] Vorherige Sete
Zur normalen Ansicht wechseln