اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

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


الردود الموصى بها

السلام عليكم ..

عندي جدولين بينهما علاقة ...

السؤال هو كيف أطلع عدد الأشخاص وعدد القضايا منهما ؟

ولعل المثال المرفق يوضح ذلك ...

www.3ar.us/6/db4.rar

رابط هذا التعليق
شارك

السلام عليكم

اخي الكريم ...

انا اعلاف ان العد سيكون باستخدام دالة count لكن المشكلة في كيفية احتساب عدد الاشخاص من الجدول t_2 والذي تربط علاقة بالجدول t_1

ولعلك تتكرم وتتطلع على الملف المرفق

ولك مني الدعاء بالخير الجزيل .

رابط هذا التعليق
شارك

السلام عليكم

أخي فتى الوادي :fff: ، أود أن اساعدك في حل السؤال.

قمت بدراسة مثالك المرفق وقمت بعمل المطلوب حسب السؤال ومرفق النتيجة واليك الملاحظات التالية:

الاستعلام الاول: عدد القضايا

SELECT Count(t_1.txtmdkl) AS q1
FROM t_1 HAVING (((t_1.txtmdkl)=[forms].[f1].[txt3]) AND ((t_1.txtdate) Between [forms].[f1].[txt1] And [forms].[f1].[txt2]));
وكما تلاحظ هنا فقد تم تسمية النتيجة q1 وهذ مهم لأننا سنستخدمها في النموذج الاستعلام الثاني: عدد الاشخاص
SELECT Count(t_2.txtname) AS q2
FROM t_1 INNER JOIN t_2 ON (t_1.txtdate = t_2.txtdate) AND (t_1.txtcenter = t_2.txtcenter) AND (t_1.txtid = t_2.txtid)
HAVING (((t_2.txtdate) Between [forms].[f1].[txt1] And [forms].[f1].[txt2]) AND ((t_1.txtmdkl)=[forms].[f1].[txt3]));
وكما تلاحظ هنا أيضا تم تسمية النتيجة q2 وهذا ايضا مهم لأننا سنستخدمها في النموذج والان للنظر الى البرمجة في النموذج
Private Sub Refreshing()
Me.txt4 = Nz(DFirst("[q1]", "[noofcases]"), 0)
Me.txt5 = Nz(DFirst("[q2]", "[NoOfPersons]"), 0)
End Sub
Private Sub txt1_AfterUpdate()
 Refreshing
End Sub
Private Sub txt2_AfterUpdate()
 Refreshing
End Sub
Private Sub txt3_AfterUpdate()
 Refreshing
End Sub

نلاحظ ما يلي :

  • NoOfCases هو اسم الاستعلام الاول و NoOfPersons هو اسم الاستعلام الثاني.
  • وهنا نلاحظ أنه يتم استخراج قيمة q1 (عدد القضايا) و q2 (عدد الاشخاص) من الاستعلامين بعد أي تحديث لحقول (تاريخ البداية) txt1 و(تاريخ النهاية) txt2 و(اسم المدخل) txt3 واظهار النتيجة في txt4 (عدد القضايا) و txt5 (عدد الاشخاص) وهو المطلوب

أرجو أن يكون هذا الشرح كافيا لفهم طريقة الحل وبالتوفيق.

مع الاحترام

KR_Officena_3.rar

  • Like 1
رابط هذا التعليق
شارك

السلام عليكم ..

أخي أمير عاطف : غفر الله لنا ولكم ... وجزاك الله خير الجزاء ..

أخي خضر : :fff: فعلاً هذا هو المطلوب (y) .. وشرحك وافي وواضح ... غفر الله لنا ولكم وزادك الله علماً ونفع الله بك العباد والبلاد

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information