I've read thru the files on this topic and it doesn't seem like anyone has addressed this issue:
I'm using Access 2010 and I want to send the form (not report) via pdf preferability)
I have a table that stores the email addresses; button on the form which when the user hits is suppose to make an pdf of the form....
Sub OpenSendRequestAsAttachment()
Dim rsEmail As DAO.Recordset
Dim strEmail As String
Set rsEmail = CurrentDb.OpenRecordset("tblDEmailList") 'table where email is
strEmail = rsEmail.Fields("dEmailAddress").Value
rsEmail.MoveNext
Do While Not rsEmail.EOF
strEmail = strEmail & " ; " & rsEmail.Fields("dEmailAddress").Value
rsEmail.MoveNext
Loop
DoCmd.SendObject , Forms!frmDataSystem, acFormatPDF, strEmail, , , "Data System Request", "See Attached Request", , False
I've tried many variations, with various runtime errors,..help
I'm using Access 2010 and I want to send the form (not report) via pdf preferability)
I have a table that stores the email addresses; button on the form which when the user hits is suppose to make an pdf of the form....
Sub OpenSendRequestAsAttachment()
Dim rsEmail As DAO.Recordset
Dim strEmail As String
Set rsEmail = CurrentDb.OpenRecordset("tblDEmailList") 'table where email is
strEmail = rsEmail.Fields("dEmailAddress").Value
rsEmail.MoveNext
Do While Not rsEmail.EOF
strEmail = strEmail & " ; " & rsEmail.Fields("dEmailAddress").Value
rsEmail.MoveNext
Loop
DoCmd.SendObject , Forms!frmDataSystem, acFormatPDF, strEmail, , , "Data System Request", "See Attached Request", , False
I've tried many variations, with various runtime errors,..help