Using SendObject to open report in an email

[Cameron]

I have been trying to figure out why a SendObject method is not opening a
messagebox and allowing me to send a report to an email recipient.

The following is the click command under the button that is to call the
report and send it via email.

Private Sub Command52_Click()
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70

Dim stDocName As String

stDocName = "radar report"
DoCmd.SendObject acSendReport, stDocName, acFormatHTML, , , , "RADAR",
"New RADAR for your information", True


End Sub

When you press the button you get a box popping up saying that the report is
processing but it never shows the email. What might be the issue with this?

 

[Damian S]

Hi Cameron,

The syntax looks fine - try using snapshot format (acFormatSNP) instead of
HTML and see how it goes.

How big is the report? If it's a huge report, it might just take a long
time to convert.

Damian.