Posted on 2005-04-20
I want to use the below script to send out scheduled reminders but am not sure about the Sendto. I want to grab a list of manager from the first column of a view called ManagerList. Can someone help?
Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Dim body As NotesRichTextItem
Set db = session.CurrentDatabase
Set doc = db.CreateDocument()
doc.form = "Memo"
doc.Sendto = ""
doc.Subject = "Asset Reminder for Managers and Supervisors"
Set body = doc.CreateRichTextItem("body")
' .... Set the contents of the Body with the RichTextItem methods
Call body.AppendText( "This a weekly scheduled reminder to collect any assets from Terminated Employess and to distribute any assets to New Employees. Then, update the Users Profile document accordingly in the Asset Tracking Database" )