AttachmentRead Event Example

This VBScript example reminds the user to also save changes to the original of an embedded file.

Sub Item_AttachmentRead(ByVal ReadAttachment)
    If ReadAttachment.Type = 1 then
        MsgBox "If you change this file, save your changes to the original as well."
    End If
End Sub