THE crystal report Cannot Printing

Plz Can any professional one help me in an complex unlogical Problem in Crystel Report

My Problem is I just developed a Big Project and in reports
I used a "Crystal Reports 10 Developer Edition"


My Code is
Code:
 Set Report = ReportFile.OpenReport(App.Path & "\Report1.rpt")
 Set Rs = New ADODB.Recordset
 Conn.Execute ("Drop View View")
 Conn.Execute ("Create View CustomerRecievableAll AS Select  .....")
 Rs.Open "SELECT * from CustomerRecievableAll "
 Report.Database.SetDataSource Rs
 Report.Sections.Item(1).AddPictureObject PicPhoto & "\LOGO.jpg", 320, 100
ReportForm.CrystalActiveXReportViewer1.ReportSource = Report
ReportForm.CrystalActiveXReportViewer1.ViewReport
ReportForm.CrystalActiveXReportViewer1.Zoom 1
ReportForm.Show 1
And the Report is display successfully
But When we go to click in the Print Button

no thing is happened

and knowing that
the Printer is working successfully
and the Printer is the Defult Printer

Plz any one help me