Sending EMail from Access

1
Sending E-Mail from Access

• Doug Murphy
• Murphys Creativity
• doug_at_murphyscreativity.com

2
Topics we will cover

• Send from Access using SendObject
• Automate Outlook
• Get around Outlook Security using Redemption
• Examples

3
SendObject

• expression.SendObject(ObjectType, ObjectName,
  OutputFormat, To, Cc, Bcc, Subject, MessageText,
  EditMessage, TemplateFile)
• Uses computers default e-mail client to send
  message
• Does not allow formatting of the e-mail, e.g.,
  specify font, font size, etc.

4
Automate Outlook

• Early Bound
• use GetObject(pathname , class)
• Must set reference to Outlook or e-mail program
• Version sensitive
• Provides intelisense support
• Allows use of templates and formating
• Dim oOut As Outlook.Application
• Dim mItem As Outlook.MailItem
• Set oOut New Outlook.Application
• Set oOut GetObject("", "Outlook.Application")
• Set mItem oOut.CreateItem("Outlook.MailItem(0)"
  )

5
Automate Outlook

• Late Bound
• use CreateObject(class,servername)
• No reference to Outlook required
• Not version sensitive
• Does not provide intelisense support
• Allows use of templates and formating
• Dim oOut As Object
• Dim mItem As Object
• Set oOut CreateObject("Outlook.Application",
  "localhost")
• Set mItem oOut.CreateItem(0)

6
Security Issues

• Office XP service pack 2 and Office 2003 will not
  allow direct sending of e-mail
• Not a problem if opening the e-mail before
  sending
• If automating to send multiple messages look at
  Outlook Redemption http//www.dimastr.com/redempti
  on/
• Free to use individually
• 190 for distribution license and documentation