@Andreas,
habe also in der Maske "X" eine Schaltfläche mit u.a. Code. Macht er auch alles. Wenn ich aber das Mail bekomme sehe ich darin die Maske "Y", die wo als Vorgabe-Datenbankmaske angehakt ist. Ich hab's ausprobiert.
Dim docA As NotesDocument
Dim docSend As NotesDocument
Dim docMail As NotesDocument
Dim rtitem As NotesRichTextItem
Dim success As Variant
Set db = session.CurrentDatabase
Set uidoc = workspace.CurrentDocument
Set docA = uidoc.Document
Set docSend = New NotesDocument( db )
Set rtitem = New NotesRichTextItem( docSend, "Body" )
docSend.Form = "Memo"
docSend.Subject = "Kennwortänderung"
Call docSend.Save( True, True )
success = docA.RenderToRTItem( rtitem )