hi guys, can anyone help how to embed an image to a mail body ?? the following code sends the mail and the mail just says embedded image:
thank you
Code:Dim SendID Dim Subject Dim Body Dim olMail As MailItem Set otlApp = CreateObject("Outlook.Application") Set olMail = otlApp.CreateItem(olMailItem) Dim oAttach As Outlook.Attachment SendID = "me@home.com" With olMail .To = SendID If CCID <> "" Then .CC = CCID End If .Subject = "picture embedded" .Attachments.Add "C:\Users\Dave Moses\Desktop\Links\Stairlift Pics\My picture.jpg", olByValue, 0 .HTMLBody = .HTMLBody & "<br><B>Embedded Image:</B><br>" _ & "<img src=?cid:My picture.jpg?" & "width=?500' height=?200?><br>" _ & "<br>Best Regards, <br>Sumit</font></span>" .Display .Send End With MsgBox ("your Mail has been sent to " & SendID)