marco
11 de Mayo del 2004

Alguien me puede escribir unas lineas de como mandar un email desde un programa en Fox??

Gracias

foxleonardo
11 de Mayo del 2004

Si quieres mas información, regístrate en mi sitio y escribe tus consultas. www.empresadae.cl

LPARAMETERS strProfile,strPassword,strRecipient,strSubject,strBody
*//
theApp = CreateObject("Outlook.Application")
theNameSpace = theApp.GetNameSpace("MAPI")
theNameSpace.Logon(strProfile , strPassword)
theMailItem = theApp.CreateItem(0)
*//
theMailItem.Recipients.Add(strRecipient)
theMailItem.Subject = strSubject
theMailItem.Body = strBody
theMailItem.Send
theNameSpace.Logoff