الامان في القاعدة

هوا أنا ليا رأي بس لا أعلم هل هذا الرأي سليم أم لا !!!!

ألا وهو فتح قاعدة البيانات كملف عادي Data File وأخذ قيمة حرفية منه وتغييرها الي قيمة أخري !!!!

بمعني أن يتم فتح قاعدة البيانات في صورة Binary كما يلي :

Open App.Path & "\DB.mdb" For Binary As #1

وبعد ذلك تأخذ قيمة حرفية منها وتقوم بإستبدالها بقيمة أخري عند إغلاق البرنامج ، وبعدها عند فتح البرنامج يتم إرتجاع هذه القيمة كما كانت كما يلي :

S = Space(1)
Get#1,250,S

---------------------------

S = Chr(255 - Asc(S))
Put#1,255,S

وهذا يجعل قاعدة البيانات لا تعمل من داخل الأكسيس !!!!

ولكن في حالة تشغيل البرنامج يمكننا تشغيل الـ Access دون أي مشاكل .

والله أعلم

شكراً

الف الف شكر لك عزيزي

بس ياليت التوضيح اكثر

لأني بصراحة مبتدئة

وتحملني

بارك الله فيك وغفر لوالديك

up

up

الصبر طيب ياليان

أخي ، يجب أن تكون تعاملت مع ملفات البيانات قبل قواعد البيانات !!!

ثانياً ، أنا آسف جداً علي التأخير ، لأنني كذلك أذاكر !!!

لكن أخي ، أنا أعرض لك مجرد فكرة ، لكنها لها عيوبها !!!

بإختصار شديد ، إجلب قيمة معينة من قاعدة البيانات كملف ( Data ) وغير في محتوياتها .

علي العموم أنظر الي التسلسل التالي :

1- قم بإضافة الإجراء التالي :

Private Sub DeCode()
   Dim strPassword As String * 1

   Open App.Path & "\DB.mdb" For Binary As #1
   Get#1,1500,strPassword
   Close#1

   strPassword = Chr(255 - Asc(strPassword))
   Open App.Path & "\DB.mdb" For Binary As #1
   Put#1,1500,strPassword
   Close#1
End Sub

2- قم بإستدعاء هذا الإجراء في Form Unload .

3- نفذ النموذج ثم أغلقة ليقوم بتغيير الحرف ، ومن ثم قبل عملية الفتح إستدعي هذا الإجراء مرة أخري في Form Load !!!

وكل هذه العمليات تتم قبل فتح أو إغلاق قاعدة البيانات !!

لكن أخي المشكلة أن عند عملية الفتح ترجع القاعدة كما كانت ، ويمكن فتح قاعدة البيانات أثناء مباشرتاً أثناء فتح البرنامج .

والمشكلة الثانية لو أن البرنامج مفتوح وحدث إغلاق للبرنامج بصورة غير طبيعية أو حدوث Shout Down للجهاز تظل القاعدة مفتوحة !!!

لذاك أنا لا أرشح هذه الطريقة

أما الطريقة الذي أرشحها هي طريقة إدراء Password وفتحها عن طريق كائن الإتصال لحمايتة من عبث المستخدم العادي .

شكراً

الف الف شكر لك اخي

أخي الكريم ، هناك طريقة أفضل من هذه الطريقة ، وعن نفسي أنا أستخدمها وهي موجودة بالرابط ( التالي )

أتمني أن تتعامل معها لأنها ناجحة

شكراً