Request for Sorting is ignored

[Rainer2000]

Hallo there,

I intend to print out a report sorted in such away that i get Page 1 twice, Page 2 twice and so on.
Access seems to ignore this request. It prints page 1 though X always one single page.
Here is the code I have.

Private Sub Befehl176_Click()
On Error GoTo Err_Befehl176_Click
Dim stDocName As String
stDocName = "Versand"
Set Application.Printer = Application.Printers(2) ' D1A
DoCmd.OpenReport stDocName, acPreview
DoCmd.PrintOut , , , , 2, False
DoCmd.Close

Can anybody hlp?

 

[SkipVought]

Can you do this WITHOUT code? The problem could be with your printer driver.

Skip,
[sub]
Just traded in my old subtlety...
for a NUANCE![/sub]

 

[Rainer2000]

Hallo Skip,

thank you for your response. Yes I can do this without Code.
I am using a HP Laserjet 4050 Postscript.

From the "silence" in the forum I assume the code should work.
I will do some more testing like deleting/rewriting the code. Maybe it's one of the items that do not matter how it is done, but who does it. Thanks for now for your attention.

Rainer

 

[roccorocks]

All the times that I have ever printed more than one set of reports in the past is I have setup a loop structure and performed this the number of times that the user needs (then you dont hard code it either).

 

[genomon]

What version of Access do you have? If it's 2002 or later, read this:

http://msdn.microsoft.com/en-us/library/aa139946(office.10).aspx

You can do just about anything you want programmatically with the new printer object model.

"Don't be irreplaceable. If you can't be replaced, you can't be promoted."

 

[Rainer2000]

Hallo genomenon,

I am using Access 2007.
thank you for your link to the article. I have introduced
Application.Printer = Nothing
to reset all printer settings before calling my printer.

I am now getting what I want.

Thanks to all that responded.

Rainer