عبدالله المجرب

السلام عليكم اخواني لدي برنامج طلبات واريد احتساب مدة بقاء الطلب عند الموظف يوم العمل 7 ساعات من السابعة صباحا الى الثانية بعد الظهر نتخيل طلب كما في المرفق التجريبي تقدم احد الموظفين بطلب شهادة عمل فان الموظف الخاص بالطلبات يكتب الطلب ومباشرة سيتم كتابة تاريخ الطلب مع الوقت بعدها يظهر الطلب للميتخدم 1 والذي بدوره سيطبع الطلب ثم يضغط على خانة الاختيار بالانجاز وسيتم كتابة اسمه وتاري ووقت الانجاز وهكذا لكل من الموظف 2 والموظف 3 في المرفق استعلام احتساب مدةبقاء الطلب لدى كل مستخدم بالدقائق في المستخدم 1 و2 الوقت صحيح لانه في نفس اليوم تم الانجاز لكن مستخدم 3 لانه عمل على الطلب في اليوم التالي فقد كان الناتج كبير لانه احتسب الفترة بعد الدوام ضمن الفترة المطلوب ان يحتسب اليوم 7 ساعات اي ان النتيجة الصحيحة للمستخدم 3 هي 171 دقيقة (153 من اليوم السابق + 18 من اليوم التالي) وليست 1193 كما في الاستعلام ---------------------- طبعا لم اقم باضافة اكواد لتسجيل الوقت لانه مثال لتوصيل المطلوب مع جزيل الشكر قاعدة البيانات8.mdb

يفضل ارفاق ملف به الكود

السلام عليكم هل تقصد هكذا الرقم السري 123 New تطبيق Microsoft Office Access.mdb

شكرا على ارفاق البرنامج ==== سوالي هل واجهت نفس المشكلة (الانقطاع) وكان هذا من ضمن الحلول

هل ممكن ان ترفق البرنامج

استميحك عذرا على كثرة السؤال هل واجهت نفس المشكلة وكان هذا من ضمن الحلول ==== عند تنزيل البرنامج تظهر رسالة انه فايروس

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

المشكلة ليست رسالة امان المشكلة انه اثناء تشغيل البرنامج تحدث هذه المشكلة وعنداعادة التشغيل لا يعمل تظهر هذه الرسائل

هل يمكن مع الشكر شرح للفكرة

للرفع

السلام عليكم اليس هناك حل لهذه المعضلة

نتمنى ارفاق الملف للفائدة

نفس المشكلة صادفتني مع برنامج زوار عملته لاحد الاصدقاء ولاحظت ان المشكلة بدأت في الظهور بعد تحديث الاوفيس الى ٢٠١٣ و ٢٠١٦ ان شاء الله نجد حل لهذه المشكلة

استاذي الفاضل ابوخليل شكراً على الرد بعد تنزيل المرفق يظهر لي أن المرفق تالف فهل تتكرم بإعادة إرفاقه

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

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

للرفع

السلام عليكم اخي الفاضل الوزير شكرا للرد الاحظ ان الكود غير مشابه لما اعرفه عن vba فهل تتكرم بمرفق للتطبيق اجد في الكود رمز للسنة واليوم والمطلوب ليس نسخة احتياطية بل استبدال النسخة المفتوحة ( بعد اغلاقها) بنسخة جديدة لان المفتوحة اصبحت قديمة --------- الموضوع للرفع لمشاركةباقي الاخوة الافاضل

السلام عليكم ورحمة الله وبركاته اساتذتي الكرام غبت عن المشاركات الا ان قلبي معكم واكيد اني لا استغني عن طلب المساعدة منكم فاليكم مسالتي عملت قاعدة بيانات وتمت مشاركتها عبر الشبكة لاكثر من قسم واقوم بالتعديل على البرنامج حسب الطلب والحاجة ولاجبار المستخدمين على تحديث النسخ لديهم استخدمت الفكرة التالية في فورم تسجيل الدخول وضعت ليبل مخفي به رقم النسخة وفي حدث التحميل يتم فحص رقم النسخة من جدول اسمه النسخة فاذا تطابق الرقمين يفتح عادي والا ظهرت رسالة للمستخدم بان نسخته اصبحت قديمه ويجب التحديث للنسخة الاحدث ويظهر في الرسالة خطوات التحديت بطريقة يدوية مع كثرة التعديلات ودخول مستخدمين جدد لا يستطيعون عمل التحديث بسلاسة حاولت ان اجعل التحديث تلقائي فقمت بما يلي: ١. عملت ملف اكسس جديد اسميته Updt به جدول وقمت بوضعه في ملف في البارتشن C ٢. في ملف القاعدة وفي حدث تحميل فورم الدخول وضعت كود تشغيل استعلام الحاقي ليلحق مسار قاعدة البيانات الحالية في الجدول الموجود في Updt ثم فتح ملف Updt واغلاق القاعدة الرئيسية. ٣. في الملف Updt وضعت فيه فورم وفي حدث التحميل وضعت كود حذف لقاعدة البيانات التي تم الحاق مسارها في الجدول ثم نسخ قاعدة البيانات المحدثة ووضعها بنفس اسم ومسار قاعدة البيانات المحذوفة ثم يتم حذف بيانات الجدول و بعدها يتم اغلاق التطبيق. هذه كانت فكرتي الا انه عند تطبيقها وجدت انه يعلق وتطول العمليه جدا فهل هناك فكرة افضل من هذه ليتم تحديث قاعدة البيانات تلقائيا اي بمعنى نسخ القاعدة الحديثة الموجودة في ملف ثابت على الشبكة واستبدالها مكان النسخة القديمة ولكم جزيل الشكر لم استطيع ارفاق ملف لكبر الحجم ولم استطع اقتباس الاكواد لاني اكتب من الهاتف فاعذروني

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

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

موضوع قديم

الملف به التعديل المطلوب ولكن كما قال الاستاذ سليم اخفاء الخلايا.rar

user: a Password: a

استعمل هذا السطر قبل سطر فتح الإستعلام DoCmd.SetWarnings False وهذا بعده DoCmd.SetWarnings True