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

ساعدوني باقصا سرعة

مغلقمُجاب
بدأه dm3etmalak في 8 أبريل 2014 · 2 رد · 492 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

انا قبل هيك طلبت المساعدة من اخي جعفر وما قصر معي ... بس طلعلي شغلة جديدة ومش عارفة كيف اتصرف فيها بالكود
اعمل كمان حقلين للبحث عن التاريخ 
يعني اعمل مربع من --l---- وكمان مربع إلي -------
ولما اكتب مثلا من 2000 الي 2010 يجيبلي كل البيانات الموجودة بالجدول بين التاريخين انا بس بدي الكود شو اكتب بالزبط
 

 

انا كان عندي مثلا العمر -----اسمو مثلا c11 ---   وبالجدول بردو اسمو  c11   كنت اكتب الكود هيك 
Public Sub FilterMe()

 
   ""=  Filt

If Len(Me.C11 & "") <> 0 Then
 "'"&Filt = Filt & " AND [c11]= '" & Me.C11 
End If
 ( Filt = Mid(Filt, 6

مش عارفة كيف بدي اعمل between 

 

جربت اعمل هيك 

مازبط معي    ( If([c11] Between [me.CC4] And [me.CcC4]];[cc4];0

#2

ارفق مثالك باقصى سرعة

 

ولإظهار بيانات من سنة إلى سنة تحتاج تعمل استعلام وليس كود

 استعلام تستخدم فيه حقل التاريخ وتضع المعيار التاليفي حقل التاريخ على أن يكون بهذه الصيغة ( Expr1: Year([txtdate]) ) حتى يقرأ السنة 

Between [forms]![form1]![from_year] And [forms]![form1]![to_year]

بحيث أن :

 

form1 هو نموذج البحث

from_year حقل ( من ) 

from_year حقل ( إلى )

تم تعديل هذه المشاركة بواسطة فتى الوادي في 8 أبريل 2014 في 07:18

mk17481_26bccea871.gif
#3 أفضل إجابة

كما ذكر أخى فتى الوادى

 

ضع مرفق حتى تسهل على من يساعدك

 

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

للاستعاضة عن between

مدونتى:-

احترف الأكسس مع أبو يوسف

متغيب حاليا لانشغالى الشديد

هذا الموضوع مغلق.

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