تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] ابحث عن شرح عمل صلاحيات محددة
#11
أين أنتم ياخبراء
الرد }}}
تم الشكر بواسطة:
#12
هل يوجد احد ليساعدني شباب واتمنى الشرح
الرد }}}
تم الشكر بواسطة:
#13
السلام عليكم
اخي العزيز فكرة الصلاحيات سهلة و هي كما يأتي
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
تحياتي


الملفات المرفقة
.rar   Sample.rar (الحجم : 58.41 ك ب / التحميلات : 53)
الرد }}}
تم الشكر بواسطة:
#14
خوك كل الى قلته فاهمنها بس محتاج الى اكواد الطريقة مع شرح كل كود موجود لأني لم افهم السورسات المنشورة المجانية حملت كذا سورس ولم افهمخا جيدا
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كيف ايجاد أعلى رقم بعد علامة محددة.لحقل الباركود new_programer 6 471 20-01-25, 02:11 AM
آخر رد: new_programer
  أريد تحديد صلاحيات المستخدمين عن طريق حقل في جدول قاعدة البيانات F.H.M 0 326 12-09-24, 06:29 PM
آخر رد: F.H.M
  [VB.NET] حفظ بيانات صفوف محددة في الجريد فيو abu7shihab 1 316 09-08-24, 04:50 PM
آخر رد: abu7shihab
  نسخ عناصر محددة من لست إلى آخر مصمم هاوي 5 454 13-05-24, 07:20 PM
آخر رد: أبو خالد الشكري
  [VB.NET] كيف نستورد أعمدة محددة من أكسل ؟ saud1004 10 874 25-01-24, 04:12 PM
آخر رد: saud1004
Photo [VB.NET] صلاحيات كل مستخدم Ashraf emam 3 673 21-09-23, 01:48 PM
آخر رد: أبو خالد الشكري
  عرض صفوف محددة kebboud 6 896 27-04-23, 11:16 AM
آخر رد: kebboud
  [VB.NET] استفسار حول صلاحيات المستخدمين ali_ahmed12 7 1,432 20-11-22, 10:28 PM
آخر رد: ali_ahmed12
  [VB.NET] حدف كل اسطر محددة في داتا قريد فيو ali_ahmed12 2 832 08-11-22, 10:18 PM
آخر رد: مصمم هاوي
  [سؤال] كيفية تصدير اعمدة محددة من الداتا قريد الي الاكسل عبدالكريم برشدان 3 2,260 10-10-22, 09:29 AM
آخر رد: أبووسم

التنقل السريع :


يقوم بقرائة الموضوع: