Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Fax # parameter passed
Message
De
20/02/1998 10:34:59
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Produits tierce partie
Divers
Thread ID:
00079994
Message ID:
00080108
Vues:
27
>Is there a Fax program out there that will allow me
>to pass as a parameter the Fax #, and then have it
>call that number. I am using Foxpro 2.6.
>The Fax software I have seen, always pops up a dialog box
>for me to manually enter the Fax #, even though I already
>have the Fax # stored in a Foxpro table.
>
>Thanks,
>David Anderson

Microsoft Fax will let you do this. Of course, if you on't specify the number, it will pop up and ask you. Following is some code I copied from here a fewmonths back. My apologies to whoever posted this, I cannot remember, so I cannot give credit:

>You can fax from VFP using MAPI and Exchange. Here is how:
>
>1. Go to your exchange profile Delivery tab and make sure that the
>Microsoft Fax Delivery Transport is the first item on the list. If it is

>not you will get errors
>
>2. Place the MAPI SESSION (oleSession) AND MAPI MESSAGE (oleMessage) OLE

>objects on your form
>
>3. Place the following code in the Init Method of your form:
>thisform.oleSession.LogonUI = .F.
>thisform.oleSession.UserName="MS Exchange Settings" (Name of your

>

>Exchange profile)
>4. Create a method on your form called SendFax, and in it place the
>following code:
>thisform.oleSession.Signon() && this signs you on to a
>session
>thisform.oleMessage.SessionId = thisform.oleSession.SessionId
>thisform.oleMessage.Compose()
>thisform.oleMessage.MsgIndex = -1
>thisform.oleMessage.RecipDisplayName ="[FAX:555-5555]" &&
>Recipient's fax

>number
>thisform.oleMessage.MsgSubject = "This is your Subject"
>thisform.oleMessage.MsgNotText = "This is your Message Text"
>thisform.oleMessage.ResolveName() && this acually sends it
>thisform.oleMessage.Message.Send(.F.) && this supresses dialog
box
>thisform.oleSession.Signoff() && sign off mail
>
>5. Just gather your data and place them in the appropriate places and
call
>thisform.SendFax().
>
Erik Moore
Clientelligence
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform