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

فرز البيانات في التقرير حسب التاريخ

بدأه i1982 في 20 مايو 2009 · 6 رد · 1,483 مشاهدة · في قسم التقارير
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

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

datee

DataEnvironment1.rsimported.Filter = ""
DataEnvironment1.rsimported.Filter = " datee >= #" & DTPicker1 & "# and datee <= #" & DTPicker2 & "# and [name] ='" & Text8.Text & "'"
importt.Show

انا اقوم بالاتصال بالداتا بيز بواسطة الادو والتقارير بواسطة الداتا ريبورت

في انتظار الحل ولكم جزيل الشكر

#2

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

اضف هذه العبارة قبل علامة " الاخيرة

order by datee فى اخر الجملة الثانى حيث ان order by (column name) تعنى ترتيب الجدول حسب اسم العمود وسوف يكون الكود كالتالى

DataEnvironment1.rsimported.Filter = ""
DataEnvironment1.rsimported.Filter = " datee >= #" & DTPicker1 & "# and datee <= #" & DTPicker2 & "# and [name] ='" & Text8.Text & "'order by datee"
importt.Show

وشكرا...

تم تعديل هذه المشاركة بواسطة usa2010 في 20 مايو 2009 في 15:51

فى يوم من الأيام...............

فى ساعة من الساعات.......

فى ثانية من الثوانى..........

سيرجع المجد ثانياً للأمة الإسلامية فأرجوا من الله أن نكون أحياء فى هذا الوقت.

#3

شكرا لك على الرد ولكن ذلك لم ينجح

#4

اضف الجزء الخاص بمشروعك التى يوجد به المشكلة وان شاء الله سيتم التعديل عليه.

فى يوم من الأيام...............

فى ساعة من الساعات.......

فى ثانية من الثوانى..........

سيرجع المجد ثانياً للأمة الإسلامية فأرجوا من الله أن نكون أحياء فى هذا الوقت.

#5

لقد ارفقت لك المثال التالي واستعملت هذه الجملة ولكنها لم تفي بالغرض

DataEnvironment1.rsCommand1.Filter = ""
DataEnvironment1.rsCommand1.Filter = " datee >= #" & DTPicker1 & "# and datee <= #" & DTPicker2 & "# and [namee] ='" & Text1.Text & "'"
warn.Show

حيث ظهرت رسالة الخطأ الموجودة في المرفقات

example.rar

post-50589-1243320435_thumb.jpg

#6

عدل الكود كالاتى:-

DataEnvironment1.rsCommand1.Filter = ""
DataEnvironment1.rsCommand1.Filter = " datee >= #" & DTPicker1 & "# and datee <= #" & DTPicker2 & "# and [namee] ='" & Text1.Text & "'"
DataEnvironment1.rsCommand1.Sort = "datee DESC"
warn.Show

وغير كلمة DESC الى ASC للترتيب تنازليا

وارجوا ان يكون المطلوب.

وشكرا......

فى يوم من الأيام...............

فى ساعة من الساعات.......

فى ثانية من الثوانى..........

سيرجع المجد ثانياً للأمة الإسلامية فأرجوا من الله أن نكون أحياء فى هذا الوقت.

#7

جزاك الله كل خير اخي الكريم وبفضل الله انتهت المشكلة

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

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

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

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

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