Warning message when sending mail

[ramserp]

Hi friends,

I want set a message box "Please check once before sending" on mail sent item event. When we click sent button the above message should display and allow the user to edit mail. I am not good at vba. Please kindly help with required code this functionality.

Thanks & Regards
Ramesh

[Benzadeus]

Put on your ThisOulookSession area:
Dim blCanSend

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

If blCanSend Then
blCanSend = False
Else
MsgBox "Please check once before sending", vbCritical
blCanSend = True
Cancel = True
End If

End Sub

[ramserp]

Benzadeus (http://www.vbaexpress.com/forum/member.php?u=19707) vbmenu_register("postmenu_231497", true);


Thanks you very much for you reply.

Regards
Ramesh