كيفية عمل استعلام بين تاريخين

السلام عليكم إليك الحل أن شاء الله

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

Select EmpName,Date,Work From Table Where Date Between #" & CDate(txtFirstDate) & "# And #" & CDate(LastDate) & "#;"

حيث أن الحقول كالتالي

EmpName=اسم الموظف

Date=التاريخ

Work=العمل المنجز

Table=أسم الجدول الذي يضم هذه الحقول

txtFirstDate=صندوق النص الذي كتبت فيه بداية فترة الإستعلام

txtLastDate=صندوق النص الذي كتبت فيه نهاية فترة الإستعلام

ومررها للديتا قريد كالتالي

أضف DataControl

وأربطها بقاعدة البيانات وأجعل خاصية RecordSet

تساوي جملة الاسك كيو التي فوق كالتالي

Data1.RecordSet="Select EmpName,Date,Work From Table Where Date Between #" & CDate(txtFirstDate) & "# And #" & CDate(LastDate) & "#;"

ثم أجعل الديتا قريد في خاصية DataSource كالتالي

DBGrid.DataSource=Data1

وإذا لم تنجح أبلغني لأني كتبتها هنا بدون الرجوع للغة الفيجول بيسك لأني تصفحت المنتدى في كفي نت وأعذرني أن كان هناك أي خطأ

السلام عليكم و رحمة الله

اتمني ان تكون قد حلت المشكلة ..

و نرجو ان الالتزام بالقوانين في المرات القادمة , لتجنب إغلاق المشاركة , و وضع عنوان ذو دلالة بالموضوع والمحتوي ..

مشكور أخي جمال

سوف اجرب وأعطيك الجواب

أخوي ابراهيم انت الخير والبركة في منتدانا الجميل والرائع واعذرني لأني غشيم وألف شكر لكم جميعاً