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

Question

我知道使用Lotus Script你可以发出通知（自动发送电子邮件），只有你有一些手动触发的控件（比如按钮等等）。

我想要的是自动触发通知（无需人工干预）。让我们举个例子说我有一个带有日期字段的莲花文档（值是今天），15天后我希望Lotus应用程序发送文件已经15天的通知。

感谢您的回复！

Answer 1

创建一个LotusScript代理并为其安排例如每天凌晨1点

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

将目标设置为＆＃34;数据库中的所有文档＆＃34;。您可以通过这种方式获取所有文档：

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