منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

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

[attachment=29604]

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

Where
بتكون قبل 
GROUP BY

التصحيح :

(09-06-24, 02:34 AM)Taha Okla كتب : [ -> ]السلام عليكم ورحمة الله وبركاته

Where
بتكون قبل 
GROUP BY

التصحيح :

كود :

Report9.DataControl1.Source = "SELECT TBL_employees.ID, TBL_employees.NameTeacher, Sum(TBL_Daily.L_Req) AS SumonL_Req, Sum(TBL_Daily.Reson1) AS SumonReson1, Sum(TBL_Daily.RnsQ1) AS SumonRnsQ1, " _
   & " Sum(TBL_Daily.Reson2) AS SumonReson2, Sum(TBL_Daily.RnsQ2) AS SumonRnsQ2, Sum(TBL_Daily.L_Done) AS SumonL_Done, TBL_employees.Bank, TBL_employees.BBank, " _
   & " TBL_employees.Account, TBL_Daily.L_Date, TBL_employees.IDnumber, Month([L_Date]) AS XMonth " _
   & " FROM (TBL_Daily INNER JOIN TBL_employees ON TBL_Daily.ID=TBL_employees.ID) INNER JOIN TBL_Month ON TBL_employees.ID=TBL_Month.MONo " _
   & " Where Month([L_Date]) = '" & Trim(CombMonth.ListIndex) + 1 & "'  " _
   & " GROUP BY TBL_employees.ID, TBL_employees.NameTeacher, TBL_employees.Bank, TBL_employees.BBank, TBL_employees.Account, TBL_Daily.L_Date, TBL_employees.IDnumber, Month([L_Date]) " _
   & " ORDER BY TBL_employees.ID ;"

الكود شغال 100%
بارك الله فيك وجزاك الله خير أستاذ طه