Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
E-mail Automation
Message
From
29/12/2000 18:42:12
 
 
To
29/12/2000 00:22:40
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00456519
Message ID:
00458000
Views:
26
Try this (amended) code. Noe the "to" is gone and the recipient is added to the Recipients collection.

*-- Outlook 2000
#DEFINE MAILITEM 0
#DEFINE IMPORTANCELOW 0
#DEFINE IMPORTANCENORMAL 1
#DEFINE IMPORTANCEHIGH 2

oOutLookObject = CreateObject("Outlook.Application")
oEmailItem = oOutLookObject.CreateItem(MAILITEM)
WITH oEmailItem
.Recipients.Add("charles.hurmiz@stjude.org")
.Subject = "All I want is my CD's"
.Importance = IMPORTANCEHIGH
.Body = "I'm Still Waiting!"+chr(13)+'So are others. Help them have a happy holidays'
.Send
ENDWITH


>Thanks. I'm trying to understand the logic here. I just created a test.prg that included this code, substituting my email address for the 3stooges. However, no email was sent to my email address. What am I missing?
------------------------------------------------
John Koziol, ex-MVP, ex-MS, ex-FoxTeam. Just call me "X"
"When the going gets weird, the weird turn pro" - Hunter Thompson (Gonzo) RIP 2/19/05
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform