Hi

I am assigning stationery via code to a new email as below. The problem is
that the image included in stationery does not appear in the sent mail. What
is the problem and how can I fix it? There must be someone who has done this
sort of thing, and outlook being around for so long someone must have
figured a way to do this.

Thanks

Regards


Code
====

Set fso = CreateObject("Scripting.FileSystemObject")
Set Ts = fso.OpenTextFile("F:\Email Stationery\Email_Template.htm", 1)

Set OutlookApp = New Outlook.Application
Set EM = OutlookApp.CreateItem(olMailItem)

With EM
.To = "
.Subject = "Any Subject"
.HTMLBody = Ts.ReadAll
.Send
End With


Content of F:\Email Stationery\Email_Template.htm
==================================

HTML
HEAD
/HEAD
BODY
img src="file:///F|/MyFolder/MyImage.jpg" width="89" height="59"
/body
/HTML