MailItem.BeforeAttachmentSave 事件 (Outlook)

在保存附件前发生。

语法

expressionBeforeAttachmentSave( _Attachment_ , _Cancel_ )

expression 表示 MailItem 对象的变量。

参数

名称 必需/可选 数据类型 说明
Attachment 必需 Attachment 保存 附件
Cancel 必需 Boolean (不使用在 VBScript 中)。 的事件发生时。 如果事件过程将此参数设置为 True ,则保存操作没有完成,附件没有被更改。

备注

此事件对应于将附件保存到邮件存储区时。 之前在保存附件保存项时, BeforeAttachmentSave 事件发生。 如果用户编辑附件,然后保存这些更改, BeforeAttachmentSave 事件将不会发生在这段时间;相反它会发生以后保存项目本身。 它也不会触发附件保存在使用 SaveAsFile 方法的硬盘上。

在 VBScript 中,如果您将此函数的返回值设置为 False ,保存操作将被取消,附件没有被更改。

示例

此 Visual Basic for Applications (VBA) 示例通知用户不允许用户将附件保存。 Cancel 参数设置为 True 以取消保存操作。 示例代码必须放在 类模块(如 ThisOutlookSession)中,并且 TestAttachSave() 应在 Microsoft Outlook 调用事件过程之前调用过程。

Public WithEvents myItem As Outlook.MailItem 
 
Private Sub myItem_BeforeAttachmentSave(ByVal myAttachment As Attachment, Cancel As Boolean) 
 MsgBox "You are not allowed to save " & myAttachment.FileName 
 Cancel = True 
End Sub 
 
Public Sub TestAttachSave() 
 Set myItem = Application.ActiveInspector.CurrentItem 
End Sub

另请参阅

MailItem 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。