如何使用Lotus Script进行自动通知

Question

我知道使用Lotus Script你可以发出通知(自动发送电子邮件),只有你有一些手动触发的控件(如按钮等等).

我想要的是自动触发通知(没有人为干预).比如说我有一个带有日期字段的莲花文档(值是今天),15天后我希望Lotus应用程序发送文件已经15天的通知.

谢谢你的回复!

Answer 1

创建一个LotusScript代理并安排它例如每天1:00

此代理将在服务器上的特定时间执行,您可以在没有人为干预的情况下完成您想要执行的所有操作.

将Target设置为"数据库中的所有文档".您可以通过这种方式获取所有文档:

Dim session As New NotesSession
Dim db As NotesDatabase
Dim collection As NotesDocumentCollection
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set collection = db.UnprocessedDocuments
Set doc = collection.GetFirstDocument()
While Not(doc Is Nothing)
  ' test date field in doc and send message if date is older then 15 days
  Set doc = collection.GetNextDocument(doc)
Wend