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

[المهنا 1]

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

مع امكانية طباعة النتائج في DataReport2

نتائج الفرز بين التاريخين

يعني حسب تاريخ ادخال البيانات

مع جزيل الشكر واسف لاتعابكم

عرض البياتات المخلة بين تاريخين.rar

[major 1]

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

[المهنا 1]

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

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

[المهنا 1]

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

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

[المهنا 1]

up

[المهنا 1]

up

[nasser50001 16]

أخي المهنا

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

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

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

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

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

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

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

set datagrid1.datasource = rs

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

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

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

[المهنا 1]

الاخ العزيز nasser50001

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

بدون set

[محمد بدوي 96]

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

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

[رغيد الطيب 27]

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

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

الاخ العزيز ... لقد اسهب العزيز 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

[nasser50001 16]

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

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

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

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

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

تحياتي لك

اخوك ناصر

[المهنا 1]

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

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

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

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

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

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

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

هل من حل

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

nasser50001

رغيد الطيب

محمد بدوي

[nasser50001 16]

أخي مهنا

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

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

:D :D

[المهنا 1]

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

[البريق 0]

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

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

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

_________________.zip

[nasser50001 16]

أخي الكريم

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

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

بالتوفيق

[البريق 0]

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