بسم الله الرحمن الرحيم
السلام عليكم :
أتمنى من خبراء الCrystal Report أن يساعدونى فى هذه المشكله الغير منطقيه
كنت فى وقت سابق قد أنتهيت من تطوير برناج و أستخدمت فى أنشاء تقارير هذا البرنامج برنامج Crystal Reports 10 Developer Edition
و هذا هو الكود المستخدم مع كل تقرير فى البرنامج
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و الريبورتات تظهر للمستخدم بشكل صحيح وا واضح
ولكن عند الضغط على زر الطباعه لا يحدث شيئ
مع العلم أن الطابعه المتصله بالجهاز تعمل بشكل سليم
وهى فى الوضع الأفتراضى
أيضا مع العلم أنه يوجد برنامج أخر تعم عمل تصميم التقارير بنفس الطريقه و على نفس الجهاز و التقارير تعمل بشكل سليم
فأرجوكم ساعدونى