Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Sending E-Mail via Outlook
Message
From
13/05/1998 13:02:47
 
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00099107
Message ID:
00099117
Views:
22
>I would like to be able to send email from VFP 5.0, I know how to do it using Windows Messaging but would like to use Outlook Express. Basically I want my users to be able to compile a message in VFP enter the email address,subject, and press go.
>
>Any help much appreciated
>Pete Kane

Pete,
Hope this code will help you. But i'm not able to definitively send it, just create it and put into the outbox folder of outlook. If you know how to send it tell me please.


bandeja = CreateObject("Outlook.Application")
mensaje = bandeja.CreateItem(0)
with mensaje
.Subject = "Envio diario concursos públicos. "
.Body = "Ficheros adjuntos"
.Recipients.Add("agp@kender.es")
.recipients(1).Type = 1
* attachments
m.nomfile = "prueba.txt"
if file(m.nomfile)
.attachments.Add(m.nomfile, 1)
endif
.Send
endwith
release bandeja
Saludos,
A.G.P.
---------
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform