在保存附件前发生。
Sub object_BeforeAttachmentSave(ByVal Attachment As Attachment, Cancel As Boolean)
object 该表达式的值为“应用于”列表中的一个对象。在 VBScript 中,用 Item 代替。
Attachment 必选。要保存的 Attachment。
Cancel 可选(VBScript 中不可用)。当事件发生时为 False。如果事件过程将该参数设置为 True,则保存操作没有完成,附件没有被更改。
在 VBScript 中,如果将该函数的返回值设为 False,则保存操作被取消,附件没有被更改。
本 VBScript 示例通知用户不允许保存附件。它返回 False 取消保存操作。
Function Item_BeforeAttachmentSave(ByVal SaveAttachment)
MsgBox "You are not allowed to save " & SaveAttachment.Name
Item_BeforeAttachmentSave = False
End Function