` Printed Icetips Article

Icetips Article



Par2: Interfacing to WinFax Pro using DDE
1999-07-09 -- Leonid Chudakov
 
This is how I'm sending .txt files via WinFax:

  WinFaxServer = DDECLIENT('FAXMNG','CONTROL')
  If winfaxServer <> 0 Then
    DDEEXECUTE(WinFaxServer,'GoIdle')
    DDECLOSE(WinFaxServer)
    WinFaxServer = DDECLIENT('FAXMNG','TRANSMIT')
    DDEPOKE(WinFaxServer,'sendfax','recipient("' & CLIP(AGE:Phone) &
'")')
    DDEPOKE(WinFaxServer,'sendfax','attach("' & CLIP(TxtFileName) &
'")')
    !DDEPOKE(WinFaxServer,'sendfax','showsendscreen("1")')
    DDEPOKE(WinFaxServer,'sendfax','resolution("HIGH")')
    DDEPOKE(WinFaxServer,'sendfax','SendfaxUI')
    WinFaxServer = DDECLIENT('FAXMNG','CONTROL')
    DDEEXECUTE(WinFaxServer,'GoActive')
    DDECLOSE(WinFaxServer)
    WinFaxServer = 0
  Else
    Message('No WinFax detected.')
    EXIT
  End



Printed May 3, 2024, 2:37 pm
This article has been viewed/printed 35111 times.