WinFax Add Recipient problem 
Author Message
 WinFax Add Recipient problem

I test runt the program in Windows ME, Windows 98, Winfax 10.0, VFP7 SP1, it
work fine.

But if i run in Winfax10.02, Windows XP, VFP7 SP1, then I can't add the
recipient into the recipient list.

Please help,
Thank You



Wed, 31 Aug 2005 15:03:52 GMT  
 WinFax Add Recipient problem
I found the solution from Winfax help file, the coding as below :

USE data\message

 ** This program uses the stock variables
 ** "FaxChan" and "retvar".
 ** NOTE: FoxPro requires you to use different
 ** types of quotation marks, as shown below.
 ** (...'"showsendscreen("0")')
 ** ==================================

 ** Set the WinFax state to CONTROL mode.
 FaxChan = DDEInitiate("FAXMNG32","CONTROL")

 ** Take the modem offline.
 retvar=DDEExecute(FaxChan,"GoIdle")

 ** Set the WinFax state to TRANSMIT mode.
 FaxChan = DDEInitiate("FAXMNG32","TRANSMIT")

 ** Set up the fax including attachments and
 ** cover pages.
 ** setcoverpage
 *retvar=DDEPoke(FaxChan,"sendfax",
'setcoverpage("C:\WINFAX\DATA\9886000.CVR")')

 **fillcoverpage
 *retvar=DDEPoke(FaxChan,"sendfax",
'fillcoverpage("C:\WINFAX\DATA\TEMP1.TXT")')

 **attach
 **retvar=DDEPoke(FaxChan,"sendfax", 'attach("C:\WINFAX\DATA\1605002.FXR")')
 *retvar=DDEPoke(FaxChan,"sendfax", 'attach("C:\LAI.DOC")')

 ** Set up the recipient information.
 ** NOTE: Recipient data is sensitive
 ** to position and to separators. However,
 ** you do not need to enter parameters after

 ** the last required one.

retvar=DDEPoke(FaxChan,"sendfax",'recipient("011444161234","11:11:11","12/12
/95","Bob Dobbs","Delta Creations","Annual Budget","Budget","20321","Fax")')

 ** Set the fax resolution.
 *retvar=DDEPoke(FaxChan,"Sendfax",'resolution("HIGH")')

 ** or
 retvar=DDEPoke(FaxChan,"Sendfax",'resolution("LOW")')

 ** Turn the modem back on.
 retvar=DDEExecute(FaxChan,"GoActive")

 ** Use this line to bypass the WinFax PRO Send dialog.
 ** Change the "0" to "1" to show the Send
 ** dialog (this forces a "manual" send).
 retvar=DDEPoke(FaxChan,"sendfax",'showsendscreen("1")')

USE data\cust
REPORT FORM reports\fax TO printer NOCONSOLE
 ** Send the fax.
 *retvar=DDEPoke(FaxChan,"sendfax","SendFaxUI")
* retvar=DDEPoke(FaxChan,"sendfax","SendFaxUI")

 ** Close the DDE channel to release
 ** the resource.
 retvar=DDETerminate(FaxChan)



Sat, 03 Sep 2005 14:20:27 GMT  
 
 [ 2 post ] 

 Relevant Pages 

1. MAPI Messages Control (Add Recipient)

2. MAPI Messages Control (Add Recipient)

3. Problem with Winfax SDK Send Object in VFP7 app

4. winfax problem

5. Winfax pro10.0 SDK send problem !

6. Renew Winfax problem

7. winfax problem

8. Winfax with vfp problem

9. FP26 and WinFax problem

10. MSMAPI won't work with more than one recipient

11. Original recipient from undelivered email

12. How can I replicate recipients between Organization?

 

 
Powered by phpBB® Forum Software