كيفية حساب عدد تكرار الاسم في السجلات

[hh88]

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

اعزائي المنتدى الجميل

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

اي بمعنى كم مره تكرر اسم خالد في السجلات عن الضغط على تفاصيل السجل

اي يحسب الاسم الى يظهر في تقرير الفرز عند الضغط على تفاصيل

عدد مرات تكرار الاسم.rar

[ابو جودي]

8 ساعات مضت, hh88 said:

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

اعزائي المنتدى الجميل

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

اي بمعنى كم مره تكرر اسم خالد في السجلات عن الضغط على تفاصيل السجل

اي يحسب الاسم الى يظهر في تقرير الفرز عند الضغط على تفاصيل

عدد مرات تكرار الاسم.rar

اتفضل 

 

1عدد مرات تكرار الاسم.rar

تم تعديل أكتوبر 24, 2017 بواسطه ابا جودى

[ابو جودي]

2عدد مرات تكرار الاسم.rar

[hh88]

On ‏٠٤‏/‏٠٢‏/‏١٤٣٩ at 10:40 PM, ابا جودى said:

اتفضل 

 

1عدد مرات تكرار الاسم.rar

الف مليون شكر استاذي الكريم ابا جودي

ماشاء الله تبارك الله

الله يكتب لك الاجر ان شاء الله

تقبل خالص تحياتي وتقديري

[hh88]

On ‏٠٤‏/‏٠٢‏/‏١٤٣٩ at 10:40 PM, ابا جودى said:

اتفضل 

 

 

معليش تحملني استاذي الكريم ابا جدوي

استفسار اخير

كيف احسب كل ممتاز في ترقية الاسم

أي كم ترقية ممتازة لخالد

حاولت اطبقها لكن لم تضبط معي

آمل النظر استاذي

 

3عدد مرات تكرار الاسم.rar

[hh88]

للرفع 

[omarahmed1424]

متابع

 

[ابو جودي]

في 10/26/2017 at 09:28, hh88 said:

معليش تحملني استاذي الكريم ابا جدوي

استفسار اخير

كيف احسب كل ممتاز في ترقية الاسم

أي كم ترقية ممتازة لخالد

حاولت اطبقها لكن لم تضبط معي

آمل النظر استاذي

 

3عدد مرات تكرار الاسم.rar

اتفضل
المرفق بعد التعديل مره بالكود داخل التقرير   
وفى التقرير الاخر وضع الكود على مصدر بايانات مربع النص مباشرة 

للاسف مش قادر اشرح واسماء الحقول والجدول بالعربى انا عملت لك شرح داخل الكود بالانجليزى وهنا الشرح تفصيلا
واعيد لك الشرح مرة اخرى هنا  
طلب حضرتك حتى يتحقق يحتاج للاتى 

DCount Multiple Criteria  اى تحقيق الدالة  DCount   بأكثر من شرط
الشرط الاول هو اسم محدد  
الشرط الثانى هو عدد ترقيه محدده لهذا الاسم المحدد  

'الشرح
'xx = DCount("[field need count it]", "tblname", "[field first condition]='condition1' AND [field second  condition]='condition2'")

DCount("[field need count it]", "tblname", "[field first condition]='condition1' AND [field second  condition]='condition2'")

field need count it        >>----------->  الحقل المراد عمل عدد لمحتوياته حسب الشروط الاتيه فيما بعد وفى  قاعدتك هو الترقية
 tblname                     >>----------->  اسم الجدول او الاستعلام الذى يحتوى على هذا الحقل وفى  قاعدتك هو جدول الاستبان العام
    field first condition   >>----------->  الشرط الاول هو اسم محدد والحقل الدال عليه فى الجدول فى  قاعدتك هو الاسم
   condition1                >>----------->  تحقيق الشروط الاول بتحديده فى الحقل الذى اشرنا اليه سابقا ولانه موجود فى التقرير فى مربع نص باسم txtname تم كتابته بين علامتين &
  AND                         >>----------->  لتهيئة الكود بوجود شرط اخر كما سيلى فيما بعد
field second  condition >>----------->  الشرط الثانى وهو مرتبط بحقل محدد والحقل الدال عليه فى الجدول فى  قاعدتك هو الترقية
condition2                  >>----------->  تحقيق الشروط الثانى بتحديده وكما تريده انت فى طلبك ممتاز

وهذا وكانك تخبر البرنامج بان يذهب الى جدول الاستبان العام وان يقوم بعد حقول الترقية للاسم خالد عندما تساوى قيمة الحقل لهذا الاسم ممتاز

وهكذا يتغير شكل الكود وترتيبه بعد كتابته بسبب الكلمات العربى

txtcounupgrade = DCount("[الترقية]", "الاستبان العام", "[الاسم]='" & Me.txtname & "' AND [الترقية]='ممتاز'")

لذلك اوصيك كما تعلمنا من اساتذتنا الكرام جزاهم الله عنا جيرا ان شاء الله تسمية الجداول والحقول بالانجليزية وكذلك الاستعلامات وباقى الكائنات دون ترك مسافات بين الكلمات
 

 

4عدد مرات تكرار الاسم.rar

تم تعديل أكتوبر 30, 2017 بواسطه ابا جودى

[hh88]

9 hours ago, ابا جودى said:

اتفضل
المرفق بعد التعديل مره بالكود داخل التقرير   
وفى التقرير الاخر وضع الكود على مصدر بايانات مربع النص مباشرة 

للاسف مش قادر اشرح واسماء الحقول والجدول بالعربى انا عملت لك شرح داخل الكود بالانجليزى وهنا الشرح تفصيلا
واعيد لك الشرح مرة اخرى هنا  
طلب حضرتك حتى يتحقق يحتاج للاتى 

DCount Multiple Criteria  اى تحقيق الدالة  DCount   بأكثر من شرط
الشرط الاول هو اسم محدد  
الشرط الثانى هو عدد ترقيه محدده لهذا الاسم المحدد  

'الشرح
'xx = DCount("[field need count it]", "tblname", "[field first condition]='condition1' AND [field second  condition]='condition2'")

DCount("[field need count it]", "tblname", "[field first condition]='condition1' AND [field second  condition]='condition2'")

field need count it        >>----------->  الحقل المراد عمل عدد لمحتوياته حسب الشروط الاتيه فيما بعد وفى  قاعدتك هو الترقية
 tblname                     >>----------->  اسم الجدول او الاستعلام الذى يحتوى على هذا الحقل وفى  قاعدتك هو جدول الاستبان العام
    field first condition   >>----------->  الشرط الاول هو اسم محدد والحقل الدال عليه فى الجدول فى  قاعدتك هو الاسم
   condition1                >>----------->  تحقيق الشروط الاول بتحديده فى الحقل الذى اشرنا اليه سابقا ولانه موجود فى التقرير فى مربع نص باسم txtname تم كتابته بين علامتين &
  AND                         >>----------->  لتهيئة الكود بوجود شرط اخر كما سيلى فيما بعد
field second  condition >>----------->  الشرط الثانى وهو مرتبط بحقل محدد والحقل الدال عليه فى الجدول فى  قاعدتك هو الترقية
condition2                  >>----------->  تحقيق الشروط الثانى بتحديده وكما تريده انت فى طلبك ممتاز

وهذا وكانك تخبر البرنامج بان يذهب الى جدول الاستبان العام وان يقوم بعد حقول الترقية للاسم خالد عندما تساوى قيمة الحقل لهذا الاسم ممتاز

وهكذا يتغير شكل الكود وترتيبه بعد كتابته بسبب الكلمات العربى

txtcounupgrade = DCount("[الترقية]", "الاستبان العام", "[الاسم]='" & Me.txtname & "' AND [الترقية]='ممتاز'")

لذلك اوصيك كما تعلمنا من اساتذتنا الكرام جزاهم الله عنا جيرا ان شاء الله تسمية الجداول والحقول بالانجليزية وكذلك الاستعلامات وباقى الكائنات دون ترك مسافات بين الكلمات
 

 

4عدد مرات تكرار الاسم.rar

الف مليون شكر استاذي الكري ابا جودي

يجعز اللسان عن شكرك على الشرح الجميل والكافي

اسال الله ان يكتب لك التوفيق والنجاح

في استفسار

هل ممكن ابدل كلمة ممتاز بحيث يحسب بناء على الترقية الظاهرة سواء ممتاز او جيد جدا  وان تكون بمربع النص

[ابو جودي]

6 ساعات مضت, hh88 said:

الف مليون شكر استاذي الكري ابا جودي

يجعز اللسان عن شكرك على الشرح الجميل والكافي

اسال الله ان يكتب لك التوفيق والنجاح

في استفسار

هل ممكن ابدل كلمة ممتاز بحيث يحسب بناء على الترقية الظاهرة سواء ممتاز او جيد جدا  وان تكون بمربع النص

اخى الحبيب الكريم شكر الله لكم جميل دعواتكم الطيبه واحسن اليكم  اسال الله تعالى ان يرزقكم اجرها واكثر منها ان شاء الله وان كنت لابد داعيا اسالكم على استحياء الدعاء لاستاتذتنا الكرام فى هذا الصرح الشامح فمنهم تعلمنا وعلى ايديهم تتلمذنا علم بقصروا او يبخلوا ولم يضيق صدورهم معنا فلذلوا الغالى والنفيس فلولا فضل الله سبحانه وتعالى ثم افضالهم جميعا لما كان هذا حالنا نحن طلاب العلم فى هذا الصرح الشامخ العريق

واجابة على مطلب حضرتك طبعا زى ما عملنا مع مربع نص الاسم حسب الشرح السابق 
condition1                >>----------->  تحقيق الشروط الاول بتحديده فى الحقل الذى اشرنا اليه سابقا ولانه موجود فى التقرير فى مربع نص باسم txtname تم كتابته بين علامتين &

وفى هذه الحالة ومع طلبك الجديد يكون التعديل على الشرط الثانى

condition2                  >>----------->  تحقيق الشروط الثانى بتحديده الحقل الدال عليه فى الجدول فى  قاعدتك هو الترقية
وعنصر التحكم الدال عليه فى التقرير هو مربع نص باسم  nn ويتم كتابته بين علامتين &

فيتم تغير سطر الكود السابق الى خذا السطر 

txtcounupgrade = DCount("[الترقية]", "الاستبان العام", "[الاسم]='" & txtname & "' And [الترقية]='" & Me.nn & "'")

وهذا مرفقكم بعد التعديل عليه  

اعتذ للتأخير فى الرد عليكم انا فى العمل واعتذر ان وجدت اى اخطاء املائيه الكيبورد كلها انجلش وباكتب بسرعه وبدون مراجعه لضيق وقتى 

5عدد مرات تكرار الاسم.rar

[hh88]

14 hours ago, ابا جودى said:

اخى الحبيب الكريم شكر الله لكم جميل دعواتكم الطيبه واحسن اليكم  اسال الله تعالى ان يرزقكم اجرها واكثر منها ان شاء الله وان كنت لابد داعيا اسالكم على استحياء الدعاء لاستاتذتنا الكرام فى هذا الصرح الشامح فمنهم تعلمنا وعلى ايديهم تتلمذنا علم بقصروا او يبخلوا ولم يضيق صدورهم معنا فلذلوا الغالى والنفيس فلولا فضل الله سبحانه وتعالى ثم افضالهم جميعا لما كان هذا حالنا نحن طلاب العلم فى هذا الصرح الشامخ العريق

واجابة على مطلب حضرتك طبعا زى ما عملنا مع مربع نص الاسم حسب الشرح السابق 
condition1                >>----------->  تحقيق الشروط الاول بتحديده فى الحقل الذى اشرنا اليه سابقا ولانه موجود فى التقرير فى مربع نص باسم txtname تم كتابته بين علامتين &

وفى هذه الحالة ومع طلبك الجديد يكون التعديل على الشرط الثانى

condition2                  >>----------->  تحقيق الشروط الثانى بتحديده الحقل الدال عليه فى الجدول فى  قاعدتك هو الترقية
وعنصر التحكم الدال عليه فى التقرير هو مربع نص باسم  nn ويتم كتابته بين علامتين &

فيتم تغير سطر الكود السابق الى خذا السطر 

txtcounupgrade = DCount("[الترقية]", "الاستبان العام", "[الاسم]='" & txtname & "' And [الترقية]='" & Me.nn & "'")

وهذا مرفقكم بعد التعديل عليه  

اعتذ للتأخير فى الرد عليكم انا فى العمل واعتذر ان وجدت اى اخطاء املائيه الكيبورد كلها انجلش وباكتب بسرعه وبدون مراجعه لضيق وقتى 

5عدد مرات تكرار الاسم.rar

استاذي الكريم ابا جودي

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

اسال الله ان يكتب لهم التوفيق والسعادة

واشكرك جزيل الشكر اخي ابا جودي على طيب تعاملك الملموس في التوضيح لي عن سوالي

واخيرا اقول ليس لي الا الدعاء لك

اسال الله أن يرزقك رزقاً واسعاً وان يكتب لك  ولعائلتك الخير والتوفيق والسعادة

وتقبل خالص شكر وتقريري