البحث بيت تاريخين

[alsajy]

السلام عليكم

هذا برنامج كمثال لعمل بحث متعدد عن طريق الأستعلام

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

لا أحد يقولي حط هذا الكود في الأستعلام :

Between [Forms]![filter_frm]![txtStartDate] And [Forms]![filter_frm]![txtEndDate]

لأني أضفته ولكن يحتاج إلى بعض التعديل .

الملف مرفق يوضح كل شي

BetweenDatesProblem.rar

[Accessna]

المثال بعد التعديل

BetweenDatesProblem2.rar

[alsajy]

السلام عليكم

شكراً لك على التعديل ولكن ممكن تبين لي وين الخلل

لأني أشوف ملفات الأستعلام مافيها أي تغيير

فأين التغيير حصل ؟؟؟؟

تم تعديل أكتوبر 12, 2008 بواسطه alsajy

[Accessna]

أنزلت المثال

فوجدته مثالكم بعد التعديل

افتح نموذج الفرز ونوع في القيم ( تاريخ ونوع وإسم ) وافحص النتائج ... ثم

أنظر لحدث عند النقر لزر فتح التقرير ستجد هناك بضع سطور تسببت في ظهور تلك النتائج كما طلبتم

[cheecky_boy25]

شكراً لك أخي Accessna على التعديل ...

عندي سؤال لمن ممكن يقراء الموضوع

هل من الممكن حل المشكلة بأن نجعل الفورم يحفظ نفسه قبل القيام بفتح التقرير ؟؟؟

يعني ماكرو نكتب فيه Save - و إسم الفورم

و بعدين Perview report و إسمه ؟؟؟

[alsajy]

الأخ /accessna

نعم فتحت الفورم وشفت الكود ولكن ما يمكن عمل ذلك بالكويري مباشرة ؟؟ ليكون أسهل .

الأمر الثاني لاحظت أن هذا السطر :

  If Not IsNull(Me.Combo31) Then
    Condition = Condition & IIf(Condition = "", "", " And ") & _
                "[ACC] =" & Me.Combo31
  End If

يختلف عن هذا السطر حيث أن هذا يوجد به الأمر Like وهذه العلامة "'"& بينما الأول لا يوجد به فما السبب ؟؟:

If Not IsNull(Me.Combo35) Then
    Condition = Condition & IIf(Condition = "", "", " And ") & _
                "[B/S] Like '" & Me.Combo35 & "'"
  End If

ومذا لو كانت أحد القيم عبارة عن مربع نعم/لا كيف رح يكون شكل الكود

أرجو أن تفيدنا جزاك الله خير

الأخ / cheecky_boy25

ولماذا حفظ الفورم وهو فورم لبيانات متغيره (unbound)

أو قصدك نعمل إستعلام إنشاء جدول بحيث عند تنفيذ عملية البحث يقوم بإنشاء جدول ويضع به القيم التي قمنا بأختياراها ثم يفتح التقرير ويعرض هذه القيم من الجدول ثم ننشئ إستعلام حذف يقوم بحذف هذه البيانات من الجدول وهكذا ....

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

وشكراً لك

تم تعديل أكتوبر 13, 2008 بواسطه alsajy

[cheecky_boy25]

العفو أخي ..

فعلاً يكون كخداع للأكسس و معك حق في نقطة تعلم الأكواد ...

________________________________________________

بالنسبة لحالة مربع نعم لا ...

نستبدل ( على قدر فهمي ) لفظة IsNull بـ False

حيث أن نعم = True و لا = False

و بإنتظار تعليق أ.accessna

دمت بود (^_^)

[alsajy]

نعم في إنتظار تعليق الأستاذ / accessna

[Accessna]

أهلا وسهلا

= تعني يساوي

Like تعني يشبه

في مثالكم هذا يمكنكم استخدام أي منهما فلا فرق .. ولكن:

عندما نريد أن نبحث عن أي جزء من نص فسنحتاج قطعا استخدام Like ولا يمكن لـ = أن تقوم بهذه المهمة .

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

' نحتاجها للبحث عن نص .

# نحتاجها للبحث عن تاريخ .

أما الأرقام فلا نحتاج لهذه العلامات .

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

يبقى البحث عن القيم نعم/لا، Yes/No, True/False

فهي في الأصل عبارة عن أرقام كذلك وتعامل معها في البحث كأرقام باستخدام 0 لـ لا و -1 لنعم .

ويما أنها كأرقام فلن نحتاج بحصرها بأي من العلامات الموضحة أعلاه .

تم تعديل أكتوبر 15, 2008 بواسطه Accessna