semo.pa3x صلاحيات المستخدمين بأبسط طريقة - Users Permission

[SEMO.Pa3x]

السلام عليكم، كثيراً ما ارى طلبات "كيفية عمل صلاحيات المستخدمين"

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

لمن لا يعرف ماذا اقصد بصلاحيات المستخدمين, مثال:

اليوزر A غير مسموح له بفتح فورم الاعدادات مثلاً، اما اليوزر B مسموح له بفتح فورم الاعدادات

اي سؤال انا موجود.

تحياتي لكم

Permission.accdbFetching info...

[أبوبسمله]

وعليكم السلام د حسنين جزاك الله خيرا 💐

[أبوبسمله]

استاذى العزيز @SEMO.Pa3x جزاك الله خيرا 💐

ممكن استاذنك واطمع بشرح بسيط لكل داله حتى استزيد بشرحكم لفهم

[SEMO.Pa3x]

  في 15‏/1‏/2021 at 06:50, احمد الفلاحجي said:

استاذى العزيز @SEMO.Pa3x جزاك الله خيرا 💐

ممكن استاذنك واطمع بشرح بسيط لكل داله حتى استزيد بشرحكم لفهم

Expand  

 

تفضل

[أبوبسمله]

  في 15‏/1‏/2021 at 06:51, SEMO.Pa3x said:

تفضل

Expand  

يزيد فضلك د حسنين

  في 15‏/1‏/2021 at 06:50, احمد الفلاحجي said:

واطمع بشرح بسيط لكل داله حتى استزيد بشرحكم لفهم

Expand  

انا اطمع بشرح بسيط منك لكل داله ان كان وقتكم يسمح

[SEMO.Pa3x]

  في 15‏/1‏/2021 at 06:55, احمد الفلاحجي said:

يزيد فضلك د حسنين

انا اطمع بشرح بسيط منك لكل داله ان كان وقتكم يسمح

Expand  

لو ممكن تحدد اي دالة؟ لا اتذكر اني استخدمت دوال بل فنكشنات

[أبوبسمله]

  في 15‏/1‏/2021 at 06:56, SEMO.Pa3x said:

فنكشنات

Expand  

🙂 ايوه الفنكشن بعتذر لاننى لم اوضحها

[الحلبي]

  في 15‏/1‏/2021 at 05:58, SEMO.Pa3x said:

اي سؤال انا موجود.

Expand  

عمل جميل ورائع 

هل يمكن زيادة فنكشن به دالة او كود تخبر المستخدم بانه  النموذج الاول مثلا للقراءة والاطلاع فقط وليس للتعديل

اى كود فى الفنكشن يخبر بالفتح  وعند التعديل تظهر رسالة تخبره بان صلاحيته للقراءة فقط .

[SEMO.Pa3x]

  في 15‏/1‏/2021 at 07:00, احمد الفلاحجي said:

🙂 ايوه الفنكشن بعتذر لاننى لم اوضحها

Expand  

 

حسنا، لا مشكلة مع انني شرحت الاكواد داخل البرنامج

Public Function XOREncryption(CodeKey As String, DataIn As String) As String

 

خوارزمية تشفير النصوص يطلب براميترات اثنان الاول هو مفتاح التشفير ( CodeKey As String ) وهو المتمثل هنا

 

Function KEY_ENDE()
    KEY_ENDE = "PA$X"
End Function

 

والبراميتر الثاني ( DataIn As String ) النص المراد تشفيرة

نفس الكلام ينطبق على فنكشن فك التشفير

 

Public Function XORDecryption(CodeKey As String, DataIn As String) As String

 

الفنكشن هذا

 

Public Function GetUsernameLogin() As String

 

يقوم بجلب اسم المستخدم الحالي لقاعدة البيانات من جدول AutoSave ويقوم بفك تشفيرة وارجاعه كـ نص عادي لكي يتم مطابقتة فيما بعد

 

اما هذا الفنكشن

 

Public Function CheckPermissions(Username As String, permissions As String) As Boolean

 

يحتاج براميترات اثنان الاول اسم المستخدم لقاعدة البيانات والثاني الصلاحية المطلوبة لكي يتم تدقيقها هل هي True أو False

هل مسموح له بعمل هذا الاجراء او لا، نمرر البراميتر الأول وهو الـ Username من الفنكشن التالي GetUsernameLogin

ثم نمرر البراميتر الثاني وهو حسب ما مكتوب في الجدول وحسب الفورم المطلوب فتحه

مثلا: لدي في الجدول حقل اسمه frm_setting واريد ان اتحقق هل اليوزر لديه صلاحية بفتح هذا الفورم

فأكتب:

    If CheckPermissions(GetUsernameLogin, "frm_setting") = False Then
        MsgBox "You do not have permissions !", vbCritical, "ERROR!"
        Exit Sub
    End If

 

وسلامتك.

  في 15‏/1‏/2021 at 08:26, حلبي said:

عمل جميل ورائع 

هل يمكن زيادة فنكشن به دالة او كود تخبر المستخدم بانه  النموذج الاول مثلا للقراءة والاطلاع فقط وليس للتعديل

اى كود فى الفنكشن يخبر بالفتح  وعند التعديل تظهر رسالة تخبره بان صلاحيته للقراءة فقط .

Expand  

 

نعم، ممكن ذلك.

عندما اجد وقت كافي سأقوم بعمل مثال لك.

[أبو عبدالله الحلوانى]

جزاكم الله خيرا 

ولو تسمح لنا بتوضيح ما الفائدة من وجود جدول التشفير 

وفانكشن التشفير وفك التشفير 

تم تعديل يناير 15, 2021 بواسطه أبو عبدالله الحلوانى

[SEMO.Pa3x]

  في 15‏/1‏/2021 at 11:13, أبو عبدالله الحلوانى said:

جزاكم الله خيرا 

ولو تسمح لنا بتوضيح ما الفائدة من وجود جدول التشفير 

وفانكشن التشفير وفك التشفير 

Expand  

 

لصعوبة كشف كلمة المرور والبيانات المهمة من قبل المتطفلين.

[abouelhassan]

جزاك الله خيرا

شكروتقدير واحترام من اخيك

[أبوبسمله]

  في 15‏/1‏/2021 at 10:20, SEMO.Pa3x said:

وسلامتك.

Expand  

الله يسلم عمرك اخى واستاذى ابومهاب وجزاك الله كل خير 💐

[المهاجر ابو معاذ]

  في 15‏/1‏/2021 at 05:58, SEMO.Pa3x said:

السلام عليكم، كثيراً ما ارى طلبات "كيفية عمل صلاحيات المستخدمين"

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

لمن لا يعرف ماذا اقصد بصلاحيات المستخدمين, مثال:

اليوزر A غير مسموح له بفتح فورم الاعدادات مثلاً، اما اليوزر B مسموح له بفتح فورم الاعدادات

اي سؤال انا موجود.

تحياتي لكم

Permission.accdb 516 kB · 19 downloads

Expand  

مشكور

[السبيل1]

مجهود رائع لشخص ذو علم 

المثال أفترض وجود نموذجين فقط لعمل صلاحيات عليهم ماذا إذا كانت النماذج التي تحتاج لصلاحيات كثيرة ما هو التعديل المطلوب

هل يكون هناك جدول مستقل لبيانات المستخدمين بخلاف جدول الدخول وكيف يتم تطبيق ذلك علي مثالكم الجميل