Technote (troubleshooting)
问题
用户需要把邮件都转发到另外的一个地址,但还需要在 Domino 邮箱库里保留一份拷贝,如何实现呢?
解决问题
此需求可以有多个方法来实现, 下面是3个样例.
注意:
为了能够正确执行下面的例子,请确保在用户的个人文档里的转发地址必须为空。
方法1. 使用代理的简单操作:
- 打开用户的邮箱库,并选择菜单:创建 - 代理。
- 在代理框中,选择下面的“添加操作”按钮。
- 然后,在“添加操作”里选择“发送邮件消息”。
- 在“收件人”那里输入需要转发的地址。
- 选中“在消息中包含文档的拷贝”。
- 在"主题"右面选择"其他", 再选择公式, 在公式框里输入: "Fwd: " + Subject.
方法2. 使用邮件规则:
可以通过创建邮件规则来转发邮件到其他地址, 并保持发件人信息不变,具体步骤是:
1. 打开用户的邮箱库.
2. 选择左面工具里的规则, 然后选择上面的"新建规则".
3. 指定条件是"所有文档", 指定操作是"将拷贝发送给" 收件人就是需要转发的地址.
方法3. 使用LotusScript 的代码:
- 在收件人的邮箱文件中创建 LotusScript 代理,在新邮件到达之前执行。
注意正确填写Call newdoc.send那一行的第2个参数,做为转发地址。 - 下面的代码是放置在Initialize的事件里.
- 下面的Send 语句需要被修改, 应该把需要转发的地址填写在第2个参数那里.
注意:下面的代码只是一个样例的脚本, 用于展示一个解决此问题的方法。为了能让它正常工作, 脚本必须被完全按照下面所示的写。并且IBM 软件技术支持是不负责为客户的配置定制此脚本的。
Dim s As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Dim newdoc As notesdocument
Set db=s.currentdatabase
Set doc=s.documentcontext
Set newdoc = db.CreateDocument
Call doc.CopyAllItems(newdoc, True)
newdoc.subject="Fwd: "& newdoc.subject(0)
newdoc.copyto=""
Call newdoc.send(False, "<email address>")