Übertragen von Text und Attachments aus dem Antwortdokument in das Hauptdokument.
Das ist IMHO ziemlich einfach möglich:
Jedes Antwort-Dokument enthält ja das Feld $REF.
Also z.B.:
Dim uiws as NotesUIWokspace
Dim session as New NotesSession
Dim db as NotesDatabase
Dim docThis as NotesDocument
Dim strUNIDParent as String
Set db = session.CurrentDatabse
Set docThis = uiws.Currentdocument.Document
strUNIDParent = docThis.~$REF(0)
Damit hat man die UNID des Hauptdokumentes in der Stringvariablen strUNIDParent.
Nun kannst Du Dir das Hauptdokument einfach instantiieren:
Dim docParent as NotesDocument
Set docParent = db.GetDocumentByUNID(strUNIDParent)
Du hast jetzt also
- docThis als Antwortdokument
- docParent als Hauptdokument
Nun stehen Dir die gewohnten Methoden zur Verfügung, um beispielsweise Iteminhalte vom Antwortdokument ins Hauptdokument zu übertragen (oder umgekehrt).
HTH,
Matthias
(ich hab das hier nur so runtergetippt, so sollte es aber gehen)