>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.
---------