تمت الإجابة طريقتي في حماية قاعدة البيانات من تفعيل الشفت وحماية الاستعلامات و وحدات المايكرو وكلمة السر للقاعدة الخلفية

[kaser906 567]

السلام عليكم ورحمة الله وبركاتة

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

تحذير من إستخدام كود إخفاء الجداول المرتبطة

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

المستخدم لكلمة سر قاعدة البيانات الخلفية والتي تكون مخزنة بالجدول MsysObjects

فلم أجد افضل من طريقة  وضع كلمة سر لقاعدة البيانات بشرط أن تكون بصيغة accdb أو accde

هنا لن يتمكن المستخدم من تفعيل الشفت ببرنامج خارجي ولن يتمكن من الوصول الى الكائنات

وهذا كان سبب طرحي لموضوع

هل لديك تجربه لكسر كلمة سر قاعدة بيانات ؟

وقد اكد استاذنا @jjafferr صعوبة الحصول على الرقم السري لمثل هذا النوع من قواعد البيانات

فقررت وضع كلمة السر لقواعد البيانات !!!!!!!

لكن ماهو الحل مع المستخدم ؟

هل سنقوم بتسليمه كلمة السر ليستخدم  قاعدة البيانات اذا كأننا لمن نصنع شئ

ففكرت بإيجاد وسيط نقوم بتسليمه كلمة السر ويكون هو الوسيط بين المستخدم  والبرنامج ( الواجهة )

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

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

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

بعد تنزيل المرفق اجعل الملفيين في مجلد واحد وشغل الملف StartDatabes

ملاحظة

من المحتمل ان تظهر لديك  رسالة في بدأ التشغيل لا يمكن قراءة مشروع Vba

هنا اعتقد  يجب أن يكون الوندوز لديك محدث بأخر تحديث

ويجب أن تكون حزمة Microsoft .NET Framework  محدثة بأخر اصدار  حسب لغة الوندوز ونوعه عندك او كما يوجد لدي

انا عندي الحزمة Microsoft .NET Framework 4.5.1

 windos 10 

 office10  أخر تحديث

ارجو التجربه ونتمنى الاستفاده للجميع

 

Free.rar

[qathi 164]

بارك الله فيك أخي كاسر @kaser906.. فكرة جديدة

[kaser906 567]

شكرا لمرورك

نتمنى ان تكون طريقة مفيدة وفعالة

[أحمد الفلاحجى 687]

السلام عليكم

ماشاء الله استاذى العزيز @kaser906

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

تقبل تحياتى وتمنياتى لك وللجميع بالتوفيق

طبتم واهتديتم

[sandanet 657]

استاذي الفاضل ممكن ملف آخر بصيغة اوفيس 2003 

[محمد سلامة 329]

[Ali Mohamed Ali 4,323]

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

[kaser906 567]

وعليكم السلام 

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

ولكن دعنا ننتظر قليلا للنظر هل الطريقه فعالة وصامدة 

حتى الان تبدو فاعلة ولم يتمكن احد من الوصول الى الكائنات 

استاذي الكريم 

الشرط من البداية كان واضح حول صيغة الملف 

فصيغة ملف ٢٠٠٣ يمكن كسر كلمة السر من خلالها 

ولك بالمثل 

شكرا لمرورك 

[kaser906 567]

18 ساعات مضت, أحمد الفلاحجى said:

السلام عليكم

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

ولكن دعنا ننتظر قليلا للنظر هل الطريقه فعالة وصامدة 

حتى الان تبدو فاعلة ولم يتمكن احد من الوصول الى الكائنات 

16 ساعات مضت, sandanet said:

استاذي الفاضل ممكن ملف آخر بصيغة اوفيس 2003

الشرط من البداية كان واضح حول صيغة الملف

19 ساعات مضت, kaser906 said:

وضع كلمة سر لقاعدة البيانات بشرط أن تكون بصيغة accdb أو accde

فصيغة ملف ٢٠٠٣ يمكن كسر كلمة السر من خلالها 

4 ساعات مضت, Ali Mohamed Ali said:

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

ولك بالمثل 

شكرا لمرورك

 

::: اعتذر لاعادة الرد لعدم ظهور الاقتباس بالمشاركة السابقه من الرد::::

[محمد سلامة 329]

 

 

اعتذر لأنني فهمت أن المطلوب هو فتح القاعدة StartDatabes 

وبعد التجربة لا استطيع الحصول علي كلمة المرور او الغاء الشفت للقاعدة start

تحياتي وجزاك الله خيرا

وننتظر الطريقة 

[أحمد الفلاحجى 687]

باذن الله فى انتظارك اخى العزيز @kaser906 وجزاك الله خيرا

تمنياتى لك وللجميع بالتوفيق

طبتم واهتديتم

[kaser906 567]

34 دقائق مضت, محمد سلامة said:

اعتذر لأنني فهمت أن المطلوب هو فتح القاعدة StartDatabes 

لا داعي للاعتذار

نعم الهدف الاساس هو حماية الملف الاساس

12 دقائق مضت, أحمد الفلاحجى said:

باذن الله فى انتظارك اخى العزيز @kaser906 وجزاك الله خيرا

إن شاء الله

[kaser906 567]

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

إليكم الملفين مفتوحي المصدر

ولا أعتقد أن الطريقة محتاجه شرح

فقط قم بتعديل أسم المايكرو في الملفين بإزالة رقم  1

او قم بتعين نموذج بدأ التشغيل من قائمةالخيارات

::بالتوفيق::

 

Free.rar

تم تعديل نوفمبر 15 بواسطه kaser906

[jjafferr 4,729]

السلام عليكم 🙂

 

شكرا جزيلا اخوي كاسر على الطريقة الحلوة 🙂

 

جعفر

[SEMO.Pa3x 168]

احسنت عزيزي، طريقة جميلة وفعالة.

[محمد سلامة 329]

اشكرك فكرة جديدة ومفيدة جدا

جزاك الله خيراً

[kaser906 567]

أساتذتي @jjafferr      SEMO.Pa3x محمد سلامة

شرفني مروركم ورضاكم عن الطريقة

شكرا لكم

[أبو عبدالله الحلوانى 505]

 

جزاك الله خيراً

 

[محمد سلامة 329]

5 ساعات مضت, kaser906 said:

أساتذتي @jjafferr      SEMO.Pa3x محمد سلامة

شرفني مروركم ورضاكم عن الطريقة

شكرا لكم

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

ماذا لو أردنا استخدم نفس فكرتك بالقاعدة الامامية والخلفية؟ .. في هذه الحالة سوف نستخدم قاعدة ثالثة لنفتح القاعدة الأمامية و الأمامية تفتح الخلفية .

فقط انا افكر بصوت مرتفع معكم

تم تعديل نوفمبر 16 بواسطه محمد سلامة
اضافة

[thneyan 1]

ما الحل 

[sandanet 657]

3 ساعات مضت, thneyan said:

ما الحل 

جرب إزالة كلمة Declare

[jjafferr 4,729]

السلام عليكم 🙂

3 ساعات مضت, thneyan said:

ما الحل 

المفروض ان هذا يخلي الكود يعمل على نواة 32بت و 64بت :

بدل
Private Declare Function 


استخدم
Private Declare PtrSafe Function 

 

نعم هناك مكتبات تحتاج الى تغييرات اكثر ، ولكنها قليلة 🙂

 

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

 

جعفر

[thneyan 1]

تم إضافة ptesafe 

وشتغل البرنامج

Private Declare PtrSafe Function

[thneyan 1]

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

[jjafferr 4,729]

4 ساعات مضت, jjafferr said:

المفروض ان هذا يخلي الكود يعمل على نواة 32بت و 64بت :

بدل
Private Declare Function 


استخدم
Private Declare PtrSafe Function 

 

 

منذ ساعه, thneyan said:

تم إضافة ptesafe 

وشتغل البرنامج

 

اخي @kaser906 يا ريت تضيف هذه الفقرة للبرنامج حتى يشتغل على النواتين 32بت و 64بت 🙂

 

جعفر