Agent 007

[Bruce Willis]

Hallo,

ich würde gerne einen Agenten erstellen, der alle Dokumente überprüft und die Werte von zwei Feldern (Feld1 und Feld2) vergleicht.

Sollten diese nicht gleich sein, wird der Wert von Feld1 ins Feld2 kopiert und eine Email verschickt.

Könnte jemand dabei helfen?

Gruß
Bruce

[-Michael-]

ich würde gerne einen Agenten erstellen, der alle Dokumente überprüft

Siehe NotesDocumentCollection class und AllDocuments Property der NotesDatabase - Klasse

und die Werte von zwei Feldern (Feld1 und Feld2) vergleicht. Sollten diese nicht gleich sein,

If strFeld1 = strFeld2 Then ....

wird der Wert von Feld1 ins Feld2 kopiert und eine Email verschickt.

doc.Field1 = doc.Field2
docMail.send

Ich bin wirklich kein Profi in LotusScript, aber ich denke das hier sind Basics. Ich empfehle Dir, ein Buch zu LS zu kaufen, und/oder die Designer-Hilfe anzusehen.

HTH,
Michael

[y20frank]

Das sollte doch wohl mit einer NotesDocumentCollection machbar sein...
Programmier dir nen Agent, der sich alle Docs in eine DocCollection reinpfeift und dann schleife die durch ("Do Until Doc Is Nothing... usw").
Jedes Doc hat ja dann bei dir die Vergleichs-Felder "feld1" und "feld2"... So, dann checkst du in der Collection die Inhalte der Felder doc.feld1(0) und doc.feld2(0) , wenn diese halt ungleich sind, dann musste halt dein Feld2 updaten mit > doc.feld2 = doc.feld1(0)
'türlich doc.Save nicht vergessen ...  
ach so ja, doc.Send ist dann ja auch noch fällig...

Hm, also ich selbst bin ja nicht soo ein NotesGott wie andere hier, aber DAS steht alles gut in der "Notes Designer Help" und - hey - die ist echt gut!  

[koehlerbv]

Dazu braucht man ggf. ja nicht mal LS, das tut schon die Formelsprache:

@If (Field1 = Field2; @Return (""); "");
REM "In diesem Dokument sind Field1 und Field2 unterschiedlich:";
FIELD Field2 := Field1;
@MailSend (....)

Bernhard

[Bruce Willis]

DANKE an ALLE!

Bernhard, deine Lösungung funktioniert perfekt!

Nochmals vielen Dank!!!

Gruß
Bruce