LOTUSSCRIPT/COM/OLE CLASSES


Examples: CreateNewsletter method
This script performs a full-text search on the current database and creates a newsletter with a link to each matching document. The newsletter gets mailed to Sharron Karasic.

Dim session As New NotesSession
Dim db As NotesDatabase
Dim collection As NotesDocumentCollection
Dim newsletter As NotesNewsletter
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set collection = db.FTSearch( "arachnid", 15 )
If ( collection.Count > 0 ) Then
 Set newsletter = session.CreateNewsletter( collection )
 Set doc = newsletter.FormatMsgWithDoclinks( db )
 doc.Form = "Memo"
 doc.Subject = "The Arachnid Report"
 Call doc.Send( False, "Sharron Karasic" )
End If

See Also