I add attached in documents using sch.agent, and I was confused that I didn’t find any way how to show picture as picture, not as attach file.
…
Dim rtitem As NotesRichTextItem
Set rtitem = doc.GetFirstItem(“a”)
Call rtitem.EmbedObject(EMBED_ATTACHMENT, “”, “c:\1.jpg”)
Call doc.Save(True, True)
…
because now I see only grey icon… so user should made double click to see what is it contain, it’s not usability.
Are there any way how I can solve this problem?