How to write a db resource into a rtitem

HCL Domino Domino Forum
1

Hallo developer,I want to display a sign on a mask. I found a way by simply write a grafic into a rich text field to get the result I’m looking for.

But, how can I access a database resouce out of LotusScript to write it into the rich text item?

Sub Onchange(Source As Field)

Dim w As New NotesUIWorkspace

Dim db As NotesUIDatabase

Dim uidoc As NotesUIDocument

Dim doc As NotesDocument

Dim object As NotesEmbeddedObject

Dim rtitem As Variant

Set uidoc = w.CurrentDocument

Set doc = uidoc.Document

Set rtitem = doc.GetFirstItem(“Test”)

Set object = rtitem.EmbedObject _

( EMBED_OBJECT, “”, “resource”)

Call rtitem.EmbeddedObjects(0).Activate(True)

End Sub

With the script above messages are shown that the source was not found.

Have spend so much time in reading, can somebody help me?

2

Subject: using embedobject with a db resource

I see that a previous question on how to do this is marked “solved”. Please share the code on how to do this.