Hallo
Wie kann ich zwei Datümmer vergleichen.
...
if thisdate.DateOnly > enddate.DateOnly Then
a = b
endif
...
Das funktioniert nicht obwohl beide Felder Datums-Felder sind.
Was muss ich genau machen damit ich diese beiden Felder vergleichen kann. Es funktioniert nur wie folgt:
...
if thisdate.DateOnly = enddate.DateOnly Then
a = b
endif
...
Merci für eure Hilfe!
DateOnly ist vom Type String und der verhällt sich anders wie Datums/Zeitwerte.
Mit SetAnyTime kann die Zeit vom Datums/Zeit-Object verworfen werden und dann mit ndt.LsLocalTime vergleichen.
Den Beitrag aus "Software & Anwendungen" habe ich gelöscht, wegen doppelt.
Gruß
Dirk
So sollte es gehen:
If doc.thisdate(0) > doc.enddate(0) Then
a = b
End If
PS: Was sind Datümmer??
Hier mein ganzes Script:
Sub Initialize
Dim session As New NotesSession
Dim db As NotesDatabase
Dim view As NotesView
Dim doc As NotesDocument
Dim thisdate As New NotesDateTime(Today)
Set db = session.CurrentDatabase
Set view = db.GetView("(HSV_Feste)")
Set doc = view.GetFirstDocument
Do Until doc Is Nothing
If (doc.Form(0) = "Feste" And doc.IBSErled(0) = "") Then
Dim enddate As New NotesDateTime(doc.EndDate(0))
If enddate.DateOnly = thisdate.DateOnly Then
doc.IBSErled = "X"
Call doc.Save(True, False)
End If
End If
Set doc = view.GetNextDocument(doc)
Loop
End Sub
Kann mir jemand sagen wie ich das genau anpassen muss?
Merci
handelt es sich bei "thisdate" und "enddate" um Felder im Dokument, dann funzt dnotes Variante. Sind es aber NotesDateTime-Objecte dann meine.
Was sind "thisdate" und "enddate"?
Gruß
Dirk
Es sind NotesDateTime Objects
thisdate = Tagesdatum aus Script
enddate = Datumsfeld aus Dokument
Merci ... so funktionierts!
