Erinnerungsagent

[Scubidu]

Hallo miteinander

Ich will einen Agenten erstellen, der folgende
Dinge durchführen soll.

Er soll Dokumenten durchsuchen, die von einer bestimmten Maske erstellt wurden(das funktioniert).

Diese Dokumente enthalten mehrere Datum/Zeit-Felder. Eines dieser Felder soll nun von diesem Agenten abgeprüft werden, ob das darin enthaltene Datum
gleich oder kleiner dem (aktuellen Datum + 30 Tage) ist.
(funktioniert nicht)

Ist dies der Fall soll eine Mail an verschiedene Personen
gesendet werden(Mail versenden funktioniert).

Kann mir jemand bei dem noch nicht funktionierden Teil
weiterhelfen?

In gespannter Erwartung eurer Antworten
Scubidu

[doliman]

Hi,

datum $ = notesdocument.Datumsfeld(0)

Dim dateTime As New NotesDateTime( datum$ )
Call dateTime.AdjustDay(30)

if datevalue(datum$)=<datevalue(dateTime.DateOnly)

Probier mal obs funzt.