Miten Kopioi NotesRichTextItem kuin Variant

Miten Kopioi NotesRichTextItem kuin Variant
Lotus Notes-ohjelmisto antaa käyttäjille joukon työkaluja luoda sähköposteja, aikataulutus, tietohallinto ja pikaviestit räätälöidyt sovellukset. Se sisältää LotusScript ohjelmointikieli samankaltaisia ​​tehtäviä Visual Basic kieltä. NotesRichTextItem ohjaus LotusScript edustaa Lotus Notes erä, joka sisältää RTF tietojen tyyppi. Jos asiakirjaa ei ole tallennettu, RTF erä ei voi kopioida toisesta rikas tekstikenttään. Voit luoda kopion nykyään avattu asiakirja RTF kohdetta kopioimalla NotesRichTextItem kuin variantti.

Ohjeet

1 Napsauta "Käynnistä" Windows ja valitse sitten "Lotus Notes."

2 Klikkaa "Työkalut" -välilehti valikosta ja valitsemalla sitten "LotusScript Editor."

3 Kirjoita seuraava koodi avoimen ikkunan:

Dim doc As NotesDocument

Dim rtitem As Variant

'...set value of doc...

Set rtitem = doc.GetFirstItem( "ProductDescription" )

If rtitem.Type = RICHTEXT Then

Call rtitem.AddNewLine( 1 )

Call rtitem.AppendText _

( "Short-sleeved shirt, green color." )

End If

Call doc.Save( False, True )

kopioida "Productdescription" RTF-kohde Lotus

Huomautuksia tietokantaan variantti.

4 Valitse "File" ja sitten valitse "Tallenna" script Lotus Notes -sovellus.

Aiheeseen liittyviä artikkeleita