+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] ابحث عن شرح عمل صلاحيات محددة (/showthread.php?tid=21417)
الصفحات:
1
2
RE: ابحث عن شرح عمل صلاحيات محددة - 0theghost0 - 24-08-17
أين أنتم ياخبراء
RE: ابحث عن شرح عمل صلاحيات محددة - 0theghost0 - 28-08-17
هل يوجد احد ليساعدني شباب واتمنى الشرح
RE: ابحث عن شرح عمل صلاحيات محددة - ibraheam - 28-08-17
السلام عليكم
اخي العزيز فكرة الصلاحيات سهلة و هي كما يأتي
1. تحتاج ان يكون عندك جدول المستخدمين و يتضمن الحقول التالية
أ. معرف / رقم
ب. اسم المستخدم / نص
ج. كلمة المرور / نص
د. اسم الموظف الحقيقي / اختياري / نص
ه. حالة التفعيل / (مفعل - غير مفعل) / حقل منطقي (True - False)
2. تحتاج ان يكون عندك جدول الصلاحيات و هو يتكون من الحقول التالية
أ. معرف / رقم
ب. معرف المستخدم الوارد في الفقرة(1 - أ) اعلاه / رقم
ج. اسم النموذج في قاعدة البيانات / نص
د. صلاحية القراءة / حقل منطقي (True - False)
ه. صلاحية الاضافة / حقل منطقي (True - False)
و. صلاحية التعديل / حقل منطقي (True - False)
ز. صلاحية الحذف / حقل منطقي (True - False)
بالامكان اضافة اي حقول اخرى تراها ضرورية في العمل حسب الحاجة
الى هنا انتهى العمل في مستوى الجداول
3. ننتقل للعمل في مستوى الاستعلامات و قبل الاسترسال في هذا المستوى عليك ان تعرف معلومة و هي ان اي عنصر يتم اضافته الى قاعدة البيانات يتم اضافته في احد جداول نظام اكسس و هو (MSysObjects) و لكي نميز النماذج التي تمت اضافتها من قبلنا و تميزها عن اي عناصر اخرى نحتاج الى ان نضيف الى اسم كل النماذج التي نضيفها استطالة معينة و لتكن (Frm) و هي مختصر (Form) , الان عودة الى الاستعلامات سنقوم بانشاء استعلام باسم (FormsNames_Qry) على سبيل المثال وظيفته جلب اسماء النماذج التي قمنا باضافتها بانفسنا و ليست اي عناصر اخرى و كما في الاستعلام التالي :
PHP كود :
SELECT MSysObjects.Name
FROM MSysObjects
WHERE (((MSysObjects.Name)<>"MainFrm" And (MSysObjects.Name)<>"LoginFrm") AND ((Right([MSysObjects]![Name],3))="Frm") AND ((Left([MSysObjects]![Name],1))<>"~"));
4. المرحلة التالية هي في مستوى النماذج و هي تحتاج الى انشاء نموذج دخول و نموذج ادارة صلاحيات المستخدمين استناداً الى الجداول و الاستعلام الذي قمنا بانشائهن سابقاً
5. في نموذج الدخول سيكون لدينا (2 textbox) و هي اسم المستخدم و كلمة المرور و (2 Button) و هي دخول و مغادرة يتم برمجتها بطريقة بحيث تقوم بالتأكد من ان اسم المستخدم و كلمة المرور مطابقة لما موجود في جدول المستخدمين في حالة المطابقة يتم اخذ معرف المستخدم و وضعه في متغيير عام (Public variable) الفائدة منه انه في كل مرة يحاول المستخدم الدخول الى نموذج معين تتم مطابقة الصلاحيات مع هذا المتغيير و تطبيقها على النموذج الذي يتم فتحه
6. طبعا يجب استثناء مدير النظام من اي صلاحيات
7. اخيراً بالنسبة لجدول المستخدمين سيكون عبارة عن نموذج مكون من نموذج رئيسي و نموذج فرعي مرتبطان ببعضهما عن طريق الحقل (معرف – في جدول المستخدمين) و حقل (معرف المستخدم – في جدول الصلاحيات) (الفقرتين 1-2 اعلاه) , بالنسبة لاسماء النماذج سيتم جلبها عن طريق (Combobox) مصدر بياناتها الاستعلام (FormsNames_Qry) .
بالامكان اضافة جدول دخول و خروج المستخدمن لمعرف متى قام المستخدمين بدخول قاعدة البيانات و الخروج منها و لكن تبقى هذه المسألة اختيارية
اسف على الاختصار في الشرح و عدم ارفاق اكواد و سأكتفي بارفاق قاعدة بيانات بسيطة توضح الفكرة اعلاه
ملاحظة - قاعدة البيانات تم اعدادها باستخدام MS Access 2010
تحياتي
RE: ابحث عن شرح عمل صلاحيات محددة - 0theghost0 - 28-08-17
خوك كل الى قلته فاهمنها بس محتاج الى اكواد الطريقة مع شرح كل كود موجود لأني لم افهم السورسات المنشورة المجانية حملت كذا سورس ولم افهمخا جيدا