Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Error message
Message
De
21/09/2000 11:02:31
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Titre:
Divers
Thread ID:
00418944
Message ID:
00419054
Vues:
24
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
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform