صلاحيات

اليك هذا المثال من المنتدى لاحد الاخوة

حول التطبيق عندك

و استخدم البحث و ستجد الكثير بالمنتدى

/index.php?app=core&module=search&section=search&do=search&fromsearch=1

ممتاز الصلاحيات مع من قام بالتعديل.rar

mrnooo2000 كتب:

اليك هذا المثال من المنتدى لاحد الاخوة

حول التطبيق عندك

و استخدم البحث و ستجد الكثير بالمنتدى

/index.php?app=core&module=search&section=search&do=search&fromsearch=1

ربي يعطيك العافيه

ممكن رابط الموضوع

لا اعرف الرابط لان المرفق أرفقه احد الاخوة و طلب التعديل عليه

لكن ابحث عن صلاحيات

ستجد الكثير

ربي يعطيك العافيه وجاري التجربه

لكن سوال كيف الغي تشفير الاسم مع كلمة المرور في جدول users

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

SELECT users.SN, deCode([UName],'User') AS [User], decode([PW],"Pass") AS pass
FROM users;

ربي يعطيك العافيه

كم استفدت من هذا المثال

ولكن هناك مشكلة وهي في النموذج الفرعي

حيث اذا تمكن من الدخول الى النموذج الاساسي يستطيع التعديل على النمومذج الفرعي

كيف امنعه من التعديل على النموذج الفرعي وهذا هو المثا ل

اسم المستخدم 4

كلمة المرور 22

قاعدة بيانات1.zip

كيف يستطيع الدخول اذا لم تعطى له صلاحيات لذلك

عموما ما يطبق على الرئيسى يطبق على الفرعى فلا فارق بين هذا و لا ذاك

اخواني الكرام

كيف يتم اضافة نماذج اخرى للصلاحيات في البرنامج حتى اتحكم في عرضها للمستخدمين

ثانيا اريد تغيير اسم المسؤول system فكيف ذلك

رجا المساعدة

Abo_Yossof كتب:

كيف يستطيع الدخول اذا لم تعطى له صلاحيات لذلك

عموما ما يطبق على الرئيسى يطبق على الفرعى فلا فارق بين هذا و لا ذاك

ربي يعطيك العافيه اشكرك اخي الكريم

لكن سوال كيف الغي تشفير الاسم مع كلمة المرور في جدول users

وليس في الاستعلام

لكن ما الهدف من الغاؤه اخى الكريم

Abo_Yossof كتب:

لكن ما الهدف من الغاؤه اخى الكريم

لكي اتمكن من تعديل اسم المستخدم وكلمة المرور بشكل سريع فقط

اذا لا يمكن

كيف نقوم بتغير اسم system في جدول المستخدمين

malik2010 كتب:

اخواني الكرام

كيف يتم اضافة نماذج اخرى للصلاحيات في البرنامج حتى اتحكم في عرضها للمستخدمين

ثانيا اريد تغيير اسم المسؤول system فكيف ذلك

رجا المساعدة

اضف النماذج الخاصة بك

و فى حدث عند الفتح لكل نموذج ضع هذا الكود

Dim SF As Control
With MyUser
   If .GetAbility(Me.Name, OpenForm) Then
      Me.AllowAdditions = .GetAbility(Me.Name, Add)
      Me.AllowEdits = .GetAbility(Me.Name, Edit)
      Me.AllowDeletions = .GetAbility(Me.Name, Del)
      For Each SF In Me.Controls
        If SF.ControlType = acSubform Then
            SF.Form.AllowAdditions = Me.AllowAdditions
            SF.Form.AllowEdits = Me.AllowEdits
            SF.Form.AllowDeletions = Me.AllowDeletions
        End If
      Next
   Else
      MsgBox "ÚÝæÇð " & .UserName & "      " & vbCr & vbCr & "áíÓ áÏíß ÇáÕáÇÍíÉ áÝÊÍ åÐÇ ÇáäãæÐÌ", 0 + 16 + 1572864, "äÙÇã ÇáÕáÇÍíÇÊ"
      Cancel = True
   End If
End With

لتعديل كلمة السر او اسم المستخدم

وضعت زر فى شاشة الدخول لفتح النموذج الخاص بذلك

قاعدة بيانات1.rar

مشكور وبارك الله فيك

مجهود رائع