Create TIFF from WORD w/ MSFAX and FAXCOMEXLib
How can I use the fax server (MSFAX ) with FAXCOMEXLib to create a TIFF
file from a WORD document? I've had very good success with a VB fax app using
FAXCOMEXLib, and I know that I can use it with MSFAX to fax a WORD document,
but I don't want to fax it. Rather, I just want to capture the TIFF document
that is built when the WORD document is faxed. That is, I want to get the
TIFF file without actually faxing the document to someone -- essentially,
I'd like to fax it to a file. I haven't found any information on the web
about this. Do you know if this can be done?
Thanks for any help.
file from a WORD document? I've had very good success with a VB fax app using
FAXCOMEXLib, and I know that I can use it with MSFAX to fax a WORD document,
but I don't want to fax it. Rather, I just want to capture the TIFF document
that is built when the WORD document is faxed. That is, I want to get the
TIFF file without actually faxing the document to someone -- essentially,
I'd like to fax it to a file. I haven't found any information on the web
about this. Do you know if this can be done?
Thanks for any help.
ASKER
Sicos,
Thanks for your response.
I'd like to try to avoid the $125 expense. Also, it would seem that the facility I'm seeking would be available w/ MSFAX and FAXCOMEXLib.
Lenny
Thanks for your response.
I'd like to try to avoid the $125 expense. Also, it would seem that the facility I'm seeking would be available w/ MSFAX and FAXCOMEXLib.
Lenny
ASKER
Ah Success.
I'm able to do exactly what I want using WORD automation along with MSFAX. One of the secrets was determining that selecting for printout both the FAX driver plus the Print to File option. Remarkably, it appears to work great. Here's a snippet
Public Sub PrintWordDoc(docname As String)
Dim WordObj As Word.Application
Dim Doc As Word.Document
Set WordObj = New Word.Application
Set Doc = WordObj.Documents.Open(doc
WordObj.WordBasic.FilePrin
WordObj.PrintOut Background:=False, append:=False, printtofile:=True, outputfilename:="c:\newfax
Doc.Saved = True
WordObj.Quit SaveChanges:=wdDoNotSaveCh
Set WordObj = Nothing
End Sub
One needs to select the WORD 10.0 Object Library in References
I'm able to do exactly what I want using WORD automation along with MSFAX. One of the secrets was determining that selecting for printout both the FAX driver plus the Print to File option. Remarkably, it appears to work great. Here's a snippet
Public Sub PrintWordDoc(docname As String)
Dim WordObj As Word.Application
Dim Doc As Word.Document
Set WordObj = New Word.Application
Set Doc = WordObj.Documents.Open(doc
WordObj.WordBasic.FilePrin
WordObj.PrintOut Background:=False, append:=False, printtofile:=True, outputfilename:="c:\newfax
Doc.Saved = True
WordObj.Quit SaveChanges:=wdDoNotSaveCh
Set WordObj = Nothing
End Sub
One needs to select the WORD 10.0 Object Library in References
The solution I did give work perfect.. I use it myself.
Greetings,
Sicos
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
If you want to buy an external component you could use the TIF printer from informatik
Look at http://www.informatik.com/ form more information
Greetings,
Sicos