ابوخليل

جميع الطرق متشابهه ، تفضل هنا وهنا وهنا وهنا وغيرها كثير : اكتب في حقل بحث بواسطة جوجل الموجود في وسط اعلى الشاشة الكلمة : رسالة تنبيه

وعليكم السلام لا اعلم ما سبب المشكلة عندك انظر المثال المرفق يعرض البيانات كما هي .. يمكنك التجربة db1 - Copy.rar

نعم يمكن والمنتدى مليء بمثل هذه المواضيع ابحث عن رسائل التنبيه ستجد الكثير

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

شكرا لاخونا alwazeer تنبيه اخي السائل يجب اخذ نسخة من عملك الكود اعلاه سيعدل جميع التواريخ في الجدول الى تاريخ اليوم

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

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

تفضل تفحص العمل جيدا جميع الادخالات تتم من خلال نموذج واحد والتفاصيل في الفرعي لاحظ تغير مربعات التحرير عند تغير العملية في التفاصيل غالبا استوفينا الحقول المطلوبة يمكننا اخفاء بعض الحقول في النموذج الفرعي واظهارها حسب الحاجة وبناء على العملية المختارة بالنسبة لسندات الصرف والقبض فإنها تتم عبر رأس جديد يتم من خلاله ادخال رقم الفاتورة للبحث داخل جدول التفاصيل ثم التسديد ان لم يكن مسددا او الطباعة ايضا بالنسبة لتسلسل السندات فانه يمكن عمل مسلسل لكل سند بناء على رقم الفواتير ( داخل جدول التفاصيل ) اخي لا تستعجل بعمل اي شيء حتى تقتنع بهذا المنهج لان التصميم لم ينتهي بعد فقط ركز على الجداول وحاول ادخال بيانات كافية ايضا قمت بالتعديل على بعض المسميات الخاطئة لوجود بعض الفراغات وايضا استحدثت جداول جديدة فاتمنى ان تبقي عليها حتى ننتهي من التصميم ، الليلة احس بالتعب من اجل ان نكمل غدا فمن الطبيعي وجود النقص تصبح على خير 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