How can I display some info from a richtext field in a view - or even just flag that there is
some info in an Rt field (by an icon ??)
You
Requires Free Membership to View
Register today to access targeted resources from our editorial writers and independent industry experts focused on Lotus Domino, Notes, Workplace and other related technologies.
Example....
.... where NotesDoc is your existing variable pointing to the NotesDocument
.... object you're working with and "converted_rich_text" is the new field you
.... want to create containing the text that is in your Rich Text field
Sub QueryClose
dim plain_text as string
dim rich_text_item as NotesRichTextItem
set rich_text_item = NotesDoc.GetFirstItem( "RichTextItemName_Here" )
plain_text = notesRichTextItem.GetFormattedText( strip_tabs,length_of_line )
Call NotesDoc.ReplaceItemValue( "converted_rich_text", plain_text )
End Sub
This was first published in February 2001