Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Embedding An Attachment In An Outlook Email
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
COM/DCOM et OLE Automation
Titre:
Embedding An Attachment In An Outlook Email
Divers
Thread ID:
01105833
Message ID:
01105833
Vues:
59
I am trying to embed an image in the body of an Outlook email. Again, I don't want it
as an attachment, I want the image displayed in the body.

I get the email, but the image is not there. Anyone know what's wrong here?
#INCLUDE Outlook.h

LOCAL oOutlook AS Outlook.Application
LOCAL oEmail AS Outlook.MailItem
LOCAL cAttachment AS String
LOCAL cRecipient AS String

oOutlook = CREATEOBJECT("Outlook.Application")
oEmail = oOutlook.CreateItem(OL_MAILITEM)

cAttachment = LOWER(ADDBS(SYS(5) + SYS(2003)) + "test.jpg")
cRecipient  = "kevin@marois-consulting.com"

WITH oEmail

  .To      = cRecipient
  .Subject = "Test Email"
  .Body    = "This is the body"

  .Attachments.Add(cAttachment, OL_ATTACH_TYPE_EMBED)
		
  .Send()

ENDWITH

RETURN
Everything makes sense in someone's mind
public class SystemCrasher :ICrashable
In addition, an integer field is not for irrational people
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform