Hey Bret,
Here's the code:
** NOW BEGINNING FAXING VIA OUTLOOK PROCEDURE **
*cAddress = "[fax:404-371-5423]"
cAddress = "
jkt6@cdc.gov"
cSubject = "Testing AutoFaxing Error Reports"
cBody1 = "This is a test, this is only a test. "
cAttachment1 = "C:\MY DOCUMENTS\" + of2w.doc_filename
*!* oOutlook = CREATEOBJECT("Outlook.Application")
oMailItem = oOutlook.CreateItem(0)
WITH oMailItem
.To = cAddress
.Body = cBody1
.Subject = cSubject
.Attachments.Add(cAttachment1)
*.Attachments.Add(cAttachment2)
.Send()
ENDWITH
Thanks in Advance.
J. Turner