[aboezzat84]

السلام عليكم
لدى برنامج VB6 + Active report 2

فى أحد التقارير كيف يمكن حصر ( count ) كل نوع يومية على حدة  فى نهاية التقرير 
( مرفق الصورة )
كم عدد الاعتيادي - العارضة 


شكرا

[Taha Okla]

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

تعتمد معرفة عدد تكرار قيمة محددة في حقل ما في جدول معين على جملة البحث في جدول البيانات بحسب تلك القيمة

مثلا تكتب في كود DAO :

كود :

Set RsRe = dbX.OpenRecordset("Select * From Table Where Fieldx = 'عارضة' " & strSearch0, dbOpenDynaset)
    If RsRe.RecordCount > 0 Then RsRe.MoveLast: RsRe.MoveFirst
    X1 = RsRe.RecordCount
    Activereport2.FieldX = X1
        

وفي حال تستخدم ADO  فقط غير السطر الاول من الكود بما يناسب ADO  بينما كود SQL  والباقي يبقى كما هو ..
وهكذا ..