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é 14317 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é ...
|