Опитвам се да прикача файл към моя документ в Lotus. Моят файл се намира тук в c:\dev\3.txt, моят формуляр е Test и полето с богат текст, където искам да прикача полето, е "test". Опитах този код на Lotusscript да прикача файла към полето „test“, но той постави файла в края на документа, а не в полето:
Dim uidoc As notesuidocument
Dim w As New notesuiworkspace
Dim object As NotesEmbeddedObject
Dim doc As NotesDocument
Dim rtitem As NotesRichTextItem
Set uidoc=w.currentdocument
Set doc = uidoc.Document
Set rtitem = doc.GetFirstItem( "test" )
Set object= rtitem.EmbedObject(EMBED_ATTACHMENT, "", "C:\dev\3.txt")
doc.Form = "Test"
Call doc.Save( True, False)
Call uidoc.Close
