Und ein Backend-Dokument muss nicht umbedingt gespeichert werden.
Außer und nur dann, wenn man im Frontend manuell Änderungen im RTI gemacht hat und ohne zu speichern das Feld noch im Backend bearbeitet.
Sub Click(Source As Button)
Dim uiws As NotesUIWorkspace
Dim uidoc As NotesUIDocument
Dim doc As NotesDocument
Dim rti As NotesRichTextItem
Set uiws = New NotesUIWorkspace
Set uidoc = uiws.CurrentDocument
Set doc = uidoc.Document
doc.SaveOptions = 0
Call uidoc.Close(True)
Set uidoc = Nothing
If Not(doc.HasItem("Body")) Then
Set rti = doc.CreateRichTextItem("Body")
Else
Set rti = doc.GetFirstItem("Body")
End If
Call rti.EmbedObject(1454, "Test", "C:\test.txt")
Set uidoc = uiws.EditDocument(True, doc, False)
Set doc = uidoc.Document
Call doc.RemoveItem("SaveOptions")
End Sub
Aber DaemoN erstellt erst ein Backend-Dokument, bearbeitet das RTI und bringt es dann erst ins Frontend. Ein Update reicht dafür.