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

ربط بين جدولين لتقرير crystal report

بدأه muhedeen في 30 يوليو 2010 · 4 رد · 3,253 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

اخواني قرات الكثير على اداة crystal report لعرض التقارير للفيجوال بيسك دوت نت 2005

ولكني لم استوعب الطريقة التي يتم فيها عرض البيانات من جدولين بشرط معين

او من خلال اختيار اسم معين من combobox ومن ثم عرض بياناته من جدولين على aكل تقرير في crystalreport لل vb.net2005

اتمنى اني القى الحل في هذا المنتدى الممتاز ويعطيكم العافية مقدماً

عن عبد الله بن مسعود رضي الله عنه قال: سألت النبي صلى الله عليه وسلم أي العمل أحب إلى الله عز وجل؟ قال: ( الصلاة على وقتها) قال: ثم أي؟ قال: ( بر الوالدين ) قال ثم أي؟ قال: ( الجهاد في سبيل الله )

302889519.gif

رابط المصحف الرقمي الفلاشي بأكثر من روايات - القرآن الكريم

#2

السلام عليكم ....

يمكنك أن تقوم بعمل TableAdapter به الfunction التي ستعرض البيانات من الجدولين عن طريق ال wizard، ثم تضيف الكريستال ريبورت للمشروع و من خلال الwizard تقوم بعرض الحقول المطلوبة في التقرير.

لعرض التقرير في المشروع نستخدم الكود التالي، سنفترض أن التقرير إسمه ClientInvoice1 و اداة عرض التقرير إسمهاClientReportViewer:

//بفرض أن الداتا سيت إسمها ClientInvoiceDataSet و التابل أدابتر إسمه client_inv_adapter
ClientInvoiceDataSet client_inv_dataset = new ClientInvoiceDataSet();
بفرض ان الfunction إسمها fill و هي تأخذ قيمة البارامتر من الكومبو بوكس لعرض التقرير على أساس شرط معين مثلاً السنة
            client_inv_adapter.Fill(client_inv_dataset.Get_invoice_details,2010);
   		DataTable dt = new DataTable();
//بفرض ان الجدول الذي سيعرض البيانات في التقرير إسمه Get_invoice_details
            dt = client_inv_dataset.Get_invoice_details;
   		ClientInvoice1 .SetDataSource(dt);
   		ClientInvoice1.Refresh();
ClientReportViewer.RefreshReport();

بالتوفيق

#3

في البدابة يعطيك الف عافية اخي بهاء صلاح الدين وماقصرت لكن هذا توضيح اكثر للمشكلة التي اعاني انا منها والمشكلة مره اخرى هي

انا عندي جدولين جدول الموظفين + جدول الغياب كما في الصورة التالية

[

421996721.jpg

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

كما في الصورة التالية

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

479730834.jpg

ومرة اخرى الله يعطيك العافية اخي بهاء صلاح الدين واتمنى لك التوفيق في حياتك العملية

عن عبد الله بن مسعود رضي الله عنه قال: سألت النبي صلى الله عليه وسلم أي العمل أحب إلى الله عز وجل؟ قال: ( الصلاة على وقتها) قال: ثم أي؟ قال: ( بر الوالدين ) قال ثم أي؟ قال: ( الجهاد في سبيل الله )

302889519.gif

رابط المصحف الرقمي الفلاشي بأكثر من روايات - القرآن الكريم

#4

ضع هذا الكود تحت الحدث combobox_SelectedIndexChanged

//بفرض أن الداتا سيت إسمها EmpoyeeDetailsDataSet و التابل أدابتر إسمه employee_ghyab_adapter 
و لدينا جدول في الداتا سيت إسمه Emoloyee_Ghyabe و هو  الجدول الذي به الحقول المطلوب عرضها من الجدولين

Dim EmpoyeeDetailsDS as new EmpoyeeDetailsDataSet ()

بفرض ان الfunction إسمها fill و هي تأخذ قيمة البارامتر من الكومبو بوكس لعرض التقرير على أساس شرط معين مثلاً السنة

            employee_ghyab_adapter.Fill(EmpoyeeDetailsDS.Emoloyee_Ghyabe,(int)combobox1.selectedvalue)

                Dim dt as new DataTable()

            dt =EmpoyeeDetailsDS.Emoloyee_Ghyabe

//بفرض أن التقرير إسمه EmployeeReport

           	EmployeeReport .SetDataSource(dt)

           	EmployeeReport.Refresh()

بفرض أن أداة عرض التقرير إسمها EmployeeReportViewer

EmployeeReportViewer.RefreshReport()

تم تعديل هذه المشاركة بواسطة بهاء صلاح الدين فراج في 31 يوليو 2010 في 22:39

#5

الف الف شكر اخي العزيز بها صلاح الدين اتعبتاك معاي كثير اسال الله ان يجعلها من ميزان حسناتك وان يفرج لك كل هم

حاولت اجرب الطريقة بس كمان كان يعرض كل السجلات يتجاهل الكمبويوكس

اخي العزيز انا رفعت قاعدة البيانات مع البرنامج وياليت اذا عندك وقت تشيك على الكود لاني كتبت الكود في combobox وما مشى

هذا ارابط

تقرير لاكثر من جدول حسب شرط معين

بالله اذا عندك وقت شيك على الكود والعفو منك اخي العزيز بس اذا ضبطت بيكون حليت لي مشكلة صدعت براسي

اتمنى لك التوفيق

عن عبد الله بن مسعود رضي الله عنه قال: سألت النبي صلى الله عليه وسلم أي العمل أحب إلى الله عز وجل؟ قال: ( الصلاة على وقتها) قال: ثم أي؟ قال: ( بر الوالدين ) قال ثم أي؟ قال: ( الجهاد في سبيل الله )

302889519.gif

رابط المصحف الرقمي الفلاشي بأكثر من روايات - القرآن الكريم

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