الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

لماذا يحتاج تقرير كريستال هذا للنقر على زر تحديث لتظهر السجلات

بدأه خلفاوي2008 في 11 مايو 2009 · 1 رد · 1,237 مشاهدة · في قسم التقارير
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

بســم الله الـرحمــن الرحيــم

السلام عليكــم ورحمـة الله وبركاتــه ،،

أرجو مساعدتي في حل هذه المشكلة

عندي مشروع به نموذج لعرض اسماء الشركات أرقام الحجوزات

عند اختيار أرقام حجوزات معينة والنقر على زر عرض التقرير

يقوم البرنامج بنسخ هذه الأرقام وباقي البيانات الى جدول مؤقت في قاعدة البيانات تمهيدا لعرضها في التقرير

كل شيء ماشي تمام و100 100 لو جربت اختيار مجموعة أرقام ستظهر نفس الأرقام في التقرير

لكن المشكلة لو أغلقت التقرير واخترت مجموعة أخرى او اخترت رقم اضافة الى الارقام التي اخترتها أولا ستجد التقرير يظهر لك الأرقام التي اخترتها في بداية تشغيل البرنامج

لكن لو نقرت على زر التحديث الموجود بالتقرير بجانب زر الطباعة ستظهر لك جميع الأرقام التي اخترتها مؤخرا والمطلوب عرضها

فهل من حل لإظهار البيانات دون الحاجة إلى النقر على زر التحديث Refresh؟؟؟؟؟؟؟؟

جزاكم الله خير

وشكرا لتعاونكم

Pوهذا رابط لبرنامج خاص بتشغيل تقارير الكريستال ريبورت

بعد تنصيب البرنامج ستعمل تقارير الكريستال حتى لو لم يكن الكريستال موجود على الجهاز

http://www.khalafawy.com/CR10RDC.msi

وهذا ملف تنفيذي للمشروع

http://www.khalafawy.com/setup.exe

إن شاء الله سيعمل التقرير بشكل صحيح اذا كنت حملت البرنامج الخاص بتشغيل ملفات الكريستال

وهذا رابط برنامج كريستال ريبورت الاصدار العاشر الذي صممت به التقرير

http://ftp1.businessobjects.com/outg...10AdvDevEn.exe

وهذا الرقم السري ورقم التفعيل

1231467890

 
License : AV860-01CS00G-U7000NC

Project.rar

#2

السبب ان خاصية حفظ البيانات مفعله لديك . ولتتأكد من حذف البيانات السابقة فقط اضف هذا السطر لتحل المشكلة بعد اسناد جدول التقرير . في فورم 2

m_Report.DiscardSavedData

ليصبح الكود كالتالي :

Set m_Report = m_Application.OpenReport(ReportFile)
m_Report.DiscardSavedData  ' يقوم هذا السطر بحذف اي بيانات سابقة في التقرير وينشئ بنية جديدة لتقرير جديد
m_Report.Database.Tables(1).Location = dbName
CRViewer1.ReportSource = m_Report
CRViewer1.Zoom 1
CRViewer1.ViewReport
Screen.MousePointer = vbDefault

تحياتي

OMANI FOR EVER

-------------------------------------------------

post-12787-12780191801974.jpg

-------------------------------------------------

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…