Mails via Lotus Notes - für Interessierte
10.10.2006 14:11:00
Bertram
heute habe ich mal keine Frage, aber Ronny hatte vor Kurzem (naja, relativ gesehen) das Anliegen Mails mit Lotus Notes zu erstellen, sie aber nicht sofort zu versenden (siehe auch http:/forum/archiv/804to808/t805877.htm ).
Da mich dies auch interessiert hat, aber darauf keine Antwort kam, hab ich selber mal recherchiert und folgendes gefunden.
In den im Link angegebenen Code noch einfügen:
Dim Workspace as Object
und anstelle von
Call doc.Send(False)
diese Zeilen einfügen:
Set Workspace = CreateObject("Notes.NotesUIWorkspace")
Call Workspace.EditDocument(True, doc).GOTOFIELD("Body")
Dann kann man die Mail in Lotus Notes noch editeren, vor dem senden.
Ein Problem habe ich allerdings dabei noch nicht gelöst. Wenn man Mails mit automatischer Signatur erstellt, wir der Text, der per VBA eingetragen wird erst NACH der Signatur eingefügt. Vielleciht hat da noch jemand ne Idee.
Ohne Signatur sieht's aber ganz gut aus:-)
An dieser Stelle auch mal ein Lob meinerseits an dieses hervorragende Forum, bei dem einem (meistens) prompt und kompetent geholfen wird.
Freue mich, falls obige Zeilen jemand weiterhelfen, ansonsten weiterhin frohes Schaffen.
Gruß
Bertram