1 Κάντε κλικ στο κουμπί " Έναρξη " των Windows και στη συνέχεια κάντε κλικ στο κουμπί " LotusScript Editor. " 2
Εισάγετε τον παρακάτω κωδικό στο ανοιχτό παράθυρο για να συνδέσετε το " test.txt " έγγραφο στη βάση δεδομένων Σημειώσεις :
Sub προετοιμαστεί
Dim ses As New NotesSession
Dim db Όπως NotesDatabase
συλλογή Dim Όπως NotesDocumentCollection
Dim doc Όπως NotesDocument
Dim rtitem Όπως Παραλλαγή
Dim αντικείμενο Όπως NotesEmbeddedObject
Set db = ses.CurrentDatabase
Set συλλογή = db.AllDocuments
Ορισμός doc = collection.GetFirstDocument
Set rtitem = doc.GetFirstItem ( «Σώμα» )
Call rtitem.EmbedObject ( EMBED_ATTACHMENT , " " , " test.txt " )
Call doc.Save ( True , True )
End Sub
εικόνων 3
Κάντε κλικ στο " Αρχείο" και στη συνέχεια κάντε κλικ στο κουμπί " Αποθήκευση" για να εφαρμόσει το αλλάξει στη βάση δεδομένων Notes .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα