>>How do I send e-mails to all of our e-mail addresses in a Visual Foxpro table? We use Outlook 2000. Thanks.
>
>Take a look at the newsletters at
www.vfug.org. John Koziol has written some articles dealing with VFP and Outlook 2000, starting with September 2000.
Here is my real simple spam project to get my .net disks back:
*-- Outlook 2000
#DEFINE MAILITEM 0
#DEFINE IMPORTANCELOW 0
#DEFINE IMPORTANCENORMAL 1
#DEFINE IMPORTANCEHIGH 2
oOutLookObject = CreateObject("Outlook.Application")
oEmailItem = oOutLookObject.CreateItem(MAILITEM)
WITH oEmailItem
.To = "
charles.hurmiz@stjude.org"
.Subject = "All I want is my CD's"
.Importance = IMPORTANCEHIGH
.Body = "I'm Still Waiting!"+chr(13)+'So are others. Help them have a happy holidays'
.Send
ENDWITH
&& .Attachments.Add("c:\mydir\sample.txt") &&Note that the fully qualified path and file is required.
Release oEmailItem
Release oOutLookObject