We have found some good tech on sending email and attachments from within Foxpro 9.
We are also using MS Word for the spell checking.
1. Now we need to the ability to send email to multiple people. Adding a comma or semi colon and a second email does not work.
2. We also need to the ability to send multiple attachments. Can we spin something off of the code below from another question?
#DEFINE CdoMailFormatMime 0 && MIME format.
#DEFINE CdoMailFormatText 1 && Uninterrupted plain text (default value).
#DEFINE CdoBodyFormatHTML 0 && The Body property is to include HTML.
#DEFINE CdoBodyFormatText 1 && The Body property is to be exclusively in plain text (default value).
LOCAL oEmail
oEmail = CREATEOBJECT("CDONTS.NewMa
il")
oEmail.From = cFromName + " <" + cFromEmail + ">"
oEmail.To = cToName + " <" + cToEmail + ">"
oEmail.Cc = cCcName + " <" + cCcEmail + ">"
oEmail.Bcc = cBccName + " <" + cBccEmail + ">"
oEmail.Subject = cSubject
oEmail.Body = cBody
oEmail.MailFormat = cdoMailFormatMIME
oEmail.BodyFormat = cdoBodyFormatHTML
oEmail.AttachFile(cFileNam
e)
oEmail.AttachURL(cURL)
oEmail.Send
RELEASE oEmail
Start Free Trial