Question

How to send a mail from MS Access Form. ?

Assume I have MS Access Application with a DashBoard form.
I have send mails to certain mail address
like sending a notification mail on clicking “send notification button”
How to do this with codebuilder in MS access

Answer 1

I found that you can send mail using this code snippet

Private Sub send_mail()

   Dim olApp As Object
   Dim objMail As Object

   On Error Resume Next 'Keep going if there is an error
   Set olApp = GetObject(, "Outlook.Application") 'See if Outlook is open

    If Err Then 'Outlook is not open
       Set olApp = CreateObject("Outlook.Application") 'Create a new instance 
    End If
  'Create e-mail item
   Set objMail = olApp.CreateItem(olMailItem)

   With objMail
   'Set body format to HTML
     .BodyFormat = olFormatHTML
     .To = "[e-mail]"
     .Cc ="[e-mail]"
     .Subject = "Subject LIne"
     .HTMLBody = "<htmltags>Body Content</htmltags>"
     .send
   End With

  MsgBox "Operation completed successfully"

 End Sub

Source : Thread from Access Programmer site