انشاء كلمة مرور لقاعدة البيانات بالاضافة الى تعديلها او حذفها

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


والان وفي درسنا البسيط هذا سوف نتعلم كيفية انشاء كلمة مرور لقاعدة البيانات بالاضافة الى تعديلها او حذفها الموضوع بغاية البساطة ولن يكون اكثر من 5 اسطر للبداية نقوم بعمل قاعدة بيانات فارغه تنسيق 97 ونقوم بفتح مشروع جديد ضمن برنامج الفيجوال بيسك ونقوم مباشرة باضافة الادوات الالزمه وهي اداة Data Control للربط ومربع نص وزر امر فور اضافة الادوات السابقة وترتيب واجهة المشروع نبدء بالشيفرات اولا سوف نقوم بربط قاعدة البيانات بالبرنامج بعدها نعلم برنامج الفيجوال باننا نود ان يكون الفتح خاص من اجل ان نستطيع تغير كلمة المرور بعدها نظهر مربع لمستخدم لكتابة كلمة مرور قاعدة البيانات الحاليه بعدها ادخال كلمة المرور وفتح قاعدة البيانات اذا كانت صحيحه سوف نطبق الخطوات السابقة كما يلي


كود PHP:
Private Sub Form_Load()
Data1.DatabaseName = App.Path & "\DataBase.mdb"
Data1.Exclusive = True
X = InputBox("ادخل كلمة مرور قاعدة البيانات للاستمرار")
Data1.Connect = ";Pwd=" & X
End Sub


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


كود PHP:
Private Sub Command1_Click()
Data1.Database.NewPassword X, Text1.Text
End Sub


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

نهاية الدرس
اتمنى ان اكون قد وفقت بطرح الافكار الالزمه