Send an Access Report via email in the message body
I want to be able to send reports by email and have the report be the message body of the email and not an attachment. (Like when using the Send Page by email function of Internet Explorer)
I have used the following to send reports via email as Attachments.
Dim stDocName As String
stDocName = "rptReport"
DoCmd.OpenReport stDocName, acPreview, , "[PersonID] ='" & Me.PersonID & "'"
DoCmd.SendObject acSendReport, "rptReport", acFormatSNP, "firstname.lastname@example.org", , , "Vacation approval request", "Please review the attached vacation request and approve it via the database", False
Is there a way to send the report within the Message body?