المشاركات

عرض الرسائل ذات التصنيف Dlookup

التحكم بصلاحيات المستخدمين في مايكروسوفت اكسس - شرح عام

صورة
تحديد الصلاحيات لكل مستخدم بشكل منفصل في اكسس عندما يتم تصميم برنامج سيستخدمة اكثر من شخص فلا بد من ان يكون لكل مستخدم مستوى صلاحية مختلف عن الاخر، ولتحديد الصلاحيات لكل مستخدم بشكل منفصل توجد اكثر من طريقة واليكم هذة الطريقة والتي اعتبرها من الطرق العملية جدا: 1- انشاء جدول للمستخدمين يحتوي على اسم المستخدم وكلمة المرور (ونوعهما نص قصير)  بالاضافة الى انواع الصلاحيات، وهنا يجب ان يتم فصل كل صلاحية بحقل مستقل ويكون نوع البيانات في هذه  الحقول (نعم / لا) كما في الصورة التالية  2- انشاء نموذج للدخول الى قاعدة البيانات وليكن باسم Login عندما يقوم المستخدم بادخال اسم وكلمة مرور صحيحين يقوم البرنامج بفتح لوحة التحكم او النموذج الرئيسي للعمل للمزيد يمكن الرجوع الى موضوع انشاء نموذج للدخول الى قاعدة البيانات ( ا نقر هنا )  3- انشاء النماذج التي سيتم العمل عليها ووضع الصلاحيات لها (وانا افضل ان يتم انشاء لوحة تحكم) كما يلي سيفتح هذا النموذج بعد الضغط على موافق في نموذج الدخول (بعد ان تكون معلومات الدخول صحيحة) وفي هذا النموذج نبدأ با...

انشاء نموذج للدخول باسم مستخدم وكلمة مرور الى برنامج اكسس

صورة
انشاء نموذج للدخول باسم مستخدم وكلمة مرور الى برنامج اكسس عندما يكون البرنامج متاح لاكثر من شخص للعمل علية فلا بد من حماية البرنامج من المستخدمين غير المصرح لهم من خلال اضافة نموذج للدخول الى قاعدة الببيانات، ولانشاء نموذج الدخول الى البرنامج نتبع الخطوات التالية: انشاء جدول للمستخدمين يتم فيه تخزين اسماء المستخدمين وكلمات مرورهم ويحتوي على حقل لاسم المستخدم وحقل لكلمة المرور انشاء نموذج للدخول ويحتوي على مربعي نص غير مستندة الى مصدر بيانات، وزري امر واحد للالغاء والثاني للدخول  اضافة الكود التالي في حدث عند النقر في زر موافق   VBA   If pas = DLookup("userpass", "tusers", "usernam='" & [usr] & "'") Then DoCmd.OpenForm "Form1" Else MsgBox "يوجد خطأ في اسم المستخدم او كلمة المرور" End If