Send Email Improvement

[Lesg]

Hi Guys, hope you can help.

I have an action to send email as part of a close form button action.

DoCmd.SendObject acSendReport, strReport, acFormatPDF, StrTo, , , "Credit Note Raised (Edited)", "Please make the relevant stock changes for this/these items, see attached."

This works fine, but it needs the email to be sent before the close form is completed. Additionally, if I cancel the send, it then goes to the debug/end option.



I would therefore like to way to be able to cancel the send if not required as part of the process.

Anyone any suggestions to improve this?

Thanks

[Minty]

If you use Outlook automation you can trap the cancel error and simply move on.
I don't think you can do that with within the SendObject process.

If you search the similar threads below you should find some suitable code examples.
If you are stuck with the code post back here.

[Gicu]

Can you show the entire procedure including the End Sub? Do you have any error trapping?
Here is a link that shows you how to add error trapping to catch the 2501 error (cancelled by user):
https://social.msdn.microsoft.com/Fo...orum=accessdev

Cheers,