Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Kliknite na tlačidlo " Štart " vo Windows a potom kliknite na tlačidlo " LotusScript Editor . "
2
Zadajte nasledujúci kód v otvorenom okne pripojiť " test.txt " dokument do databázy Poznámky :
Sub Initialize
Dim si sa ako New NotesSession
Dim db ako NotesDatabase
Dim kolekciu ako NotesDocumentCollection
Dim doc ako NotesDocument
Dim rtitem As Variant
Dim objektu ako NotesEmbeddedObject
Set db = ses.CurrentDatabase
Set kolekcia = db.AllDocuments
Set doc = collection.GetFirstDocument
Set rtitem = doc.GetFirstItem ( " telo " )
Call rtitem.EmbedObject ( EMBED_ATTACHMENT , " " , " test.txt " )
Call doc.Save ( PRAVDA )
End Sub
3
Kliknite na " Súbor " a potom kliknite na tlačidlo " Uložiť " platiť zmeniť databázu Notes .