kingskull قام بنشر مارس 5, 2012 مشاركة قام بنشر مارس 5, 2012 بسم الله الرحمن الرحيم السلام عليكم ورحمة الله و بركاته اخواني كيف من الممكن اضافة شرط او معيار اضافي الى دالة Dsum Me![text1] = DSum("[field1]", "tab", "[yn]='" & Me.yn & "'") اريد اضافة المعيار b_no من نفس الجدول الى الدالة مالصيغة الصحيحة في ذلك هذا الجزء الاول الجزء الثاني ايها السادة ان لدي حقلان field1 و field2 ولدي المعيار مربع تحرير وسرد فيه القيمتين نعم ولا اذا كان السجل يأخذ القيمة نعم فانه يجمع حقول field1 واذا لا يجمع الحقل field2 استخدم هذه الدالة Private Sub أمر17_Click() If yn = "نعم" Then Me![text1] = DSum("[field1]", "tab", "[yn]='" & Me.yn & "'") Else Me.text1 = 0 If yn = "لا" Then Me![text2] = DSum("[field2]", "tab", "[yn]='" & Me.yn & "'") Else[/size] [size=5] Me.text2 = 0[/size] [size=5]End If End If Me.Refresh Me.Requery End Sub المشكلة ان الناتج يظهر فقط للسجل الذي امامه الاشارة و عند اختيار آخر يظهر كذلك السجل المحدد فقط بينما اريد مجموع السجلات yn هو combobox مربع التحرير و السرد ولكم خالص المودة و التقدير test.zip رابط هذا التعليق شارك More sharing options...
ابو ياسر قام بنشر مارس 6, 2012 مشاركة قام بنشر مارس 6, 2012 اخوي الاستعلامات تحقق لك اكثر مما تتخيل فحاول توظيفها في استخراج المجاميع والاحصاءات رابط هذا التعليق شارك More sharing options...
kingskull قام بنشر مارس 6, 2012 الكاتب مشاركة قام بنشر مارس 6, 2012 اخوي الاستعلامات تحقق لك اكثر مما تتخيل فحاول توظيفها في استخراج المجاميع والاحصاءات اخي ابو ياسر بارك الله فيك الموضوع في الاساس معقد قليلا و لا اظن انه من الممكن استخدام استعلام الان هناك نموذج اساسي و فرعي و جدولين مختلفين لكل نموذج و الموضوع عملية حسابية تعتمد على الجدولين و المرفق مجرد مثال مبسط كل ما اريده هو التعديل على الكود بحيث يقبل معيارين رابط هذا التعليق شارك More sharing options...
kingskull قام بنشر مارس 6, 2012 الكاتب مشاركة قام بنشر مارس 6, 2012 (معدل) ايها الاخوة ستحل مشكلتي لو تم تصحيح الخطأ في هذا الكود Me![text27] = DSum("[ertbat_last1]", "all", _ "[yes] = 'نعم'" And _ "[b_no] = & Me.b_no & '") هذا الكود يعمل بصفة سليمة Me![text27] = DSum("[ertbat_last1]", "all", _ "[yes] = 'نعم'") كذلك هذا يعمل بصفة سليمة Me![text27] = DSum("[ertbat_last1]", "all", "[b_no]='" & Me.b_no & "'") اريد كلاهما مع بعض في كود و احد تم تعديل مارس 6, 2012 بواسطه kingskull رابط هذا التعليق شارك More sharing options...
ابوخليل قام بنشر مارس 6, 2012 مشاركة قام بنشر مارس 6, 2012 اخي الكريم جرب هذا : Me![text27] = DSum("[ertbat_last1]", "all", "[b_no]='" & [b_no] & "'" & " and [yes] ='" & "نعم" & "'") رابط هذا التعليق شارك More sharing options...
kingskull قام بنشر مارس 6, 2012 الكاتب مشاركة قام بنشر مارس 6, 2012 اخي الكريم جرب هذا : Me![text27] = DSum("[ertbat_last1]", "all", "[b_no]='" & [b_no] & "'" & " and [yes] ='" & "نعم" & "'") اخي ابو خليل بيض الله وجهك هذا ما اريد يعمل الكود بصفة ممتازة اسأل الله لك التوفيق و السداد اسعدك الله في الدارين رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان