Application_ItemSend Doesn't Fire

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

The _ItemSend event doesn't fire. What am I missing? I vaguely recall
something about initializing the code at startup, however when I checked, all
of the references that I've found omit any information to the kind suggesting
that simply adding the procedure is sufficient.

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)

Debug.Print Now

If MsgBox("Request delivery and read receipts?", vbYesNo, "Freeman") =
vbYes Then
Item.ReadReceiptRequested = True
Item.OriginatorDeliveryReportRequested = True
Else
Item.ReadReceiptRequested = False
Item.OriginatorDeliveryReportRequested = False
End If

End Sub
 
Back
Top