[hago]

إخوتى واخوانى المبرمجين
اما بعد :

كثر الحديث والاسئلة عن الفلترة فى التقارير بين تاريخ وتاريخين لدرجة تكرار المواضيع لذلك احببت ان اعمل شرح مدعوم بالصور ومثال يوضح إستخدام الفلترة فى التقارير بـ إستخدام اداة التقرير Data report ويشمل المثال على الاتى :

الفلترة بتاريخ واحد
الفلترة بين تاريخين
الفلترة لــ شخص معين
الفلترة بتاريخ لــ شخص معين
الفلترة بين تاريخين لــ شخص معين

اولاً : اضف اداة التاريخ DTPicker

Microsoft Windows Common Control-26.0 ثم إختر  <<--- Project --->> Components




ثانيا :
ارسم الفورم على هذا الشكل :



ثالثاً:
الاكواد
يتم ملئ الكمبو تلقائيا من قاعدة البيانات بواسطة الكود :

كود :

Do While Not RS.EOF
Combo1.AddItem RS.Fields("Nme").Value
RS.MoveNext
Loop

الفلترة بتاريخ واحد :

كود :

RS.Open " select * from [Tabel1] where [DTSin] like '" & DTPicker1.Value & "'", CN, adOpenStatic, adLockReadOnly

الفلترة بتاريخين :

كود :

RS.Open " select * from [Tabel1] where [DTSin] Between #" & DTPicker2.Value & "# AND #" & DTPicker3.Value & "#", CN, adOpenStatic, adLockReadOnly

الفلترة لــ شخص معين :

كود :

RS.Open " select * from [Tabel1] where [Nme] like '" & Combo1.Text & "'", CN, adOpenStatic, adLockReadOnly

الفلترة لــ شخص معين بتاريخ معين :

كود :

RS.Open " select * from [Tabel1] Where [Nme]='" & Trim$(Combo2.Text) & "' AND [DTSin]=#" & DTPicker6.Value & "#", CN, adOpenStatic, adLockReadOnly

الفلترة بين تاريخين لشخص معين :

كود :

RS.Open "select * from Tabel1 where Nme='" & Trim(Combo3.Text) & "' and DTSin between #" & DTPicker4.Value & "# and #" & DTPicker5.Value & "#"

رابعاً : تصميم التقرير
اذهب الى الوضوع التالى :

[b]شرح بسيط بالصور طريقة عمل تقرير بالـــ Data report بــ إستخدام adodb[/b]

فهو نفس التقرير الذى طبقت عليه الفلترة

توضيح مهم :
♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦
vb4arb إسم قاعدة البيانات
Tabel1 إسم الجدول
DTSin إسم حقل التاريخ
Nme إسم حقل الاسماء
♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦

ملاحظات :
لم اكتب الاكواد كاملة وذلك لوجود مشكلة فى محرر الاكواد
البيانات الموجودة فى قاعدة البيانات هى لـــ اعضاء من المنتدى الكريم

*************************************************

فى النهاية : ارجو ان اكون قد وفقت فى الشرح البسيط

☼☼ صورة من التقرير بعد عمل فلترة بين تاريخين ☼☼

[الميسري]

[u]وألله يستحق التثبيت بارك الله فيك اخي hago بأذآ الله ستوجر على هذا العمل ،، وجميل جدآ جدآ هذا الموضوع وليس هذا الموضوع اولهآ بل لك الكثير من المواضيع الحلوه والمفيده[/u]

[Sajad]

السلام عليكم اخي الكريم

جزاك الله خيرا و وفقك الله بارك الله فيك موضوع ممتاز

تم التقييم

بالتوفيق ان شاءالله

[hago]

الميسري كتب :[u]وألله يستحق التثبيت بارك الله فيك اخي hago بأذآ الله ستوجر على هذا العمل ،، وجميل جدآ جدآ هذا الموضوع وليس هذا الموضوع اولهآ بل لك الكثير من المواضيع الحلوه والمفيده[/u]

إن شاء الله
شكرا لك اخى العزيز الميسري جزاك الله خير

[hago]

sajad كتب :السلام عليكم اخي الكريم

جزاك الله خيرا و وفقك الله بارك الله فيك موضوع ممتاز

تم التقييم

بالتوفيق ان شاءالله

[b]

اسعدنى مرورك الجميل [b][b] اخى sajad وشكرا لك لتقييم الموضوع [/b]
تقبل تحياتى

[/b][/b][b]

[b]

[/b][/b]

[المبرمج البسيط]

قمه الابداع نحن بأنتضار المزيد من ابداعاتك

تستحق التقييم

[نظرية]

[SIZE=5]والله شرح حلووووووووو كنت ابحث عنه من زمااااااااااااااااااااااااااااان
جزاك ربى خيراً

[/SIZE]

[الدريساوي]

مشكور اخي شرح رائع من اخ رائع بارك الله في علمك

[hago]

[mmali127]

بارك الله فيك استاذ hago

جهد مميز