هل يوجد كود اغلاق الكائنات

[طاهر الوليدي]

للجفاظ على البرنامج من العبث والنسخ وغيرها اتمنى ان اجد كود يغلق الكائنات بكلمة سر 

بشرط انها تعمل من خلف القفل عادي

[sandanet]

أخي الكريم للحفاظ على البرنامج من العبث قم بإغلاق الأكواد بكلمة سر من خلال الدخول الى محرر اكواد الفجوال بيسك ومن ثم ادوات ومن ثم خصائص وبعدها اختار التبويب حماية وضع كلمة السر التي تريدها وبعد اكمال برنامجك قم بتحويله الى الصيغة التنفيذية mde اذا كنت تعمل على اوفيس 2003 او accde اذا كنت تعمل على اوفيس 2007 وما بعده

تحياتي 

[طاهر الوليدي]

شكرا استاذي الفاضل على مرورك واعتذر لعدم فتح الموضوع الى اليوم لانشغالي

انا اردت وضع كلمة سر بواسطة كود البرمجي يقوم باغلاق شريط الكائنات من جداول ونماذج وتقارير وماكروا ومودل 

فقد جربت طريقة الشفت والاخفاء وغيرها 

ولكن اذا كان يوجد اغلاج بهذه افضل من باب المعرفة ليس الا

وقدتم التوصل الى كود تمت برمجته الاخت الفاضلة زهرة العبدالله التي غابت عنا الى مواقع اخرى

مرفق التطبيق وجزاها الله الف خير 

za-HideAllObjectsByPassword2012.rar

تم تعديل فبراير 26, 2018 بواسطه طاهر الوليدي

[طاهر الوليدي]

لرفع

 

[sandanet]

اخي الكريم كود الاستاذة زهرة يقوم باخفاء واظهار الجداول والاستعلامات وغيرها من الكائنات فقط بعد ادخال الرقم السري .. لكن يمكنك تجاوز ذلك واظهار كل الكائنات وتجاوز الرقم السري بإزالة قفل الشفت اولاً ومن ثم الدخول الى القاعدة بالضغط على الشفت ومن ثم اظهار الكائنات المخفية

لذلك انسب حل لحماية قاعدة البيانات هو كالتالي:

1- بالنسبة للجداول: استعمال كود لمنع حذف الجداول .. استعمال طريقة تشفير البيانات المهمة في الجدول

2- بالنسبة للإستعلامات: الابتعاد عن الاستعلامات الثابتة واستعمال الاستعلامات المؤقتة التي يمكن عملها من خلال النموذج كما يفضل استعمال اكواد sql في بعض الاحيان مثلاً عندما تريد استعمال استعلام تحديث او استعلام حذف ..الخ

3- بالنسبة للنماذج: يفضل ان يكون النموذج غير مرتبط بجدول اذا كان النموذج هو نموذج ادخال بيانات حيث يمكننا الاستعانة بكود الادراج insert بعد اكمال تعبئة جميع الخانات والضغط على امر حفظ في النموذج .. اما اذا كان النموذج مخصص للبحث مثلاً فهنا يمكن عمل استعلام مؤقت لمصدر بيانات النموذج

4- بالنسبة للوحدات النمطية: يكفي وضع باسورد لقفل اكواد vba من خلال ادوات ومن ثم خصائص وبعدها اختار التبويب حماية وضع كلمة السر التي تريدها

5- قم باخفاء كل الكائنات بالطريقة التي في المرفق السابق للأستاذة زهرة ومن ثم بعدها قم بتحويل البرنامج الى الصيغة التنفيذية mde او Accde 

 

تحياتي

 

[طاهر الوليدي]

شكرا اخي على شرحك وجزاك الله خيرا وبارك الله فيك

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