سطر واحد يقوم بتحديث تقرير الكريستال ريبورت

هذه أول مشاركة لي في هذا المنتدى

ولقد استفدت الكثير من هذا المنتدى وخاصة من دورة الأخ majorفي استخدام الكريستال ريبورت 10

ولكن كان هناك سؤال حير الجميع كيف يمكن تحيث التقرير بدون الخروج من البرنامج ... ويعد عدة تجارب كان الحل بسيط جداً

الحل : إضافة سطر يقوم بتحديث جديد للتقرير هذا السطر يشبه ما كنا نحدث به الريكور ست

لاحظ عند إنشاء تقرير يقوم الفيجول بيسك بتعريف تلقائي كالتالي في القسم العام كالتالي

Dim Report As New CrystalReport1

وكذلك يقوم بكتابة الكود التالي في قسم التحميل load كالتالي :

Private Sub Form_Load()

reen.MousePointer = vbHourglass

CRViewer1.ReportSource = Report

CRViewer1.ViewReport

Screen.MousePointer = vbDefault

End Sub

أما الحل لعملية التحديث فهو القيام بكتابة السطر التالي في كود التحميل

Set Report = New CrystalReport1

من كان يعاني من هذه المشكلة يجرب هذا ثم يبلغني بذلك وبارك الله فيكم

لا تنسونا من خالص الدعاء

أخوكم محمد محمد