كود يحتوي على معيارين

[bumb]

السلام عليكم

 

لدي هذا الكود 

DoCmd.OpenReport "repVehicleMovement", acViewNormal, , "txtMovementDateStart between #" & Format$(Form_frmVehicleDetailes.txtFrom, "yyyy/mm/dd") & "# And # " & Format$(Form_frmVehicleDetailes.txtTo, "yyyy/mm/dd") & "#"

وهو يقوم بطباعة بيانات بين تاريخين 

اريد ان اضع معيار اخر وهو المعرف او الـ ID

 

تحياتي لكم

[محمد أبوعبدالله]

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

جرب الكود التالي

DoCmd.OpenReport "repVehicleMovement", acViewNormal, , "[Id]=" & [Id] & " And [txtMovementDateStart] between #" & Format$(Form_frmVehicleDetailes.txtFrom, "yyyy/mm/dd") & "# And # " & Format$(Form_frmVehicleDetailes.txtTo, "yyyy/mm/dd") & "#"

تحياتي

[Eng.Qassim]

7 minutes ago, محمد أبوعبدالله said:

="

 

20 minutes ago, محمد أبوعبدالله said:

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

جرب الكود التالي

DoCmd.OpenReport "repVehicleMovement", acViewNormal, , "[Id]=" & [Id] & " And [txtMovementDateStart] between #" & Format$(Form_frmVehicleDetailes.txtFrom, "yyyy/mm/dd") & "# And # " & Format$(Form_frmVehicleDetailes.txtTo, "yyyy/mm/dd") & "#"

تحياتي

ممكن مثال استاذ ... بصراحة لم اقتنع من الاجابة

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

انا اعلم انك جاوبت بشكل صحيح على قدر السؤال

لكن بأي كيفية ؟ لا اعلم

المفروض صاحب المشاركة يجاوبنا

[محمد أبوعبدالله]

8 دقائق مضت, Eng.Qassim said:

المفروض ان التقرير مصدر سجلاته استعلام

لماذا المفروض ؟

يمكن ان يكون مصدر التقرير جدول ويتم وضع المعايير المناسبة في كود

وهذا مثال اخر لوضع كود لعمل فلتر للتقرير

stLinkCriteria = "("
stLinkCriteria = stLinkCriteria & "[txtMovementDateStart] between #" & Format$(Form_frmVehicleDetailes.txtFrom, "yyyy/mm/dd") & "# And # " & Format$(Form_frmVehicleDetailes.txtTo, "yyyy/mm/dd") & "#"
stLinkCriteria = stLinkCriteria & " AND "
stLinkCriteria = stLinkCriteria & "[Id]=" & [Id]
stLinkCriteria = stLinkCriteria & ")"

'Debug.Print stLinkCriteria
DoCmd.OpenReport "repVehicleMovement", acViewPreview, , stLinkCriteria

تحياتي

[bumb]

48 دقائق مضت, محمد أبوعبدالله said:

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

جرب الكود التالي

DoCmd.OpenReport "repVehicleMovement", acViewNormal, , "[Id]=" & [Id] & " And [txtMovementDateStart] between #" & Format$(Form_frmVehicleDetailes.txtFrom, "yyyy/mm/dd") & "# And # " & Format$(Form_frmVehicleDetailes.txtTo, "yyyy/mm/dd") & "#"

تحياتي

تما عليك حطيت المعايير ونجحت طريقتك

انا كنت احط amd  وغيرها واحط & وجربت كذا طريقه

 

عشت وبارك الله فيك