L'auteur
Mike Gagnon
 Canada
Membre Simple
# 0000000025
enregistré le 14/10/2004
Gagnon Mike
Pointe Cla H9R 3K8
de la société Carver Technologies Inc.
 Fiche personnelle
 Note des membres
pas de note
|
Contributions > 09 - Automation
Comment envoyer un Fax avec Outlook.
# 0000000058
ajouté le 16/11/2004 12:42:44 et modifié le 29/03/2006
consulté 13989 fois
Niveau
initié
Version(s) Foxpro :
VFP 7.0
|
| Description |
|---|
Puisque Microsoft nous fourni un moyen de faire l'envoi de fax avec Outlook, pour quoi ne pas l'automatiser?. Voici l'étape à prendre avant de pourvoir commencer. Dans Outlook (Édition Anglaise 2002-2003) Tools|E-mail Accounts|Add a new e-mail account|Additional Server Types|Fax Mail Transport. Dans Outlook (Édition Anglaise 2000) 1. Tools|Services and ajouter Fax Mail Transport Une fois le Transport ajouter, une fois le format de "To" est reconnu, il enverra un fax plutot qu'un courriel. |
| Code source : |
|---|
#DEFINE olMailItem 0
myOLApp = createobject("Outlook.Application")
myOLItem = myOLApp.CreateItem(olMailItem)
WITH myOLItem
.To = "[fax: 555 111-2222]" && Il faut respecter ce format.
.Subject = "Fax Suject"
.Body = "Un échantillion de fax."
.Attachments.Add("C:\TEMP\exemple.doc") && Optionnel.
ENDWITH
myOLItem.Send()
RELEASE myOLApp
RELEASE myOLItem
|
| Commentaires |
|---|
Aucun commentaire enregistré ...
|
Retour à la liste
