ATOUTFOX
COMMUNAUTÉ FRANCOPHONE DES PROFESSIONNELS FOXPRO
Visual FoxPro : le développement durable

Comment envoyer un Fax avec Outlook.   



L'auteur

Mike Gagnon
Canada Canada
Membre Simple
# 0000000025
enregistré le 14/10/2004

Gagnon Mike
Pte Claire Quebec - Canada
de la société MCRG Software
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é 10740 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é ...

Publicité

Les pubs en cours :


www.atoutfox.org - Site de la Communauté Francophone des Professionnels FoxPro - v3.4.0 - © 2004-2019.
Cette page est générée par un composant COM+ développé en Visual FoxPro 9.0-SP2-HF3