السلام عليكم
لدي تقرير رئيسي به تقرير فرعي ... اريد ان احدد عدد السجلات المعروضه بالتقرير الفرعي ان لاتزيد عن عدد محدد وعند الزيادة يكون في صفحة اخري
هل من طريقة لذلك افادكم الله
كيفية تحديد عدد السجلات المعروضه في التقرير
عزيزي ...
هذا الكود ...
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer) If [txtcounter] Mod 2 = 0 Then Me.Detail.ForceNewPage = 2 Else Me.Detail.ForceNewPage = 0 End If End Sub
حيث txtcounter مربع نص يوضع به عداد السجلات ... وهنا وضعت كمثال عدد سجلين في التقرير ...
الامر ForceNewPage واضح من اسمه ...
لصنع العداد
ضع مربع النص وسمه حسب الاسم الموجود
من الخصائص اذهب الى خاصية مصدر عنصر التحكم واكتب =1
من الخصائص اذهب الى خاصية الجمع التراكمي وضع "على المجموعة" ....
تحياتي
تم تعديل هذه المشاركة بواسطة همام ابوعرقوب في 24 يناير 2012 في 17:55
وَمِنَ النَّاسِ مَن يُعْجِبُكَ قَوْلُهُ فِي الْحَيَاةِ الدُّنْيَا وَيُشْهِدُ الله عَلَى مَا فِي قَلْبِهِ وَهُوَ أَلَدُّ الْخِصَامِ
لك جزيل الشكر علي سرعة الرد
والله الرد فعلا جميل وانا اريد ان اوضح لحضرتك ان هذه هي المرة الاولي التي اتعامل مع الاكواد في الاكسيس
والحمد لله اعتقد اني علي الطريق للتعلم باذن الله بمساعدتك ومساعدة الاخوة الزملاء
اجبت عن سؤالي ولكن اطمع ان اعرف كيف اجمع السجلات التي اخترتها
فعند اختيار تجميع يقوم بالتجميع في اخر التقرير وانا اريد ان اجمع عند العدد من السجلات التي اخترتها
وتقبل تحياتي ودعواتي
تم تعديل هذه المشاركة بواسطة amrhewala في 24 يناير 2012 في 21:19
hammamsana كتب:عزيزي ...
هذا الكود ...
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer) If [txtcounter] Mod 2 = 0 Then Me.Detail.ForceNewPage = 2 Else Me.Detail.ForceNewPage = 0 End If End Sub
حيث txtcounter مربع نص يوضع به عداد السجلات ... وهنا وضعت كمثال عدد سجلين في التقرير ...
الامر ForceNewPage واضح من اسمه ...
لصنع العداد
ضع مربع النص وسمه حسب الاسم الموجود
من الخصائص اذهب الى خاصية مصدر عنصر التحكم واكتب =1
من الخصائص اذهب الى خاصية الجمع التراكمي وضع "على المجموعة" ....
تحياتي
وماذا لو أردت أن أحصي عدد السجلات الموجودة داخل صفحة التقرير الواحدة
بمعني آخر (مطلوب حساب عدد السجلات الموجودة في كل صفحة تقرير علي حدي )