.

HCLSoftware Business Partner
Domino Consulting Services
CRUCIAL Notes Tools
+1 212-599-2048

Domino Consulting Services
CRUCIAL Notes Tools
Domino administration
Notes development

Facebook Twitter YouTube
Chat now       
.
ProductsDownloadsNewsAbout usContact


Need a Domino Consultant? Call NotesMail +1 212-599-2048 - HCLSoftware Business Partner

LOTUSSCRIPT/COM/OLE CLASSES

Examples: GetLastDocument method
This script gets the last document in a collection, and copies it to another database.

Sub Click(Source As Button)
 Dim session As New NotesSession
 Dim db As NotesDatabase
 Dim db2 As New NotesDatabase("","Ankara.nsf")
 Dim collection As NotesDocumentCollection
 Dim doc As NotesDocument
 
 Set db = session.CurrentDatabase
 Set collection = db.FTSearch("Business", 10)
 Set doc = collection.GetLastDocument
 Call doc.CopyToDatabase(db2)
End Sub

See Also