Insert gif (image) with VBA 2 (1 Viewer)

Petros

Registered User.
Local time
Today, 05:11
Joined
Jun 30, 2010
Messages
145
Hi all again, (i use Access 2007)

how do i reference a gif image stored on my Cdrive image folder to be inserted in below code i use for my email template. The image is the Header of the email body.
I use the exchange method.

Dim strEmail, strBody As String
Dim objOutlook As Outlook.Application
Dim objEmail As Outlook.MailItem
Dim strAttachmentPath As String

Set objOutlook = CreateObject("Outlook.application")
Set objEmail = objOutlook.CreateItem(olMailItem)

strEmail = txtEmail
strBody =

With objEmail
.SentOnBehalfOfName = Me!FROM
.To = Me!SalesRep
.CC = Me!SalesMngr
.Subject = Me!Subjectline
.HTMLBody = strBody
Set objOutlookAttach = ...
Set objOutlookAttach = ...
Set objOutlookAttach = ...
Set objOutlookAttach = …

.Send

End With
End Sub
 

Petros

Registered User.
Local time
Today, 05:11
Joined
Jun 30, 2010
Messages
145
Subject should readd:
Insert gif (image) with VBA / Access
 

Users who are viewing this thread

Top Bottom