rudwan

التحميل يكون من الصفحة الرئيسيه للمنتدى - قسم التحميل المؤقت و عموما أنتي تحتاجين ثلاث جداول : المنتجات : رقم المنتج ( مفتاح اساسي -) - بقية أوصاف المنتج الفواتير : رقم الفاتورة ( مفتاح ) - تاريخ - و بقية التفاصيل تفاصيل الفواتير : رقم الفاتورة - رقم المنتج ( مفتاحين اساسيين ) - سعر الوحده - الكميه و بعدها النموذج يكون رئيسي مأخوذ من جدول الفواتير , و فرعي على نفس النموذج و مأخوذ من جدول تفاصيل الفواتير و الربط بينهما يكون على رقم الفاتوره و التقارير بنفس الطريقه

الأخ AIM تم تعديل منطقية الكود لتكون من أبسط مايمكن OUT_IN.rar

جرب الملف

حمل الملف الموجود في هذه المشاركه ففيه مايناسبك http://www.officena.net/ib/index.php?showt...indpost&p=45694

لا يا أخ سهران , الحل السابق كان لمشكلة الأخ aim اما مشكلتك فتجد لها حلا في المثال المرفق ملف بسيط فيه نموذج واحد فقط , اسم المستخدم r كلمة المرور 1 بمجرد الدخول يفتح النموذج المبسط , و فيه حقلين لاتهتم بهما , اهتم بالثالث فقط ففيه اسم المستخدم وبنفس الطريقة التي ذكرتها لك تحياتي db10.rar

الأخ iam احذف الجملتين الأولى و الثانيه بعد كود With rsUser أي .index .sort و يشتغل معك ان شا الله

أنا لم أجرب الكود الثاني , لكن اذا كان يعمل بشكل جيد , عدل الكود الى الشكل التالي بعد جملة then احذف جملة DoCmd.Quit و ضع مكانها مباشرة الكود الثاني الخاص بالاغلاق الويندوز بكامله بدون حذف Call ثم أكمل الكود كما كان

اطلع على الموضوع التــــالــــــــي

:( ضع اشارة يساوي =Myuser.Username

بدون أن تصيف حقل آخر في الاستعلام , فقط ضع الشرط التاليه تحت اسم الحقل المتوقع أن فيه حقول فارغه is notnull

bash20000 شكرا لمرورك الأخ شاهر ملاحظتك صحيحه , و لكن تأكد أن الكود صحيح و المشكله هي في الانتقال مابين السجلات حاول الرجوع لسجل سابق في النموذج الرئيسي ثم عد الى الحالي تجده قد فتح المجال للاضافه و على كل حال جرب هذا الكود الثاني : Private Sub Form_BeforeInsert(Cancel As Integer) If Me.RecordsetClone.RecordCount = 3 Then Cancel = True Else Cancel = False End If End Su

اي فيلد ؟ و اين لم يطلع ؟ سؤال غير واضح

على مايبدو اخي السهران أنه لديك خطا ما في تركيب نظام المستخدمين نفسه و للتأكد من أنه لايوجد لديك أخطأ اتبع الآتي لاتنسخ الكود , بل اكتبه كتابة بيدك على الشكل التالي : في حدث قبل التعديل على النموذج , اكتب كتابة me وضع نقطه مباشرة بعدها و يفتح لك اسماء الحقول في النموذج , اختر منها اسم حقل المستخدم المعدل أي ModifiedBy حسب هذا المثال ( و قد يكون لديك الاسم مختلف ) ثم اكتب علامة يساوي و بعدها مباشرة اكتب MyUser. و بمجرد كتابة النقطه التاليه لها المفروض يفتح لك عدة اسماء من بينها UserName اختره , و انتهى الأمر لو سارت معك الأمور هكذا يكون عملك صحيحا , و الا فانه لابد لديك أخطاء

راجعي هذا الرابط , ففيه وجبه كامله عن الاستعلامات و خصوصا الموضوع الأول فيه شرح عن الاستعلامات كلها http://www.officena.net/ib/index.php?showt...indpost&p=28684 و على فكره اطرحي ماشئتي من الأسئله فنحن هنا للاجابه , و لاباس عليكي

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

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

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

نعم و بالضبط أخي

المشروع جميل وفقك الله هل لك بتحميل الملف في قسم التحميل المؤقت من الصفحة الرئيسيه ليتسنى الاطلاع عليه بشكل أوضح

تم دمج الموضوعين مع بعض نظرا للترابط اعملي استعلام للجداول المرتبطه على رقم السجل و أدخلي البيانات فيه

الأخ العزيز قمت بتجريب البرنامج ,و اضفت مستخدم جديد , و تمت اضافته بنجاح دون اي تغيير في خصائص المستخدم السابق حاول الدخول بأحد المستخدمين test 123 rud 1 مع الانتباه الى أن وضع الملف على سرفر ينبغي أن يقوم على أساس فصل ملف قاعدة البيانات عن ملف النماذج ووضع قاعدة البيانات فقط على الشبكه , و النماذج لكل مستخدم و سيتم الحاق هذا الموضوع بموضوع الصلاحيات نظرا للترابط , فأرجو المتابعه هناك OUT_IN.rar

اعمليه اجراء عام أي أنشئي موديول جديد , و عرفي فيه اجراء عام و ضعي فيه الكود ثم يتم استدعاء الاجارء عند حدث الفتح لكل نموذج call HideHelp

بكل تأكيد , و يكون كما يلي : RetDate:DateAdd("h"; 2; "DateBorrow")

بالنسبه للتسلسل في جدول الدورات صحيح , حيث كل سجل جديد سواء لنفس الموظف أو غيره سيأخذ رقما تلقائيا جديدا .

أهلا أخي كلمة السر rudwan بالنسبة لكود اسم المستخدم هو فقط MyUser.UserName