View Single Post
  #1  
Old January 31st 07, 01:44 AM posted to microsoft.public.outlook.program_vba
tim johnson
external usenet poster
 
Posts: 4
Default HTMLBody with images

Hi there,

I am working on the development of a database (Access). I think that
because the issues I'm having are outlook related, though, that this is the
appropriate place for posting this.

I use a VBA sub to create an instance of Outlook by which I send
"personalized" emails. Most of these emails are designed using Word and
include images, then are saved as HTML files. My code is currently:

Set FSO = CreateObject("Scripting.FileSystemObject")
Set bdy = FSO.OpenTextFile(strFile,1)
strText = bdy.readall

With objMail
.To = strTo
.Subject = strSubject
.HTMLBody = strText
.Send
End With

The email's body & formatting come through just fine, but the images are
broken links (it appears from the source as though they're tring to link to a
local location).

Is there a way to include the images without having to post them on the
internet each time?

Thanks in advance
Ads