ابوخليل

المطلوب غير واضح لو وضحت بالتفصيل ما الذي تريده ولو ارفقت مثالا صغيرا وشرحت عليه مطلوبك كان افضل

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

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

استفسار المصاريف عرفتها كأجرة الكهرباء والادوات وهذه ستكون في حقل خاص مع المنتج المباع وايضا المشغولات يدفعها العميل ولكنني وقفت امام بند الصيانة اين سيكون ؟ وماهو الاجراء المتخذ لو كنا نعمل على الورق ؟ هل اتركه الآن وتضيفه لاحقا ؟

قيد النظر ... احتاج لبعض الوقت فامهلني ..

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

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

وعليكم السلام نعم يمكن تنفيذ ذلك يتم استدعاء الحدث لنفرض لديك اجراء هكذا : Private Sub Command9_Click() يتم استدعاؤه بهذه الطريقة : Call Command9_Click

تفضل تطبيق لما تفضل به استاذنا ابو ابراهيم Data991.rar

تم وضع الكود DoCmd.GoToRecord , , acLast عند حدث تحميل النموذج والكود هذا شغال والمشكلة كانت في التسلسل والفرز ، فأنا عملت فرز في الاستعلام جرب ووافني بالنتيجة test4.rar

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

تفضل New Access Application.rar

اكسس لا يخدمك في الرسم ولكن يمكن تدرج صور من ماسح مثلا واذا الرسم بسيط كما ذكرت مجرد مربع او مستطيل فيمكن تسجل الابعاد وهي تؤدي الغرض ، مثل بعض برامج الخياطة الرجالية الطول = كذا العرض = كذا انحراف الزوايا = لايوجد او كذا سم وتكتب جميع التفاصيل المعتاد كتابتها

اكتب الكود هكذا Private Sub Form_Open(Cancel As Integer) Dim i As Integer i = DMax("[ChitN]", "invoices") DoCmd.GoToRecord , , , i End Sub واذا كان رقم الفاتورة نصي يصبح الاعلان هكذا : Dim i As String اوارفق مثالك لنطلع عليه عن قرب حيث ذكرت ان مصدر النموذج اكثر من جدول

الرسائل الخاصة تتاح للاعضاء آليا اذا بلغ عدد مشاركاته 100 فأكثر

نعم الفكرة كانت واردة ولكن لاحظ ان استعلام التوحيد هذا ينتج من تشغيل 50 استعلام واكثر طريقة ابي ابراهيم اكثر احترافية

ولا اروع

تم التطبيق على 4 اعمدة يمكنك اكمال البقية ملحوظة : اسم الحقل في اكسس لا بد ان يبدأ بحرف Data99.rar

اعمل ما تقدر عليه من الخطوات اعلاه ، على الاقل الخطوة الاولى ثم ارفع المرفق

لان الحقول غير منضمة يجب الاعلان عن نوعها Dim i, ii As Integer i = Nz([t1]) ii = Nz([t2]) MsgBox i + ii sum msgbox2.rar

اكيد جدولك هذا مخالف لطرق تصميم قواعد البيانات الصحيحة وانصحك بعد المتابعة ، وان تسلك الطرق الصحيحة ومع ذلك يمكن تحقيق مطلبك ولكن لا بد من تهيئة وتجهيزات خاصة اولا : تنسخ جميع ارقام السيارات وتضعها بجدول خاص يشتمل على حقل واحد ثانيا : تعمل استعلام تحديد تدرج فيه جميع الحقول وتضع معيار Between في حقل التاريخ ثالثا تعمل استعلام تجميعي مصدره الاستعلام السابق الآن يمكن جلب المجاميع بناء على شروط : رقم السيارة ، والتواريخ المحددة

تقبل الله طاعتكم ، كل عام وانتم بخير

لم توضح طريقة اتصال هذا النموذج بالجداول ؟ اذا المصدر لهذا النموذج استعلام يجمع هذه الجداول فيمكنك الوصول الى السجل الاخير باستخدام احد الدالتين : Dmax اذا يوجد ترقيم تلقائي بحيث ترجع الدالة اكبر رقم تم تسجيله او الدالة Dlast للذهاب الى آخر سجل وقبل كل هذا جرب اولا استخدام هذا الامر DoCmd.GoToRecord , , acLast

ما خلاص لا بد تلغي الجدول frmControlSub

اذا نأتي على هواه ورغبته ولا نرتبط برقم محدد وتعديل على فكرتك Replace([mobile number];Right([Mobile Number];4);"0" & Right([Mobile Number];4);1;1) ما شاء الله حلول جاءت تباعا شكرا للاستاذ شيفان كنا نقرأ من كتاب واحد