ابوخليل

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

طهور ان شاء الله أسأل الله الكريم أن يجمع لك بين الأجر والعافية

السلام عليكم المرفق تم تحويله الى 2003 وهو لا يعمل حيث يحدث خطأ عند فتح النماذج المهم اني نقلته على جهاز آخر الحل : كررت الكود الخاص بتفحص مربع تحرير الصنف كررته في حدث قبل التحديث لحقل الكمية . واعتذر عن المتابعة مستقبلا لاني على نية سفر ، فاعذرني ان تأخر الرد عليك وشكرا لمداخلتك استاذ عصام ، واتمنى يكون حلا مناسبا BuySal20192.rar

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

تسلم الانامل

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

حبيبي الوزير لله درك .. وينك يابو ابراهيم

اخوتي الاعزاء موضوع قديم له اكثر من 14 سنة لا نعلم هل صاحبه على قيد الحياة ؟ يكفي منك ايقونة لايك او ايقونة الشكر الا ان كان القصد زيادة رصيد المشاركات ؟ للحاجة يمكننا وضع رابط للمواضيع القديمة في مشاركاتنا الجديدة سنقترح على الادارة غلق التحرير لجميع المواضيع القديمة السابقة

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

تم الاعلان عنه في وحدة نمطية عامة من اجل يكون معروف في جميع زوايا اكسس .. حلوة زوايا هذه في الاستعلامات والماكروات والنماذج والتقارير وحتى في الوحدات النمطية العامة نفسها وهنا في برنامجنا يتم التعامل معه من داخل جميع النماذج طبعا ستكون قيمته الافتراضية صفر لان نوعه بايت في نموذج frmain : اخبرناه انه اذا تم النقر على حقل الاسم : اذا كان خالي اجعل قيمة المتغير 1 والا اجعلها 2 وعملناه لعيون النموذج frmchang لاننا بحاجة لفتح النموذج في خاصيتين مختلفتين : واحدة نفتحه لاضافة ساكن جديد والثانية لتسجيل خروج ساكن وطبعا تختلف خصائص النموذج حسب هذا النوع من الفتح حيث اخفينا بعض الحقول في احدها وغيرنا في الاخرى حسب الحاجة ولو فتحت النموذج frmchang على التصميم وفي حدث عند التحميل وجدت ان فيه شروط على الحقول تتحقق حسب قيمة هذا المتغير ايضا فيه شرط عند الفتح هو نفسه الموجود عند الغلق في نموذج frmain وهذا الشرط من اجل نمنع فتح النموذج frmchang الا من خلال النموذج frmain التفسير : جعلنا قيمته صفر عند غلق النموذج frmain ، فلما يجي احد يفتح frmchang لوحده يمتنع لاننا وضعنا شرطا عند الفتح : اذا كان صفر اغلق

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

شكرا اخي جعفر عطرت موضوعي بمرورك

اشكر جميع الاخوة الاعزاء على الاطراء والثناء مسفر وحلبي وقاسم وعبداللطيف و ابو آمنة و athal وعلى كل من مر من هنا وواستفاد واشكر ابا جودي حيث سبقني للتوضيح وشكرا للأفكار النيرة بالنسبة للشفرة المكتوبة عند فتح النموذج فهذا قام به المعالج في اكسس 2003 حين اخترت الزر فقد كفاني المشقة وكتب لي ما ترون ولكني احيانا اكتبها بسطر واحد كما تفضلتم تجدون ادناه شرح لاسطر الكود وبعض الملاحظات Private Sub cmdshow_Click() On Error GoTo Err_cmdshow_Click 'عند الخطأ اذهب الى تفاصيل الخطأ Dim stDocName As String ' اعلان عن متغير نصي يمثل اسم الفورم Dim stLinkCriteria As String ' اعلان عن متغير نصي يمثل المعيار او الشرط stDocName = "frmain" DoCmd.OpenForm stDocName, , , stLinkCriteria ' هنا وضعنا المعيار رغم انه لا يحمل قيمة Exit_cmdshow_Click: ' سطر الخروج Exit Sub ' اخرج من الحدث Err_cmdshow_Click: ' تفاصيل الخطأ MsgBox Err.Description ' رسالة تحتوي على تفاصيل الخطأ Resume Exit_cmdshow_Click ' ارجع الى سطر الخروج ' -------------------------------------------- 'DoCmd.OpenForm "frmain", acNormal ' يمكن الاكتفاء بهذا السطر عن كل ما سبق ' ولكن الاخطاء ستظهر في حال وجودها ولكن بدون تفصيل ' End Sub اما السطر : on error resume next فأنصح بعدم استخدامه مطلقا الا في حدود ضيقة للضرورة وهي عند وجود اخطاء منطقية وظيفة هذا السطر انه يقفز ويتخطى الأخطاء ففي مثال الاخ عبد اللطيف لو حدث خطأ فإنه سيقفز الى end sub وينهي الحدث وحينها لن يفتح النموذج ولن تعرف السبب

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

السلام عليكم ورحمة الله وبركاته هذا برنامج صغير يتم فيه عملية تسكين موظفين او عمال ، وأصله طلب واستشارة من اخونا وحبيبنا الاستاذ محمد الحلبي هنا واحببت تخصيص عنوان جديد لهذا المشروع حيث نضب ما عندي ، ولأفسح المجال هناك للافكار الجديدة ولزيادة واستمرار المشاراكات من الاخوة الزملاء الاعضاء . ملحوظة : من فترة ليس بالقصيرة نهجت في التصميم طريقا مغايرا لطريقة اكسس الكلاسيكية وطريقة اكسس الكلاسيكية تتضح جليا في المشاريع الذي يقوم معالج اكسس بإنشائها من عيوب هذه الطريقة انها لا تلقي اي اعتبار لوقت وجهد المستخدم . آمل ان تجدوا في العمل شيئا جديدا وأفكارا نافعة dbskn.mdb

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

قلنا ان التواريخ تنزل آليا في جدول tblbedcase بمجرد الحركة عند النقر على زر تسجيل دخول او تسجيل مغادرة يتم الحاق بيانات الحركة الى الجدول والتي هي : رقم السرير ورقم الموظف وتاريخ الحركة ونوع الحركة الغريب لا ادري ما فائدة عرضك للتواريخ في النموذج ، لو سلمنا بالاستئناس بتاريخ الدخول ، فوجود تاريخ الخروج بغير معنى لانه لا يتصور وجود شخص مغادر ضمن الصفحة . مستقبلا يمكنك الاستعلام عن الحركات من جدول tblbedcase فيمكننا الاستعلام عن حركة سرير معين وما طرأ عليه من الساكنين كما يمكننا الاستعلام عن موظف معين وحركاته داخل الغرف والأسرة كل هذا بالتواريخ التفصيلية نموذج العرض frmain لنطلع فيه على حالة السرير فقط ومن الذي يشغله نأتي للمهم الآن : اعطني الاعداد الحقيقية للطوابق والغرف والاسرة الموجودة في كل غرفة الطوابق = 4 الغرف = 6 غرف في كل دور الآسرة = 6 اسرة في كل غرفة هل هذا صحيح ؟

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

بالنسبة للطوابق والغرف فيجب ان تسجلها كلها .. وذكرت لك ان تعمل نموذجا لتسجيل الاسرة وغرفها وطوابقها لديك اكثر من 100 سرير حسب ما بينته في اول مشاركة اما ترقيم الطوابق والغرف فاعمل ما تراه مناسبا ومفهوما ولكن اعلم انها ثابتة ولا تتغير ويجب الا يتمكن المستخدم من تعديلها الزبدة : ان الاسرة فيها مرونة بالزيادة او النقص ويمكن للمستخدم الزيادة او النقص عبر نموذج ادخال البيانات اذا اشكل عليك طريقة ادخال البيانات اشعرني . لاساعدك

تاريخ الدخول وتاريخ الخروج يتم تسجيله في جدول tblBedCase ولكن وجدت بعض الخلل في الجملة البرمجية انظر الصورة وانظر السطر الملون بالازرق ، فعندك السطر يوجد قبل جملة الاستعلام حاول تنقله كما في الصورة

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

تفضل تم عمل 90% من التأسيس لاحظ ان اسماء الطوابق والغرف ثابت ليس للمستخدم صلاحية عليها اما السرير فنحن نتعامل مع المعرف (الآي دي) وليس مع رقم السرير فهنا رقم السرير بمثابة اسم السرير وكل مستخدم يمكنه تسمية السرير بما يفهمه هو فمثلا بالمثال قمت بتسمية السرير بثلاثة ارقام تمثل من اليسار : الطابق/ الغرفة / رقم السرير عملت استعلام اختبار لاظهار المتاح من الأسرة شروط المتاح حسب التالي : 1- ان يكون خيار متاح مفعل 2- ان يكون حقل تاريخ البداية فارغ // أو // يوجد تاريخ في حقل النهاية واعذرني مستقبلا فيما لو لم ابادر بالرد لأني احتاج لنقل المثال بسبب الاصدار الى جهاز آخر sakan.accdb بقي ان تضيف حقل (نعم/لا) بجانب حقل نهاية التاريخ فحين يتم ادخال تاريخ الخروج يتم ايضا التعليم على حقل : نعم بحيث نضعه ايضا ضمن المعايير حتى لا تظهر الاشغالات المنتهية السابقة

ايضا يمكنك استعراض الاسرة الاخرى في الغرفة وأسماء الموظفين فمثلا يوجد سريرين شاغرين في غرفتين ، هنا يمكننا عرض الساكنين ، لاتاحة الفرصة له للإختيار

- جدول لبيانات الموظفين - جدول لبيانات السرير (رقم السرير ، الحالة ، رقم الغرفة ، رقم الطابق) - جدول فرعي لتسجيل كل من يمر على السرير (رقم السرير /رقم الموظف / تاريخ الاشغال / تاريخ الانتهاء ) _______________________ الحالة : هي ارقام تعبر عن حالة السرير ( مشغول / شاغر / صيانة / ملغى / ) وهكذا ... تحليل البيانات يتم حسب الفكرة المطروحة

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