Email Multiple reports in same message

[broncojim]

Anyone know how to modify the following code to email 3 reports in to the
same person in the same email?

Private Sub Command132_Click()
On Error GoTo Err_Command132_Click

Dim stDocName As String

stDocName = "Transformer Missing Bill of Lading"
DoCmd.SendObject acReport, stDocName

Exit_Command132_Click:
Exit Sub

Err_Command132_Click:
MsgBox Err.Description
Resume Exit_Command132_Click

End Sub

 

[Alex Dybenko]

Hi,
I think you have to export all three reports to rtf or whatever format you
like, then create new outlook message and attach 3 files to it.
A sample code you can find here:
http://www.mvps.org/access/modules/mdl0019.htm

--
Best regards,
___________
Alex Dybenko (MVP)
http://accessblog.net
http://www.PointLtd.com