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