Domino 9 und frühere Versionen > Entwicklung

Stunden differenz zweier Datumswerte

<< < (3/3)

Darkface:
Das ist eine Variable und wird so gefüllt:
nEDatum = docMail.GetItemValue( "Datum" )(0)

Gruß
 Darkface

ata:
... dann könnte es sein, daß du Text bekommst....

nEDatum = Cdat(docMail.GetItemValue( "Datum" )(0))

... in Datum konvertieren...

ata

Darkface:
Das will irgendwie immer noch nicht, aber ich danke dir schon mal. Ich probiers mal weiter.

Gruß
  darkface

Rob Green:
so klappt das nit, weil Du ein Variant zurückbekommst, wenn Du einfach so die Variable per variable=doc.feld(0) ausliest..

das ist der korrekte Weg:

A.) im Rahmen der NotesDateTime Klasse
Dim doc As NotesDocument
Dim item As NotesItem
Dim dateTime As NotesDateTime
'...set value of doc...
Set item = doc.GetFirstItem( "purgeDate" )
Set dateTime = item.DateTimeValue

So die Differenz (im Double FormaT...im Long mußt Du TimeDifferenceLong nehmen):
difference& = notesDateTimeA.TimeDifference( notesDateTimeB ) in Sekunden

B.) im Rahmen von Date in Lotus Script (keine NotesDateTime Klase!!!)
Dim Datumzeit as String
Dim Datum as String
wert = doc.datumszeitfeld(0)
Datumzeit = Cstr(wert)
Datum = DateValue(Datumzeit)


oder aus der Help:
Dim birthDateV As Variant
' Calculate the date value for October 8, 1996.
birthDateV = DateValue("October 8, 1996")
' Print this value as a date string.
Print CDat(birthDateV)   ' Prints 10/8/96
' Print the age this person reaches, in years,
' on this year's birthday.
Print Year(Today) - Year(birthDateV)

Darkface:
He He das Funktioniert wirklich gut. Danke an alle


Gruß
  Darkface

Navigation

[0] Themen-Index

[*] Vorherige Sete