Cómo copiar NotesRichTextItem como Variant

software Lotus Notes ofrece a los usuarios un conjunto de herramientas para crear mensajes de correo electrónico , la programación , la gestión de la información y las aplicaciones personalizadas de mensajería instantánea. Incluye lenguaje de programación de LotusScript con funciones similares al lenguaje Visual Basic . El control NotesRichTextItem en LotusScript representa un elemento de Lotus Notes que contiene la rica tipo de texto de los datos . Si un documento no se guarda , el elemento de texto enriquecido no se puede copiar de otro campo de texto enriquecido . Puede crear una copia del documento actualmente abierto con los ricos elementos de texto copiando el NotesRichTextItem como una variante . Instrucciones
1

clic en "Inicio " de Windows y haga clic en " Lotus Notes ".

2 Haga clic en la pestaña "Herramientas " en el menú y haga clic en "Editor LotusScript . "
3

Escriba el siguiente código en la ventana abierta :

doc As NotesDocument

rtitem Dim As Variant

" ... el valor conjunto de doc ...

set rtitem = doc.GetFirstItem ( " ProductDescription " )

Si rtitem.Type = richtext Entonces

Call rtitem . AddNewLine ( 1 )

Call rtitem.AppendText _

( "Camisa de manga corta , de color verde. " )

End If

Call doc . Guardar ( False , True)

para copiar el " productDescription " elemento de texto enriquecido de la base de datos de Notes

sobre Lotus como una variante .

4 Haga clic en " archivo "y luego haga clic en" guardar "para guardar el guión con su aplicación de Lotus Notes.