eine Idee wäre VBA zu benutzen,
sieht ungefähr so aus. Das Listing unten ist nicht ganz vollständig, und benutzt die UI-Klassen was nicht das performanteste ist und der LN Client muss ebenfalls installiert sein. Aber es geht ja erstmal nur um das Prinzip.
Sub Email()
Dim Email, Subject As Variant
Dim LNSession As Object
Dim LNWorkspace As Object
Dim LNMailServer As Variant
Dim LNMailDBName As Variant
Dim LNMail As Object
'Start von Lotus Notes abfrage vom Mailsserver, Mailfile
'und dem Benutzername
Set LNSession = CreateObject("Notes.NotesSession")
Set LNWorkspace = CreateObject("Notes.NotesUIWorkspace")
LNMailServer = LNSession.GETENVIRONMENTSTRING("MailServer", True)
LNMailDBName = LNSession.GETENVIRONMENTSTRING("MailFile", True)
LNUserName = LNSession.UserName
Set LNMail = LNWorkspace.COMPOSEDOCUMENT(LNMailServer, LNMailDBName, "Memo")
Call LNMail.FIELDSETTEXT("Subject", Subject)
Call LNMail.FIELDSETTEXT("EnterSendTo", Email)
Call LNMail.FIELDSETTEXT("EnterCopyTo", CCMail)
Call LNMail.FIELDSETTEXT("Body", Body)
Call LNMail.SEND
Call LNMail.Close(True)
Set LNMailMemo = Nothing
Set LNMailDD = Nothing
Set LNSession = Nothing
End Sub