Hallo zusammen,
ich habe in einer Maske, die neben anderen Feldern noch die Feder N_Beginn1( Startdatum) und N_BEGINN3 (Endedatum ) . Wenn nun ein Benutzer
N_Beginn1= 25.06.2018
N_Beginn3= 28.06.2018
eingibt, müssten eigentlich 4 Dokumente erstellt werden, die sich jeweils am N_Beginn3 Feld unterscheiden. N_Beginn1 und N_Beginn3 sind vom Typ Datumsfelder
Irgendwie komme ich aber nicht weiter. Kann man das mit einer Do While Schleife überhaupt lösen ?
Function termineintrag()
Dim ws As New NotesuIWorkspace
Dim uidoc As NotesUIDocument
Set uidoc=ws.CurrentDocument
quelldocdat=uidoc.FieldGetText("N_beginn1")
quelldocdat3=uidoc.FieldGetText("N_beginn3")
If quelldocdat <> quelldocdat3 Then
Do While quelldocdat <> quelldocdat3
quelldocdat=quelldocdat+1
Call uidoc.Save
Loop
End If
termineintrag=True
End Function