I'm using a MS Data Report in an application. I've got the following snippet of code
which runs the report:
With Me
Set .DataSource = rsFIFO
.Title = strTitle
.Refresh
DoEvents
.Orientation = rptOrientLandscape
.MousePointer = vbNormal
.PrintReport True, rptRangeAllPages
.MousePointer = vbNormal
End With
When the report is run, a standard windows printing dialog box pops up. Page Range
"All" is selected by default. Pressing the Print button makes the report print, but
only the first page comes out of the printer. Now the bizare thing is that in the
unselected Pages portion of the printing dialog box, it shows "1-65535". However, if
I change to code on the print job from .PrintReport... to .Show and I choose to print
from the displayed report, the Pages portion of that printing dialog box shows "1".
Printing with "All" selected prints 2 pages, as it should.
Is this a bug with MS Data Reports, or am I missing something? I'm using VB 6 with
Service Pack 5 and this app is being installed on PCs with Windows 2000 and Windows
98. The result of my tests are identical regardless of the client OS. The reason I
don't just use the .Show method is because this app is running in a factory
environment and a significant push has been made to reduce keystrokes/mouse-clicks to
a bare minimum.
'// =======================================================
Rules : http://ReliableAnswers.com/List/Rules.asp
Home : http://groups.yahoo.com/group/vbHelp/
=======================================================
Post : [EMAIL PROTECTED]
Join : [EMAIL PROTECTED]
Leave : [EMAIL PROTECTED]
'// =======================================================
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/vbhelp/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
