عرض التائج المدخلة بين تاريخين بحيث يتم عرضها في

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

اعلم واريد المساعدة لو سمحت هلا قمت باضافة الحقل حتي

يكون بالمواصفات التي تريدها انت في عمل الكود

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

عرض البياتات المخلة بين تاريخين بعد إضافة حقل التاريخ.rar

up

up

أخي المهنا

معلش على التأخر ولكن والله مشاغل كثيرة

أولا : انت يجب أن تفهم الموضوع حتى تستطيع عمل هذه الأشياء بنفسك

والفكرة تقوم على التالي

أولا : فتح جدول يعتمد على جملة SQL مثلا إذا أردت البحث عن البيانات بين تاريخين وسوف أتعرض لهذه الفكار في الحلقة القادمة من سلسلة الدروس التي أقدمها

ما علينا لو اردت البحث عن البيانات بين تاريخين بتكتب الجملة التالية :

rs.Open "select * from [الفواتير] where [التاريخ]>='" + Text2.Text + "' and [التاريخ]<='" + Text3.Text + " ' ", db, adOpenDynamic, adLockOptimistic

طبعا البيانات التي تم البحث عنها موجودة بالمتغير Rs فتقوم بتعبئة أي أداة تستطيع عرض بيانات جدول مثل data grid أو flexgrid كالتالي

set datagrid1.datasource = rs

هذا هو كل الموضوع

واخي نصيحة مني دائما حاول وابحث وجرب قبل الحصول على الجواب بصورة سهلة لأن الإنسان قد يريد أشياء لا يستطيع أحد غيره فهم ما يريد

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

الاخ العزيز nasser50001

انا اجرب من اكثر من اسبوعين والمشروع واقف وقمت بكثير من المحاولات كانت فاشلة منها set datagrid1.datasource = rs

بدون set

لم اقراء كل شيء ولكن الذي يظهر لي انك تبحث بين تاريخين ولذلك استخدك

SELECT * FROM TABLENAME Where Date1 >= #01/01/2004# and Dat1 <= #01/01/2005#

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

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

الاخ العزيز ... لقد اسهب العزيز nasser50001 في شرح الموضوع جزاه الله عني و عنك خيرا ...

و لمزيد من التوضيح :

ارى انك وضعت حقل اسمه YEAR في قاعدة البيانات و نوعه ( نص ) و ينبغي تغييره الى رقم ... كما ان قاعدة البيانات تفتقد الى حقل به تاريخ كامل وليس Year فقط ...

على العموم اذا اردت استخدام DataGrid ربما ستكون بحاجة الى ADODC للتسهيل و اما اذا استخدمت MSHFlexGrid فلست بحاجة الى ADODC في البرنامج المرفق تجد مثال على استخدام الاولى و آخر على استخدام الثانية ... و لانني لم اتمكن من تصفح الكود كاملاً لضيق الوقت عزيزي قمت بعمل فورمين اضافين لكلا الطريقتين كي تتمكن من تفحصهما بهدوء

الشيء الآخر انني استخدمت عبارة SQL كالتالية :

    SQL = "SELECT * FROM Data WHERE Year>=" & DTPicker1.Year & " AND Year<=" & DTPicker2.Year & " ORDER BY Year"

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

اما اذا احتجت لعمل المقارنة بين التاريخ بشكل كامل وليس العام فقط فينبغي اضافة حقل جديد الى قاعدة البيانات اسمه مثلاً myDate وفيه التاريخ ... و يكفيك بعدها ان تغيير البرنامج تبعنا و سطر الـ SQL بالتحديد كي يصبح :

    SQL = "SELECT * FROM Data WHERE myDate>=#" & CDate(frmsea.DTPicker1.Value) & "# AND Year<=#" & CDate(DTPicker2.Value) & "# ORDER BY myDate"

بدلا عن العبارة الموجودة الان في البرنامج

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

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

maktaba.zip

ما شاء الله لا قوة الا بالله

اخي الكريم رغيد الطيب

والله المنتدى اكتسب كنزا كبيرا بالتحاقك به وانه والله لشرف عظيم أن نكون تلاميذك

شكرا جزيلا على الرد

ولعل الأخ مهنا يطيرا فرحا بهذا الرد الشامل

تحياتي لك

اخوك ناصر

الاخوة الاعزاء شكرا للجميع على المجهود الرائع

بس مازالت المشكلة موجود حيث لم يتم عرض البيانات بين تاريخين كاملين

الا بالكود التالي لمحمد بدوي

SELECT * FROM TABLENAME Where Date1 >= #01/01/2004# and Dat1 <= #01/01/2005#

والمشكلة ان #01/01/2004# ثابته غير متغيرة وحاولت عن طريق التكست

يعني يكون التاريخين في تكست متغيرة ولم افلح

وما زالت مشكلة عرض البيانات في الDataGrid بل adodb

هل من حل

والشكر موصول الى

nasser50001

رغيد الطيب

محمد بدوي

أخي مهنا

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

حاول مرة ثانية لعلك أخطأت في وضع علامات التنصيص المزدوجه والفردية

:D :D

ما زالت المشكلة لاني اريد الربط بالادو وليس بADODC

هذه امثلة للبحث بين تاريخين

من منتديات الإبداع الإسلامي

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

_________________.zip

أخي الكريم

في قسم الدروس موضوع باسم "إنشأ مشروعك بالفيجوال بيسك "

إذهب اليه وستجد كل جمل sql مع أمثلة

بالتوفيق

مشكور اخوي ناصر فالموضوع اكثر من رائع