Tiff's fax as blank pages using MSFax and FXSCOMEX.DLL

  • Thread starter Thread starter RW
  • Start date Start date
R

RW

Can someone tell my why my TIFF's come out blank when I fax them?

I am trying to fax TIFF's from a VB program using the Microsoft Fax Service
Extended COM Type Library. I can send txt and pdf files just fine but TIFF's
are a problem. MSFax will only accept G4 Compressed TIFF's and they come out
blank on the fax machine. On the fax server's console they show as solid
black. When I view the TIFF's in any viewer, they display fine. I have
tried many TIFF from different sources. When I print them to the shared fax
printer and fax them via the wizard, they fax just fine. I have made sure I
have the latest versions of FXSCOMEX.DLL (5.2.3790.3959) and I have tested
with 5.2.2600.2180 and 5.2.1776.1023 always with the same results. I am
using the code right out of the MSDN site:
http://msdn.microsoft.com/en-us/library/ms692936(VS.85).aspx
Private Sub Form_Load()
Dim objFaxDocument As New FAXCOMEXLib.FaxDocument
Dim objFaxServer As New FAXCOMEXLib.FaxServer
Dim objSender As FaxSender
Dim JobID As Variant

'Error handling
On Error GoTo Error_Handler

'Connect to the fax server
objFaxServer.Connect "<My server name here>"

'Set the fax body
objFaxDocument.Body = "<My TIFF here>"

'Name the document
objFaxDocument.DocumentName = "My First Fax"

'Set the fax priority
objFaxDocument.Priority = fptHIGH

'Add the recipient with the fax number 12225550100
objFaxDocument.Recipients.Add "<MY Fax Number>", "Bud"

'Choose to attach the fax to the fax receipt
objFaxDocument.AttachFaxToReceipt = True

'Set the cover page type and the path to the cover page
objFaxDocument.CoverPageType = fcptSERVER
objFaxDocument.CoverPage = "generic"

'Provide the cover page note
objFaxDocument.Note = "Here is the info you requested"

'Provide the address for the fax receipt
objFaxDocument.ReceiptAddress = "(e-mail address removed)"

'Set the receipt type to email
objFaxDocument.ReceiptType = frtMAIL

'Specify that the fax is to be sent at a particular time
'objFaxDocument.ScheduleType = fstSPECIFIC_TIME
''CDate converts the time to the Date data type
'objFaxDocument.ScheduleTime = CDate("4:35:47 PM")

objFaxDocument.Subject = "Today's fax"

'Set the sender properties.
objFaxDocument.Sender.Title = "Mr."
objFaxDocument.Sender.Name = "Bob"
objFaxDocument.Sender.City = "Cleveland Heights"
objFaxDocument.Sender.State = "Ohio"
objFaxDocument.Sender.Company = "Microsoft"
objFaxDocument.Sender.Country = "USA"
objFaxDocument.Sender.Email = "(e-mail address removed)"
objFaxDocument.Sender.FaxNumber = "12165555554"
objFaxDocument.Sender.HomePhone = "12165555555"
objFaxDocument.Sender.OfficeLocation = "Downtown"
objFaxDocument.Sender.OfficePhone = "12165555553"
objFaxDocument.Sender.StreetAddress = "123 Main Street"
objFaxDocument.Sender.TSID = "Office fax machine"
objFaxDocument.Sender.ZipCode = "44118"
objFaxDocument.Sender.BillingCode = "23A54"
objFaxDocument.Sender.Department = "Accts Payable"

'Save sender information as default
objFaxDocument.Sender.SaveDefaultSender

'Submit the document to the connected fax server
'and get back the job ID.

JobID = objFaxDocument.ConnectedSubmit(objFaxServer)

MsgBox "The Job ID is :" & JobID(0)

objFaxServer.Disconnect

Exit Sub

Error_Handler:
'Implement error handling at the end of your subroutine. This
' implementation is for demonstration purposes
MsgBox "Error number: " & Hex(Err.Number) & ", " & Err.Description

End Sub


Any ideas for how I can solve this issue?
 
Well, I partially answered my own question. The problem was on the server.
The standard program that renders TIFF's doesn't work well. It's what comes
installed with Server 2003. I changed TIFF viewers to the old Kodak one from
Windows 200 and earlier and it works fine with Group 3 TIFF's, but not Group
4. So the problem seems to be in the standard Image Viewer as reference in:
[HKEY_CLASSES_ROOT\TifImage.Document\shell\printto\command]
Which reads:
rundll32.exe <Drive>:\WINDOWS\system32\shimgvw.dll,ImageView_PrintTo /pt
"%1" "%2" "%3" "%4"

I installed the old Kodak viewer, pointed the above line to it, and it works.

Now: any idea why ImageView doesn't work?
 
Back
Top