Fare clic su " Start" di Windows e quindi fare clic su "Lotus Notes ".
2 Fare clic sulla scheda "Strumenti" nel menu e quindi fare clic su " Editor LotusScript . "
3
Immettere il seguente codice nella finestra aperta :
Dim doc Come NotesDocument
Dim rtitem As Variant
' ... valore impostato di doc ...
rtitem = doc.GetFirstItem ( " ProductDescription " ) per
rtitem.Type = RichText Poi
Chiama rtitem . AddNewLine ( 1 ) per
Chiama rtitem.AppendText _
( " camicia a maniche corte , colore verde . " ) per
End If
chiamata doc . Save (False , True)
per copiare il " descrizioneprodotto " elemento di testo RTF dal base di dati di Lotus Notes
come variante .
4
Fare clic su " File "e poi su " Salva "per salvare lo script con l'applicazione Lotus Notes .
Programmazione © www.354353.com