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

[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

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

 

[ابو جودي]

  في 11‏/11‏/2016 at 22:05, 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

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

 

Expand  

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

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

[ابو جودي]

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

[Alkleeg]

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

هذا المرفق

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

ناصر    1

احمد    2

سامي   3

مثال سامي.rar

[Alkleeg]

  في 12‏/11‏/2016 at 09:32, ابا جودى said:

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

Expand  

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

[Alkleeg]

  في 12‏/11‏/2016 at 09:32, ابا جودى said:

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

Expand  

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

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

[ابو جودي]

  في 13‏/11‏/2016 at 17:08, ALFAALEH said:

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

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

Expand  

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

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

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

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

 

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

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

[Alkleeg]

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

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

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

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

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

[ابو جودي]

  في 13‏/11‏/2016 at 18:36, ALFAALEH said:

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

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

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

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

Expand  

 

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

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

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

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

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

_up_مثال سامي.rar

 

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

ناصر    1

احمد    3

سامي   2

 

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

[Alkleeg]

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

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

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

 

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

[Alkleeg]

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

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

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

 

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

[ابو جودي]

  في 14‏/11‏/2016 at 07:43, ALFAALEH said:

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

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

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

 

Expand  

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

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

 

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

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] >------------------->> عدم تمكيل

  في 14‏/11‏/2016 at 17:06, ALFAALEH said:

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

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

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

 

Expand  

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

[Alkleeg]

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

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

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

 

[ابو جودي]

  في 14‏/11‏/2016 at 19:10, ALFAALEH said:

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

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

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

 

Expand  

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

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

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

[الأحمري]

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

 

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

[ebnjabalapp]

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

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

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

[محمد صلاح1]

  في 13‏/11‏/2016 at 17:12, ابا جودى said:

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

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

Expand  

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

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

[ابو جودي]

  في 26‏/5‏/2019 at 09:35, محمد صلاح1 said:

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

Expand  

[محمد صلاح1]

  في 27‏/5‏/2019 at 10:14, ابا جودى said:

Expand  

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