Hi,
Would ask anyone help how to coding a script on Notes Design to append or insert an Image from the Image Resource into Rich Text Field on the Form please?
Thanks in advance for any help.
TP.
Subject: not easy
I’ve never done this, but it looks like you have to do a lot of work to get a handle on the image. At least, the following (look for more in Help):The NotesNoteCollection class lets you build a collection of Domino design and data elements in a database. Use the CreateNoteCollection method in the NotesDatabase class to create a new NotesNoteCollection object.
This agent builds a note collection consisting of the documents in the database.
Sub Initialize
Dim session As New NotesSession
Dim db As NotesDatabase
Set db = session.CurrentDatabase
Dim stream As NotesStream
Set stream = session.CreateStream
Call stream.Truncate
REM Create note collection
Dim nc As NotesNoteCollection
Set nc = db.CreateNoteCollection(False)
Call nc.SelectAllFormatElements(True)
nc.SelectImageResources = False
Call nc.BuildCollection
'now you have to locate the Image resource you want
'…
'and then create a RichTextItem, and insert it.
End Sub
HTH