send email with graphics

  • Thread starter Thread starter SAC
  • Start date Start date
S

SAC

I know how to send emails from access, but I now I'd like to be able to send
a newsletter with graphics as the body of the email and not as an
attachment.

Is this possible? If so, how?

Thanks.
 
One alternative is to use Outlook automation to create an email in HTML
format and embed the HTML image tags in the HTML body text. Below is a KB
article reference as well as a simple example. You will need a reference to
the Outlook Object Library, of course.

http://support.microsoft.com/default.aspx?scid=kb;en-us;209948

Public Function CreateEmail()

Dim ol As New Outlook.Application
Dim itm As Outlook.MailItem

Set itm = ol.CreateItem(olMailItem)

itm.To = "(e-mail address removed)"
itm.Subject = "Test Email"
itm.BodyFormat = olFormatHTML
itm.HTMLBody = "<HTML><Body><Font size='22' color='#AA0033' Face='Freestyle
Script'><b><i>This is test.</i></b></Font><br><img id='imgLogo'
src='c:\images\myimage.jpg' alt='' ></Body></HTML>"
itm.Save

End Function

--
David Lloyd
MCSD .NET
http://LemingtonConsulting.com

This response is supplied "as is" without any representations or warranties.


I know how to send emails from access, but I now I'd like to be able to send
a newsletter with graphics as the body of the email and not as an
attachment.

Is this possible? If so, how?

Thanks.
 
Back
Top