Send Object Code

gls

Want to be guru
Local time
Tomorrow, 06:57
Joined
Mar 5, 2008
Messages
40
Hi,

I have the following code in my DB. What I would like it to do is attach 2 reports to the one email. You can see one report is attached "rptCST_Access_Request" I would also like to attach "rptCST_Access_Request_Message" to the same email. Any VB Gurus out there that would have a better idea. :)

Thankyou

Private Sub Email_Report_to_CST_Click()
On Error GoTo Err_Email_Report_to_CST_Click

Dim stDocName As String

stDocName = "rptCST_Access_Request"
DoCmd.SendObject acReport, "rptCST_Access_Request", _
acFormatSNP, "rptCST_Access_Request.snp", True


Exit_Email_Report_to_CST_Click:
Exit Sub

Err_Email_Report_to_CST_Click:
MsgBox Err.Description
Resume Exit_Email_Report_to_CST_Click

End Sub
 

Users who are viewing this thread

Back
Top Bottom