Report printing instead of previewing ... (1 Viewer)

[sumox]

i've following Report
PURCH VB Query
Query name :
PURCH VB Query1

I've done the Multiple Copying code, copied from AWF forum solution
for printing multiple copies with different text on footer section.

Ya !haa ha i wanted three copies of my report, but the Solution is Directly
Printing the Report, three different times .
Here is the CommandButton OnClick Event :

DoCmd.OpenReport "PURCH VB Query", acViewNormal, "PURCH VB Query1", , , "Copy 1"
DoCmd.OpenReport "PURCH VB Query", acViewNormal, "PURCH VB Query1", , , "Copy 2"
DoCmd.OpenReport "PURCH VB Query", acViewNormal, "PURCH VB Query1", , , "Copy 3"

----=-=====-

Here is the OpenArgs Handler :
in Report's PageHeader OnPrint Section :

Private Sub PageHeaderSection_Print(Cancel As Integer, PrintCount As Integer)
Me.CpyWord = Me.OpenArgs
End Sub

now this is printing directly to printer.

I want to stop this. and wish to select other printers as per requirement basis.
i.e printing to default printer must be stopped and
Print Selection dialogbox should appear

Thanks in advance