الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

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

بدأه هاني ابو عمر في 15 أكتوبر 2008 · 6 رد · 664 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

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

الموضوع بتفصيل أكثر

عندي برنامج يسجل فيه المصاريف رقم الفاتورة لكل نوع مصروف وطبعا ممكن أن يكون للفاتورة الواحدة أكثر من سجل لانها تمثل أكثر من نوع مصروف

أقصد أن لو هناك 3 فواتير فممكن أن تكون السجلات 10 سجلات

المهم عملت تقرير يجمع القيم حسب الفاتورة فيكون التقرير بة 3 سجلاتفقط

المهم يقوم المدخلون بادخال اكثر من اللازم اريد أن احدد عدد الفواتير المختلفة الارقام لهم

وشكرا

#2
هاني ابو عمر كتب:
السلام عليكم ورحمة الله وبركاته

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

الموضوع بتفصيل أكثر

عندي برنامج يسجل فيه المصاريف رقم الفاتورة لكل نوع مصروف وطبعا ممكن أن يكون للفاتورة الواحدة أكثر من سجل لانها تمثل أكثر من نوع مصروف

أقصد أن لو هناك 3 فواتير فممكن أن تكون السجلات 10 سجلات

المهم عملت تقرير يجمع القيم حسب الفاتورة فيكون التقرير بة 3 سجلاتفقط

المهم يقوم المدخلون بادخال اكثر من اللازم اريد أن احدد عدد الفواتير المختلفة الارقام لهم

وشكرا

للرفع

#3

ارفق مثال لو سمحت

شبكة سوارقريباً

Sewar

#4

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

ارفق مثال مع ملاحظة أن باقي التقرير نزل في الصفحة الثانية

والمطلوب

أن احدد عدد معين من الصفوف في التقرير بحيث لا يتجاوز الصفحة

مع العلم أن عدد الصفوف "السجلات" يعتمد على رقم الفاتورة لان التقرير يجمع -Grouping -حسب رقم الفاتورة

وللجميع الشكر

test.rar

#5

للرفع

#6

للرفع

#7

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

انا حاولت في حل هذا الموضوع ووصلت لحل لحد ما جيد

قمت بعمل استعلام مجاميع

QuL

ومن خلال عمل مربع نص

"NoInvs"

واضافة فيه دالة

=nz(DCount("[QuL]![bill_no]";"[QuL]"))

وعند الطباعة استخدمت دالة (IF)

لاختبار القيمة في مربع نص العدد "عدد الصفوف" فإذا وصلت للعدد المحدد توقف الامر

DoCmd.DoMenuItem acFormBar, acRecordsMenu, 5, , acMenuVer70

If Me.NoInvs > 30 Then

MsgBox "You can't enter more than 30 invoices !!!", vbOKOnly, "Caution"

Exit Sub

End If

وخلاص

ارجو من الجميع التعليق حتى استفيد ويستفاد غيري

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

والحمد لله

تم تعديل هذه المشاركة بواسطة هاني ابو عمر في 28 أكتوبر 2008 في 23:07

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…