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