Domino 9 und frühere Versionen > ND8: Entwicklung

"Kopie des Dokuments beifügen" per LotusScript

(1/3) > >>

tööö:
Hallo,

ich möchte eine Mail versenden, in der eine Kopie eines Dokuments drin ist. Mit den normalen Notesmitteln geht das ja wunderbar, indem ich bei "Mail senden" den Haken bei "Kopie des Dokuments beifügen" mache, aber wie mache ich das mit LotusScript?

Habs auch schon mit RenderToRTItem versucht. Aber beim Öffnen der Mail kommt dann mehrmals "Illegal circular use CoreEmailClasses".
Mit den normalen Notesmittel wie oben geschrieben klappt das wunderbar. Man müsste das doch dann auch relativ einfach nachprogrammieren können, oder?

Hoffe, mir kann da wer helfen.

Liebe Grüße
tööö

koehlerbv:
Mit Verweis auf die AtNotes-Forumsregeln besteht durchaus die Möglichkeit, dass auch dieses dritte Posting unbeantwortet bleibt.

Hilfreich wäre sicherlich auch eine genauere Beschreibung des bisherigen Vorgehens und klarere Aussagen ("Öffnen der Mail" - zur weiteren Bearbeitung oder beim Empfänger? Was für ein Dokument soll weitergeleitet werden?).

Bernhard

tööö:
Hallo,

es handelt sich um ein Dokument, welches mit einer Maske erstellt wurde, wo nur ein Text und ein Button enthalten ist.
Eigentlich ist meine Frage doch eindeutig. Ich möchte einfach das "Kopie des Dokuments beifügen" nachprogrammieren.
Nun wird sicher die Frage nach dem "Warum?" kommen. Die Auswahl der Empfänger gestaltet sich kompliziert und ist sehr variabel, deshalb suche ich mir die Empfänger mit LotusScript-Code raus.

Mein bisheriger Quellcode, wo aber dann eben beim Öffnen der Mail mehrfach "Illegal circular use CoreEmailClasses" kommt, sieht folgendermaßen aus:

--- Code: ---Set erinnerungsDok = db.CreateDocument ' Das Dokument, welches verschickt werden soll
Set mail = db.CreateDocument ' Das eigentliche Maildokument

erinnerungsDok.ReplaceItemValue "Form", "BSG\ErinnerungFussball"
'erinnerungsDok.Save False, False <-- auskommentiert, da es damit auch nicht geht

Set rtitem = New NotesRichTextItem(mail, "Body")
mail.ReplaceItemValue "Form", "Memo"
mail.ReplaceItemValue "Subject", "Letzte Erinnerung zum Eintragen"
mail.ReplaceItemValue "SendTo", empfaenger
success = erinnerungsDok.RenderToRTItem(rtitem)
mail.Send True, empfaenger

--- Ende Code ---

Ich hoffe, mein Problem ist nun klarer geschildert und mir kann einer helfen.

Vielen Dank und liebe Grüße
tööö

Ralf_M_Petter:
Lies doch mal die Forenregeln auf die Bernhard schon verlinkt hat und ich denke dann kann dir von den Experten für klassische Notes Programmierung sicher jemand helfen.

Grüße

Ralf

tööö:
Also laut Forenregeln fehlt unter anderem mein richtiger Name, aber der geht glaube ich keinem etwas an. Das Internet ist eine anonyme Austauschplattform.

Dann fehlt noch meine Notesversion. Das ist die 8.5.

Wenn sonst noch etwas fehlt, dann schreibt das doch bitte direkt hin, als immer auf die Forenregeln zu verweisen.

Liebe Grüße
tööö

Navigation

[0] Themen-Index

[#] Nächste Seite