وعليكم السلام استاذ
اتذكر بان هناك برنامج للاستاذ عبد اللطيف سلوم .. واتذكر الكثير من التفاصيل والمناقشات طرحت حوك هكذا موضوع
في رأيي المتواضع انك تقوم ببناء الهيكل العام للجداول وفق رؤية الزبون (مكتب المحاماة).. اي مالذي يريده في البرنامج لان هناك تفاصيل كثيرة
ثم تطرح سؤلا في كل نقطة تقف عندها .. وان شاء الله برنامجك لن يستغرق وقتا طويلا .. لان ذلك سيضيف لك معلومات كثيرة في بناء الجداول والنماذج والاستعلامات والتقارير
تحياتي لك اخي العزيز
بصراحة استاذي .. انا مهندس مدني وقد شغلت الكثير من المناصب الادارية والفنية وليس لي علاقة بالبرمجة
لكن وضع كورونا جعلني اهتم بالبرمجة رغم كبر سني .. فكما يقال النقش في الكبر كالنقش على الحجر
لكن ما اراه من ابداع اخوتنا السعوديين والمصريين يفوق التصور .. مع احترامي لجميع بلداننا العربية
يشهد الله اني لم ادخل لهذا المنتدى الا من اجل التعلم وتعليم الاخرين قربة الى الله... اما الرزق
وفي السماء رزقكم وما توعدون
اخي العزيز ... بعض الحقول تكون مطلوبة .. فمثلا الاسم مطلوب وعند عدم كتابته تخرخ رسالة
If isNull me.txtName then
MsgBox "يجب ادخال الاسم ", vbExclamation + vbMsgBoxRight, "مطلوب الاسم "
End if
ما شاء الله على هذا الابداع استاذي @د.كاف يار.. بالحقيقة فكرت كثيرا بالمسالة ولم اجد حلا الا بتغيير النموذج او اعمل استعلام للتاريخ والسعلر ياخذ بياناته من فنكشن
لكن لدينا مثل يقول يجعل للفأرة اذان
Puts ears to the mouse
اخي العزيز ..فاتورة مرتجع شراء نفس فاتورة البيع لكنها تختلف بالسعر لانك تعيد البضاعة بسعر الشراء
اقترح عليك اعادة بناء الجداول
1- راس فاتورة المرتجع وفيها رقم تلقائي للفاتورة وتعمل لها حقل معرف يربط بجدول الشركة حتى تستخرج اسم الشركة منها
2- تعمل طرف فاتورة المرتجع وتكون حقولها مكونة من اسم المادة وسعر المرتجع والمبلغ الاجمالي وتربطها برقم راس الفاتورة .. كذلك تعمل لها معرف تربطه بجدول المنتجات والذي يتكون من رقم تلقائي واسم المنتج ولا داعي لكل تلك الحقول في جدول المنتج
ارجوا ان يكون الكلام واضح..وبالتوفيق
هل تقصد بان النموذج المسمى frmenterdata هو نموذج خاص بالاصناف المرفوضة او المرتجعة فقط؟
طيب هناك علاقة غريبة... ماهي العلاقة بين id للمنتج وال id للشركة ؟
اضافة لما تفضل به استاذي محمد ابو عبد الله
اذا كان لديك جدول فيه مفتاح اساسي وترقيم تلقاتي (Table1) ومرتبط بجدول اخر (Table2)
وتريد ان تحذف جميع البيانات من الجدولين وتعيد الترقيم من الصفر
استخدم الكود التالي في حدث عند النقر على زر الحذف
DoCmd.SetWarnings False
DoCmd.RunSQL "DELETE * FROM Table2"
DoCmd.RunSQL "DELETE * FROM Tabl1"
DoCmd.RunSQL "INSERT INTO Tabl1 (ID) VALUES (0)"
DoCmd.RunSQL "DELETE * FROM Tabl1"
DoCmd.SetWarnings True
Me.Requery
Refresh
السلام عليكم
بالحقيقة لا يخطر في بالي غير عمل استعلام مكون من حقل السعر والتاريخ وتكون مصدرها فكشن يقوم بتلك الحسابات
لان المخطط ياخذ بياناته اما من جدول او استعلام
استاذي العزيز @ruan برنامجك جميل لكن يحتاج لكثير من التنسيقات فمثلا تجعل النموذج الرئيسي (الزبائن2) هو لبيع المواد وليس لشراء المواد . ففاتورة الشراء لها شأن اخر فانت تبيع بالاجل.. وتجعل لتلك الفاتورة رقم تلقائي وتجعل اسم الزبون كومبوبوكس لان نفس الزبون ربما سيشتري منك لاحقا..
وهنا ياتي بالدرجة الثانيةنموذج ديون الزبون (نموذج 1)وهذا النموذج خاص بالتسديد والتاريخ واظهار المبالغ المتبقية على الزبون ... اما (جميع الديون المترتبة على الزبائن ) فتجعل نموذج مستمر خاص بها يستخرج لك المتبقي على كل زبون .. استاذي العزيز التراتبية جدا مهمة في هكذا برامج حتى لاتتعب المستخدم
والله من وراء القصد..تحياتي