إخواني الأعزاء
نظراً لتزايد الحاجة إلى استعمال أدوات أقرب ما تكون إلى ثابتة للتحكم في مسار البرامج الخاصة بالأكسس وخاصة التجارية منها .. لذلك افردت جزء من اهتمامي لتطوير أدوات إدارية خاصة بي للتحكم في جميع برامجي بها .. وقد أرفقت هذا المثال في مشاركة خاصة بالحماية ولكن من الحكمة فصلها حتى تكون مرجع مناسب للبحث عن مثل هذه الأدوات .
المثال الجامع للأدوات الإدارية
1- ربط البيانات
2- النسخ الاحتياطي
3- توجيه المسار لنسخة سابقة
4- حماية البرنامج من النسخ
5- صلاحيات المستخدمين
6- نسخ المراجع وإضافتها
7- إخفاء الجداول
8- معلومات النظام
9- وضع صورة في الخلفية
مع الأخذ في الاعتبار أنني بدلت وغيرت بعض الأشياء وتم تبسيط بعض الأمور حتى لا تتعارض مع برامجي المنشورة وخاصة أنها خاضعة لشركة تجارية .
ونظراً لضيق الوقت سأقوم بتفسير بعرض الأدوات باختصار شديد
الدخول اسم المستخدم : 1 كلمة المرور : 1
1- ربط البيانات : عند فتح البرنامج يعمل الماكرو التنفيذي على فتح شاشة بدء التشغيل وكذلك نموذج الربط التلقائي وفي حالة فقد الرابط تخرج شاشة الربط التلقائي لتحديد المسار بالنقر المزدوج داخل المسار .
2- النسخ الاحتياطي يكون لقاعدة البيانات المرتبطة فقط أي للجداول فقط بنفس تاريخ يوم النسخ
3- توجيه المسار لنسخة أخرى شبيه بالربط التلقائي ولكن يستخدم لربط نسخة سابقة أو تالية
4- حماية البرنامج من النسخ تستخدم نفس الأسلوب الذي أشرت إليه في مشاركة الخاصة بالحماية للأخت زهرة مع ملاحظة وضع الكود التالي في حدث عند الفتح للنماذج الهامة التي نريد بدء الحماية عليه
DoCmd.OpenForm "serial"
من قائمة أدوات – تسجيل نسخة شرعية – استخدم المعادلة الأتية
الرقم العلوي + 12305+( مدة التشغيل إما 15 يوم أو 30 أو 90أو 366 أو 1000 أو 10000 يوم ) الناتج يضرب × 2 والناتج يطرح منه 9999999
ومن السهل معرفة المعادلة من داخل الكود
5- صلاحيات المستخدمين تستخدم أسلوب اقرب ما يكون لأسلوب ابن مسقط مع مهند عبادي وقد قمت ببنائه بالمشاورة مع أبو عبد الله ولكن به بعض الاختلافات الجوهرية عن ما سبق الإشارة إليه
== تم تقسم الصلاحيات إلى مسئول له جميع الصلاحيات
== مستخدم يقوم المسئول بمنحه الصلاحيات
== يمكن إنشاء أكثر من مسئول
وتم التقسيم السابق لمنح المرونة للمسئول في منح الصلاحيات وتفويضها إن احتاج الأمر .
== الجدول AdForToUse يستخدم لتحديد النماذج التي سيتم تركيب صلاحية لها ( ليس كل النماذج نرغب في وضع صلاحية عليها أو عرضها في شاشة منح الصلاحيات ) مع وضع اسم النموذج أو وظيفته باللغة العربية ليتمكن مسئول النظام من فهم كيفية منح صلاحية لمستخدم لأن استخدام أسماء النماذج كما هي لا يفيد إذا تم توزيع البرنامج وخاصة إذا كانت باللغة الأجنبية .
== في نفس الجدول يجب تحديد مستوى النموذج من حيث الصلاحية a.b.c.g
- المستوى a النماذج العامة - اختبار ( فتح ، تعديل ، حذف ، إضافة )
- المستوى b النماذج الفرعية - اختبار ( تعديل ، حذف ، إضافة )
- المستوى c النماذج الخاصة بالمسئول فقط - اختبار ( فتح فقط )لمسئول فقط
- المستوى g النماذج التي يتم استدعاء التقارير منها - اختبار ( فتح فقط )
== في حدث عند الفتح يتم وضع الكود التالي فقط دون وضع أي أدوات أخرى على النموذج ... فقط هذا الكود ....
Call allaw([Form])
أما باقي الأدوات فسأترك لكم استكشافها .
وسيعجبكم كثيراً بإذن الله أداة إخفاء الجداول
أيضاً أو التنويه على أن ما سبق ليس مطلقاً ولكنه خاضع للتطوير باستمرار مثل تشفير الصلاحيات والاستغناء عن الاستعلام في الصلاحيات وتطوير الحماية لتكون أكثر مرونة .
=====
في حالة وجود أي خطأ فني اعذروني للسرعة .
مع خالص تحياتي
رضا عقيل