Hallo
ik wens vanuit Access mails te versturen via Outlook gebruik makend van HTML bestanden.
Dit lukt prima via onderstaande code (gedeelte). Maar van zodra het HTML bestand images bevat, worden deze niet opgenomen in de body van de mail.
Wie kan me daarbij verder helpen en ken de oorzaak van dit probleem.
alvast bedankt
ik wens vanuit Access mails te versturen via Outlook gebruik makend van HTML bestanden.
Dit lukt prima via onderstaande code (gedeelte). Maar van zodra het HTML bestand images bevat, worden deze niet opgenomen in de body van de mail.
Wie kan me daarbij verder helpen en ken de oorzaak van dit probleem.
alvast bedankt
Code:
For Each objAccount In Outlook.Application.Session.Accounts
If objAccount = ysender Then
Set objOutlook = CreateObject("Outlook.Application")
Set objOutlookMsg = objOutlook.CreateItem(olMailItem)
xmessage = GetBoiler(xbodylocation)
With objOutlookMsg
Set objOutlookRecip = .Recipients.Add(xrecipient)
objOutlookRecip.Type = olTo
.SendUsingAccount = objAccount
.subject = ysubject
.DeferredDeliveryTime = Now() + TimeSerial(0, 3, 0)
.BodyFormat = olFormatHTML
.HTMLBody = xmessage
If IsNull(Me![xreport]) Then
Else
Set objOutlookAttach = .Attachments.Add(xfilenaam)
End If
On Error Resume Next
.Send
End With
End If
Next
Set objOutlookRecip = Nothing
Set objOutlook = Nothing
Set objOutlookMsg = Nothing
Laatst bewerkt door een moderator:
