Microsoft Access SendObject

Microsoft Access SendObject

Microsoft Access has a built in command that can be used to send out an email. The command is the SendObject command. The function below shows how to use the command. If you need more flexibility and formatting of the email, be sure and visit our Outlook Email function within access.

Public Sub doEmailSendObject(sTo As String, sSubject As String, sBody As String, sFile As String, Optional bPreview As Boolean = False, Optional sCC As String = "", Optional sbCC As String = "") On Error GoTo doEmailSendObjectErr If bPreview = False Then DoCmd.SendObject acSendNoObject, "", "", sTo, sCC, sbCC, sSubject, sBody Else DoCmd.SendObject acSendNoObject, "", "", sTo, sCC, sbCC, sSubject, sBody, True End If Exit Sub doEmailSendObjectErrExit: Exit Sub doEmailSendObjectErr: MsgBox Err.Description, vbOKOnly, Err.Source & ":" & Err.Number Resume doEmailSendObjectErrExit End Sub

If you need any help implementing any of these code samples or modifications made for your needs, please Click Here to get a free quote for your Microsoft Access Development needs. 

Click Here to learn more about the WSI quoting process.