Problem with NotesRichTextNavigator

I am unable to initialize NotesNavigator: Here the code

Sub Initialize

Dim s As New NotesSession

Dim db As NotesDatabase

Dim doc As NotesDocument

Dim docCol As NotesDocumentCollection

Dim rtitem As NotesRichTextItem

Dim rtNav As NotesRichTextNavigator

Set db = s.CurrentDatabase

Set docCol = db.UnprocessedDocuments

Set doc = docCol.GetFirstDocument

Set rtitem = doc.GetFirstItem(“LinkProjet”) 'Name of the field

Set rtNav = rtitem.CreateNavigator 'I am not able to give him a value , rtNav remains always empty

End Sub

Somebody can help me.

Thank you

Subject: Problem with NotesRichTextNavigator

I am facing the same problem of creating a RichText Navigator. Please help

Subject: Problem with NotesRichTextNavigator

I found how to make