>I have an application that can read and write email using Outlook. I got the basic software from FoxPro Advisor. However, I also need to do it using Eudora, Netscape and Aol also.
************************************
I use something I think I got here:
*Here is the short version:
oMSG = createobject("CDO.Message")
oMSG.To = "
emailtest@xyz.com"
oMSG.From = "
emailtest@xyz.com"
oMSG.Subject = "Hello Email test 101"
oMSG.TextBody = "This is an easy way to create an email"
oMSG.Send()
return
* add attachments
oMSG = createobject("CDO.Message")
oMSG.To = "
emailtest@xyz.com"
oMSG.From = "
emailtest@xyz.com"
oMSG.Subject = "Hello Email test 201"
oMSG.AddAttachment(“file:///c:\Attach.txt”)
oMSG.AddAttachment(“file:///c:\Attach1.txt”)
oMSG.AddAttachment(“file:///c:\Attach2.txt”)
oMSG.Send()
*Here is a way to embed your web page in your email:
oMSG = createobject("CDO.Message")
oMSG.To = "
emailtest@xyz.com"
oMSG.From = "
emailtest@xyz.com"
oMSG.Subject = "Hello Email test 301"
oMSG.CreateMHTMLBody("
http://www.stratfordsoftware.com")
oMSG.Send()
This works ok on all os I have tried as long as the user does have an email program set up. If they don't, you get an error and I have not been able to suppress it, even with the new TRY/CATCH stuff in VFP8.
Dr. Ken A. McGinnis
Healthcare software design