Sending 2 reports to 1 Fax in Winfax Pro

[eddy]

I'm trying to get 2 reports to become one fax in winfax pro. If I send 1 it works well. Trying to send a second will cause winfax to start a whole new send fax procedure. Does anyone have experience with this. The code I am using is as follows:

Private Sub cmdFax_Click()
Dim objWFXSend As New wfxctl32.CSDKSend

With objWFXSend
.SetHold (intHold)
.SetNumber ("618-541-1234")
.SetTo ("bob")
.SetCompany ("The Company")
.AddRecipient
.ShowCallProgess (1)
.SetPrintFromApp (1)
.Send (0)
DoCmd.OpenReport "myreport", acViewNormal
>>>***HOW DO I GET A DIFFERENT REPORT TO BE PAGE 2 IN WINFAX??***<<<
.done
End With

objWFXSend.LeaveRunning

End Sub

 

[nateobot]

You could create a new report and have each of those reports be sub-reports on it. I haven't worked with WinFax so not sure how to send two reports with it.

 

[eddy]

The isn't an option unfortunately as one report is an invoice and has a subreport already and the other report is a packing slip with it's own subreport. There may even be a 3 reports to fax out in one fax at the end. Logic says this is possible but I just can't figure out how to do it because of the lack of information with winfax objects

 

[DB7]

Eddy, I'm not that familiar with WinFax automation, but a little with just regular coding with winFax.

I'm surprised to see that by just "Opening" a report, WinFax will use this as the attachment?

The code I use, first creates a snapshot file of my report, then I use the path of that file, as the WinFax Attachment, argument.

I'm wondering if you can create a file with several pages, for each report?
Whether you use Word, TextFile, Snapshot, or HTML etc., you could write to the files as many reports as you like, then use Path as the Attachment argument.

With all do respect, Theoretically, i believe this is more feasible than opening several reports and have Winfax recognize them as one?

Good luck either way!

 

[DB7]

I retract, I see that WinFax is your default printer....

That's how opening a report in normal view, sends to Winfax.

 

[DB7]

Eddy, I've been obsessed with this problem.

This is a recent revelation to me.
You can send more than one attachment to WinFax.

strFile = "C:\Documents and Settings\Dan\My Documents\Deficiencies.doc"
strFile2 = "C:\Documents and Settings\Dan\My Documents\Laila Songs And Artists.txt"


With wfxSend
.AddAttachmentFile strFile
.AddAttachmentFile strFile2
.SetNumber "(416) 596-0243"
.SetTo "Kahuna"
.AddRecipient
.Send (0)
End With


But, before that, use this to create files....
DoCmd.OutputTo acReport, strReport, acFormatRTF,varReport(x)

varReport(x) is an array, holding the destination for the report files.

The code is incomprehensive as such, I'm assuming you get the gist?
If not, I can send complete code.

...I've been spending a great deal of time, trying to figure out how to consolidate, several files(Reports), on to 1 word Doc.
I succeded but, this is more efficient.

HTH.

 

[gundie]

Is there a way to print to the Winfax print driver without changing it to be the default driver?

 

[DB7]

Something like this,...

Dim strActivePrinter As String

strActivePrinter = ActivePrinter'whatever it currently is

ActivePrinter = "primoPDF" '"pdf995" 'PDF printer, make it winfax

....Your code....

xx:
ActivePrinter = strActivePrinter 'return to original

..i don't tyhink this is what you asked?
Must have refrence to MS Word library