Dovrei realizzare una applicazione per inviare Fax.
Non ho mai affrontato l'argomento.
Avete qualche consiglio da darmi?
Pier Luigi
FiveTech Support Forums
FiveWin / Harbour / xBase community
Board index All products support Fax con Fivewin
Ti posso aiutare se usi WinFax.
EMG
Sì, sul computer ho installato WinFax.
Pier Luigi
FUNCTION SENDFAX( cFax, cDes, cOgg, cMsg )
LOCAL lOk := .F.
LOCAL oFax
BEGIN SEQUENCE
oFax = CREATEOBJECT( "WinFax.SDKSend" )
oFax:LeaveRunning()
IF oFax:SetTo( cDes ) = 1; BREAK; ENDIF
IF oFax:SetSubject( cOgg ) = 1; BREAK; ENDIF
IF oFax:SetCoverText( cMsg ) = 1; BREAK; ENDIF
IF oFax:SetNumber( cFax ) = 1; BREAK; ENDIF
IF oFax:AddRecipient() = 1; BREAK; ENDIF
IF oFax:Send( 0 ) = 1; BREAK; ENDIF
oFax:Done()
lOk = .T.
END SEQUENCE
RETURN lOkEMG
Il programma mi segnala
Error: Unresolved external '_HB_FUN_CREATEOBJECT' ...
Io uso Harbour e FW 2.5.
Pier Luigi
Allora sostituiscilo con
e linka la libreria hbole.lib.
EMG
oFax = TOleAuto():New( "WinFax.SDKSend" )e linka la libreria hbole.lib.
EMG
Funziona alla grande!
Grazie EMG.
PS
Per curiosità: quale DLL di Winfax viene richiamata?
Non lo so, mi dispiace.
EMG