printing crystal report without opening it.

[vinamb2006]

yes,Iam using button onclick event.
the code is as under
'PrintReport()

prtdoc.PrinterS ettings.Printer Name = comboInstalledP rinters.Selecte dItem.Text

Dim strDefaultPrint er As String = prtdoc.PrinterS ettings.Printer Name
'Dim rap As New CrystalDecision s.CrystalReport s.Engine.Report Document()
'report1.Load(" c:\inetpub\wwwr oot\ticket\prin trpt.rpt")
Dim margins As PageMargins

' Get the PageMargins structure and set the
' margins for the report.

''
margins = report1.PrintOp tions.PageMargi ns
margins.bottomM argin = 200
margins.leftMar gin = 200
margins.rightMa rgin = 50
margins.topMarg in = 100
''Apply the page margins.
report1.PrintOp tions.ApplyPage Margins(margins )
''
' Select the printer.
report1.PrintOp tions.PrinterNa me = strDefaultPrint er

' Print the report. Set the startPageN and endPageN
' parameters to 0 to print all pages.

report1.PrintTo Printer(1, True, 0, 0)
end sub

When I am giving print blank page is coming instead of the report.
the report instance name is report1.Iam also passing parameter to this report.
when Iam giving print command the reports content are visible under the form.
but it is not visible on the print out paper.even the toolbar of the report also not visible.
Any idea. Plz.. its urgent