السماح للمستخدم التعديل على سجلاته فقط

[Alkleeg]

السلام عليكم ورحمة الله وبركاته

عندي برنامج ويحوي صلاحيات المستخدمين وكل مستخدم يسجل سجل جديد يضيف اسمه للسجل بحسب اليوزر المسموح له بدخول البرنامج

سؤوالي هو السجلات من : الاسم ,العمر, التاريخ , ....... اخر شي مسجل المعلومات ( المستخدم )لنموذج مستمر فمثلا المستخدم احمد والسجل الاول والرابع والخامس والعشرين مسجله باسم المستخدم احمد فعند دخول احمد على البرنامج يمكنه يعدل على سجلاته فقط المسجلة باسمه بينما لا يمكن له التعديل على باقي سجلات المستخدمين الاخرين كييييييييييييييف عمل ذلك

بحثت ولم يشير احد لهذه الخاصية مع انها مهمة جدا ارجوا الرد لتعم الفائدة للجميع وشكرا لكم 

تم تعديل نوفمبر 11, 2016 بواسطه ALFAALEH

[ابو جودي]

اضف المرفقق حتى تتضح الرؤية يا اخى الحبيب  

[Alkleeg]

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

فلو فرضنا ان المستخدم احمد سجل السجل رقم 1 ورقم 4 ورقم 5 ورقم 6 ورقم 7

والمستخدم عبد الرحمن سجل السجل رقم2 ورقم 3 ورقم 8

عندما يدخل احمد للبرنامج يتمكن من التعديل على السجلات الخاصة به السجل 1 و4 و5 و6 و7 والمستخدم عبد الرحمن لا يمكنه التعديل على تلك السجلات 

وعبد الرحمن يمكنه التعديل على سجل رقم 2 ورقم 3 ورقم 8 ولا يمكن ل احمد التعديل على تلك السجلات 

والمستخد م احمد وعبد الرحمن تعرض لهم كافة السجلات 

 

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

If [RP] = 0 Then
Ms$ = "ليس لديك صلاحية الدخول للصلاحيات"
Ti$ = "خطا صلاحيات"
(Re = MsgBox(Ms$, 0, Tis
Else
DoCmd.OpenForm "Reports", acNormal
End If

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

 

[ابو جودي]

20 ساعات مضت, ALFAALEH said:

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

فلو فرضنا ان المستخدم احمد سجل السجل رقم 1 ورقم 4 ورقم 5 ورقم 6 ورقم 7

والمستخدم عبد الرحمن سجل السجل رقم2 ورقم 3 ورقم 8

عندما يدخل احمد للبرنامج يتمكن من التعديل على السجلات الخاصة به السجل 1 و4 و5 و6 و7 والمستخدم عبد الرحمن لا يمكنه التعديل على تلك السجلات 

وعبد الرحمن يمكنه التعديل على سجل رقم 2 ورقم 3 ورقم 8 ولا يمكن ل احمد التعديل على تلك السجلات 

والمستخد م احمد وعبد الرحمن تعرض لهم كافة السجلات 

 

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

If [RP] = 0 Then
Ms$ = "ليس لديك صلاحية الدخول للصلاحيات"
Ti$ = "خطا صلاحيات"
(Re = MsgBox(Ms$, 0, Tis
Else
DoCmd.OpenForm "Reports", acNormal
End If

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

 

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

ياترى النموذج اللى بيستعرض منه السجلات نموذج مستمر واللا مفرد ؟

[ابو جودي]

رجاء ارفاق قاعدة البيانات تسهيلا وتيسيرا لمن يريد المساعده وحفاظا على وقته

[Alkleeg]

شاكره لتجاوبكم معي

هذا المرفق

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

ناصر    1

احمد    2

سامي   3

مثال سامي.rar

[Alkleeg]

4 ساعات مضت, ابا جودى said:

رجاء ارفاق قاعدة البيانات تسهيلا وتيسيرا لمن يريد المساعده وحفاظا على وقته

تم ارفاق المطلوب 

[Alkleeg]

في ١٢‏/١١‏/٢٠١٦ at 12:32, ابا جودى said:

رجاء ارفاق قاعدة البيانات تسهيلا وتيسيرا لمن يريد المساعده وحفاظا على وقته

اين انت يا ابا جودي اتحفنا بردك 

لا زلت انتظر الرد  يا ابا جودي منك او من الاخوان  ........................................................ محتاجه الحل ضروري

[ابو جودي]

9 ساعات مضت, ALFAALEH said:

اين انت يا ابا جودي اتحفنا بردك 

لا زلت انتظر الرد  يا ابا جودي منك او من الاخوان  ........................................................ محتاجه الحل ضروري

انا فعلا اسف باعتذر على التأخير

طب ممكن سؤال
انا بأفكر من شوية فى موضوع حضرتك
 

دلوقتى ايه راى حضرتك نعمل عدد 2 نموذج
الاول لإدخال البيانات

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

 

وللعلم باسورد  المستخدم  احمد  3  مش   2 

تم تعديل نوفمبر 13, 2016 بواسطه ابا جودى

[Alkleeg]

الف شكر لك ابا جودي ورفع الله مقامك

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

اتمنى نموذج واحد يفتح  واحمد مثلا يدخل يتاح له التعديل على سجلاته فقط وفي نفس الوقت يعرض له جميع السجلات ( اتكلم عن النموذج الفرعي فقط ) اما النموذج الاساسي غير مطلوب سيتم تامينه بالكامل ونموذج اخر لمستخدم له صلاحيات اضافة وتعديل لاضافة بيانات النموذج الاساسي وتم عمله ولله الحمد

بتعبك معي بس حاولت وما وصلت لنتيجة

تم تعديل نوفمبر 13, 2016 بواسطه ALFAALEH

[ابو جودي]

14 ساعات مضت, ALFAALEH said:

الف شكر لك ابا جودي ورفع الله مقامك

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

اتمنى نموذج واحد يفتح  واحمد مثلا يدخل يتاح له التعديل على سجلاته فقط وفي نفس الوقت يعرض له جميع السجلات ( اتكلم عن النموذج الفرعي فقط ) اما النموذج الاساسي غير مطلوب سيتم تامينه بالكامل ونموذج اخر لمستخدم له صلاحيات اضافة وتعديل لاضافة بيانات النموذج الاساسي وتم عمله ولله الحمد

بتعبك معي بس حاولت وما وصلت لنتيجة

 

الحمد لله سبحانه وتعالى الذى تتم بنعمته الصالحات الحمد لله الذى هدانى وما كنت لاهتدى لولا ان هدانا الله عزوجل
ربنا لا علم لنا الا ما علمتنا انك انت العليم الحكيم

1- الحمد لله تعالى تم عم المطلوب

2- تم التعديل على نموذج الدخول لو تمت كتابة اسم مستخدم غير موجود اصلا تظهر رسالة حتى قبل كتابة كلمة المرور  وعندما بكون اسم المستخدم صحيح  يتم نقل التركيز لمربع الباسورد 

فى انتظار رد حضرتك بعد التجربة ان شاء الله

اللهم اكرم كل من تعلمت على ايديهم وارزقهم وبارك لهم فى رزقهم واجزهم عنى وعن امة محمد خير الجزاء يارب العالمين
اللهم امين امين امين

_up_مثال سامي.rar

 

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

ناصر    1

احمد    3

سامي   2

 

وللمرة الثانية عذرا على التأخر فى الرد لضيق وقتى وانشغالى بعملى وكذلك لدراسة وتحليل المرفق
دمتم فى امان الله

[Alkleeg]

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

 لو تكرمت شرح الخطوه رقم 1 وما هو الكود الذي تم تعديله او هل تم الحل بدون كود لكي يستفيدون الكرام بالموقع من هذا الموضوع ولتعم الفائدة .

وشكرا لك .,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,والسلام عليكم ورحمة الله و بركاته

 

تم تعديل نوفمبر 14, 2016 بواسطه ALFAALEH

[Alkleeg]

السلام عليكم ورحمة الله وبركاته

ابا جودي نعم هذا المطلوب والله العظيم من الصباح الى الحين احاول اطبق المثال على برنامجي دون فائدة 

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

 

تم تعديل نوفمبر 14, 2016 بواسطه ALFAALEH

[ابو جودي]

16 ساعات مضت, ALFAALEH said:

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

 لو تكرمت شرح الخطوه رقم 1 وما هو الكود الذي تم تعديله او هل تم الحل بدون كود لكي يستفيدون الكرام بالموقع من هذا الموضوع ولتعم الفائدة .

وشكرا لك .,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,والسلام عليكم ورحمة الله و بركاته

 

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

اختنا الكريمة وقت الشرح واعتذر عن تأخرى فى الرد عليكم 

 

اولا التعديلات التى تمت كالاتى : 

1- النموذج  user2     مربع النص     n1  الحدث بعد التحديث
الكود القديم

DoCmd.Requery

الكود بعد التحديث اصبح كالاتى 
 

DoCmd.Requery
If IsNull([user_name]) Then
Ms$ = "لا يوجد مستخدم بهذا الاسم"
Ti$ = "خطأ اسم مستخدم"
Re = MsgBox(Ms$, 0, Ti$)
n1.SetFocus
Else
n2.SetFocus
End If

استخدمت  if  الشرطية بحيث لو اسم المستخد غير موجود او تمت كتابته بطريقة خاطئة تظهر رسالة تفيد بعدم وجود هذا المستخدم
ولو تمت الكتابة لاسم المستخدم بشكل صحيح بحيث يوافق احد اسماء المستخدمين يقوم بنقل التركيز الى مربع النص  باسم   n2

--------------------------

2- النموذج  PP  >>--------------->   النموذج الفرعى

مربع النص باسم    نص58

القيمة الافتراضية قبل التعديل كانت

=[Forms]![user3]![full_name]

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

=[Forms]![user3]![full_name]

ثم قمت بعمل تنسيق شرطى لكل مربعات النص 
[nem]<>[نص58] >------------------->> عدم تمكيل

9 ساعات مضت, ALFAALEH said:

السلام عليكم ورحمة الله وبركاته

ابا جودي نعم هذا المطلوب والله العظيم من الصباح الى الحين احاول اطبق المثال على برنامجي دون فائدة 

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

 

اعتذر على التاخير انا لسه جاى من الشغل 

[Alkleeg]

بسم الله والصلاة والسلام على أشرف المرسلين

اخوي أبا جودي اسال الله ان يزيدك علما وتم التوصل للمطلوب 

والمعذره كلفت عليك  واشغلتك 

 

[ابو جودي]

9 ساعات مضت, ALFAALEH said:

بسم الله والصلاة والسلام على أشرف المرسلين

اخوي أبا جودي اسال الله ان يزيدك علما وتم التوصل للمطلوب 

والمعذره كلفت عليك  واشغلتك 

 

اللهم صل على سيدنا محمد عبدك ورسولك النبى الامى وعلى اله وصحبه وسلم كلما ذكرك الذاكرون وغفل عن ذكرك الغافلون عدد ما احاط به علم الله وجرى به قلم الله ونفذ به حكم الله ووسعه علم الله عدد كل شئ واضعاف كل شئ وملء كل شئ عدد خلق الله وزنه عرش الله ورضا نفس الله ومداد كلمات الله عدد ماكان ومايكون وما هو كائن فى علم الله
اللهم صل على سيدنا محمد السابق للخلق نوره ورحمة للعالمين ظهوره عدد ما مضى من خلقك ومن بقى 
ومن سعد منهم ومن شقى صلاة تستغرق العد وتحيط بالحد صلاة لا غاية لها ولا منتهى  ولا انقضاء صلاة دائمة بدوام ملك باقية ببقائك
وعلى اله وصحله وسلم

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

الحمد لله تعالى الذى تتم بنعمته الصالحات

[الأحمري]

ماشاء الله مثلال ممتاز استفدت منه 

 

لكن لو عندنا زر أمر للحذف كيف اخليه يكون مفعل لما يكون السجل مدخل عن طريق يوزره .. واذا كان السجل مدخل عن طريق يوزر آخر لا يتفعل زر الحذف ؟

[ebnjabalapp]

لم اتابع الموضوع جيدا

ولكن من الافضل

ان لايدخ المستخدم الا علي سجلاته من البداية

[محمد صلاح1]

في ‏١٣‏/‏١١‏/‏٢٠١٦ at 19:12, ابا جودى said:

دلوقتى ايه راى حضرتك نعمل عدد 2 نموذج
الاول لإدخال البيانات

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

بدون تكليف فضلاً وتكرماً أخي محمد عصام هل بالإمكان أن تبدع لنا من خلال موضوع جديد به تطبيق علي مثال الأخت صاحبة الموضوع أو أي مثال أخر يروق لك ولكن بتنفيذ أقتراحك أنت الموجود في هذا الاقتباس بعمل نموذجين واحد للإدخال والأخر للتعديل (لسجلات المستخدم الحالي فقط دون غيره من المستخدمين وكذلك عند الحذف والبحث) حيث أراه أنه هو الأولي والأفضل حين عثرت عليه أثناء بحثي عن نفس الغرض بنفس الطريقة مع خالص الشكر والتحية والتقدير

تم تعديل مايو 26, 2019 بواسطه محمد صلاح1

[ابو جودي]

في ٢٦‏/٥‏/٢٠١٩ at 11:35, محمد صلاح1 said:

بدون تكليف فضلاً وتكرماً أخي محمد عصام هل بالإمكان أن تبدع لنا من خلال موضوع جديد به تطبيق علي مثال الأخت صاحبة الموضوع أو أي مثال أخر يروق لك ولكن بتنفيذ أقتراحك أنت الموجود في هذا الاقتباس بعمل نموذجين واحد للإدخال والأخر للتعديل (لسجلات المستخدم الحالي فقط دون غيره من المستخدمين وكذلك عند الحذف والبحث) حيث أراه أنه هو الأولي والأفضل حين عثرت عليه أثناء بحثي عن نفس الغرض بنفس الطريقة مع خالص الشكر والتحية والتقدير

[محمد صلاح1]

7 دقائق مضت, ابا جودى said:

@ابا جودى طيب أنا ريحتك وفتحت موضوع جديد للمطلوب علي هذا الرابط إذا كنت حابب المشاركة وتطبيق مقترح فكرتك الأساسية فذلك سوف يسعدنا بالتأكيد