Sending report to Outlook

L

Lisa

Hi

I have created a report which is an invoice. Once the
invoice has been opened and reviewed I would like to be
able to automatically email it or fax it to the customer -
where the email address or fax number are retrieved from
the customer table

How do you do this?

Any help is appreciated
 
F

Frank Stone

Here is a sub i use to send mail to a internal list of
reciepients which is select manually. It doesn't do all
that you want but it might get you started.

Private Sub cmdSendeMail_Click()
On Error GoTo Err_cmdSendeMail_Click
Dim stDocName As String
stDocName = "rptVMDForm"
DoCmd.SendObject acReport, stDocName, "RichTextFormat
(*.rtf)"
Exit_cmdSendeMail_Click:
Exit Sub
Err_cmdSendeMail_Click:
MsgBox Err.Description
Resume Exit_cmdSendeMail_Click
End Sub
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top