[COLOR="Navy"]Private Sub[/COLOR] cmdSend_Click()
[COLOR="DarkGreen"]' NOTE: modify the recipient, subject and message text as appropriate[/COLOR]
DoCmd.SendObject acSendNoObject, , , _
"recipient@email.com", , , _
"Subject", _
"Message Text", _
[COLOR="navy"]True
End Sub[/COLOR]