Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Outlook and VFP
Message
De
23/07/2009 17:04:31
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
COM/DCOM et OLE Automation
Titre:
Outlook and VFP
Divers
Thread ID:
01414069
Message ID:
01414069
Vues:
154
I have the following code
#DEFINE olFolderInbox 6
#DEFINE olFolderOutbox 4
#DEFINE olMailItem 0
#DEFINE olRecipient 4
#DEFINE olRecipients 17
#DEFINE IMPORTANCENORMAL 1
loApp=CreateObject("Outlook.Application")
loNamespace = loApp.GetNamespace("MAPI")
loFolder = loNamespace.GetDefaultFolder(olFolderInbox)
loEMailItem = loFolder.Items.Add(olMailItem)
loEmailItem.Subject = "Test VFP - Outlook"
loEmailItem.Recipients.Add('emailadress@someplace.com') && uses the Recipients collection
loEmailItem.Importance = IMPORTANCENORMAL
loEmailItem.HTMLBody = "Body"
loemailitem.Display()
*loEmailItem.Send
*loApp.Quit()
release loApp, loEmailItem
Display doesn't really show Outlook. It justs highlight Outlook in my Vista Application toolbar. Outlook doesn't become the active app. I have to click on it in the toolbar to really see it. Any way to really make it the active app. and see the e-mail I just created?
*******************************************************
Save a tree, eat a beaver.
Denis Chassé
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform