احتاج صلاحيات مستخدم

[abouelhassan]

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

اخواتى واساتذتى عمالقة المنتدى الكرام جدا جدا جدا

انابحبكم اخويا استاذ جعفر اخويا استاذ ابو خليل انا احبكم فى الله

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

والثانى يمكنه ان يشاهد فى فورمPrint Dates No Labels الجزء العلوى من الفورم فقط الى فيه جميع البيانات ولايشاهد الجزء السفلى الى فيه frm_main

ولو امكن  اخفاء حدود الاكسس كلها 

ممكن مع الشكر الجزيل وخالص الدعاء من القلب

Data2.mdb

تم تعديل فبراير 2, 2021 بواسطه abouelhassan

[jjafferr]

19 ساعات مضت, abouelhassan said:

ولو امكن  اخفاء حدود الاكسس كلها 

انا لا احبذ هذه النقطة ، لما فيها من اشكاليات ، وخصوصا لمبتدئ اكسس 😁

 

جعفر

[ابوخليل]

تم عمل المطلوب بطريقة بدائية 

جرب المرفق ووافني بملاحظاتك

حساب المدير   :  اليوزر =  a               الباسوورد = 1

حساب المستخدم   :  اليوزر =  b        الباسوورد = 2

1 ساعه مضت, jjafferr said:

انا لا احبذ هذه النقطة ، لما فيها من اشكاليات ، وخصوصا لمبتدئ اكسس

ملاحظة في محلها .. ولا اخفيك اني قرأت ملاحظتك بعد ان ادرجت الكود ، والآن الكود معطل

اذا اردت يا اباحسان تفعيل اخفاء الاطارات  افتح نموذج frmlogin  على التصميم واذهب الى حدث تحميل النموذج تجد الدالة المسؤولة  HideAccess'  معطلة ، كل ما عليك فعله ان اردتها تعمل هو ان تزيل علامة التنصيص الصغيرة الموجودة يسار الدالة .

ومؤكد  ستفاجأ بعد تفعيلها انه لا يمكنك الدخول الى طار قاعدة البيانات ولن ترى الكائنات ..  ما الحل ؟

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

هنا اذهب الى الدالة المذكورة وعطلها ان احببت

Data3.rar

[abouelhassan]

تمام تسلم ايدك استاذى ابوخليل الكريم الرائع محتاج بس فى اليوزر B

يكون كده

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

[ابوخليل]

انا كتبت لك في اول سطر ان طريقتي بدائية واقصد بذلك انها سهلة وإن شئت قل  تحايل .

شوف عزيزي : افتح نموذجك الرئيسي على التصميم

تلاحظ وجود اطار شفاف يغطي  العناصر التي نريد نخفيها عن المستخدم ..  اسمه kana

حاول انك تقلص ارتفاعه من الأعلى   بحيث يغطي اللي تريده فقط  ثم احفظ واخرج

انا متأكد انك ستعملها

[abouelhassan]

عملتها وفرحان جداااااا والله وكمان عملت الشيفت جميل جدا

انا احبك فى الله اخى واستاذ جعفر 

اقبل راسكما لجميلكم الف الف الف الف مليون شكر

[abouelhassan]

اخى فى الله استاذى ابوخليل

انا غيرت الكومبو بوكس فى فورم البدأ الى نتيجة وغيرت اسمه وتعمل تمام

المشكلة عند الدخول باليوزرb 

مع انى واضع الجزء السفلى كله داخل المربع kana

الا ان هذين النتيجتين تظل ظاهرة مش عارف ليه

مع الشكر الوفير من كل لقلبى احيك بارك الله فيك

Data3.mdb

تم تعديل فبراير 3, 2021 بواسطه abouelhassan

[abouelhassan]

وكمان print DAtes

لا يعمل مش عارف ليه بيكون فى الخلفية غير ظاهر

مشكور اخى

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

بس مش عارف احل مشكلة النتيجة التى تظهر فى اليوزر B بالرغم من دخولها فى الاطار KANA

ربنا يبارك لك يارب

تم تعديل فبراير 3, 2021 بواسطه abouelhassan

[ابوخليل]

تذكير :

حاول دائما رفع آخر نسخة تم التعديل عليها من قبلي او من غيري ، هذا من اجلك حتى يكون التطوير تراكمي

تم التعديل على نسخة 2007

مشكلة ظهور بعض العناصر فوق الإطار حلها سل جدا وهو ان آخر عنصر يتم اضافته او قصه ثم لصقه يكون له الأولوية في الظهور فوق العناصر الأخرى ، لنترك حل التحايل ونعمل على غيره

الحلول كثيرة : منها ان نتعامل مع العناصر من خلال الكود عنصر عنصر

ومنها ان نخصص للمستخدمين الآخرين فورم خاص  وهذا ما عملته لك في المرفق ادناه

Data5.rar

[ابو محمد 316]

35 دقائق مضت, ابوخليل said:

ومنها ان نخصص للمستخدمين الآخرين فورم خاص  وهذا ما عملته لك في المرفق ادناه

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

لماذا يتم تخصيص فورم خاص لمستخدم اخر

هل تقصد ان لو عندي 4 مستخدمين اعمل 4 نماذج 

وما الفرق بين النماذج الابعة ؟

وهل مصدر هذى النماذج جدول واحد او متعددة المصادر ؟

 

فقط من باب استفيد انا وباقي الأعضاء

 

حفظك الله ورعاك 

[ابوخليل]

عليكم السلام

اهلا ابو محمد

اقتباس

لماذا يتم تخصيص فورم خاص لمستخدم اخر

انا ذكرت انه من ضمن الحلول  انه يمكن نتعامل مع العناصر من خلال الكود عنصر عنصر  ، ونتحكم في ظهور هذه العناصر او عملها من خلال الكود

وقبلها عرضت حل وهو التحايل بتغطية العناصر واخفاءها عن مستخدم محدد .

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

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

اقتباس

هل تقصد ان لو عندي 4 مستخدمين اعمل 4 نماذج 

لا لا ابدا  .. ولا حتى نموذج واحد .. وعملي هذا تجاوز للمألوف وعمدت فيه الى الأسهل والأسرع .. لأن صاحبنا ابو حسان  برنامجه يعتمد على نموذج البداية والذي يشتمل على جميع الأوامر  وحيث انه  من الطلاب المستجدين في منتدانا احببت ان اغير وابدل واعمل اسهل الطرق للفهم .. فالآن  اصبح لديه نموذجي بداية واحد للمدير والآخر لغيره من المستخدمين .

وقلت : ان برنامجه يعتمد على نموذج البداية والذي يشتمل على جميع الأوامر ، لأنه في البرامج الأخرى وخاصة التي تعتمد في العرض على اشرطة القوائم لا معنى لتخصيص  النماذج وهي غير مجدية .

وطالب العلم مع تقدمه في المعرفة سيعمل على التطوير والبحث عن الأفضل .

[abouelhassan]

الله الله جميل جدا اشكرك استاذى واخى ابو خليل حفظك المولى عز وجل وبارك الله فيك يارب حبيبى

[abouelhassan]

معلش سامحنى استاذ ابوخليل ممكن اعرف سبب عدم عمل التقارير مش عارف السبب عندما دخلت يوزر B

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

وايضا الملف الى حضرتك رفعته التقاريرلا تعمل فيه من غير ما اعمل شئ

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

وحضرتك ذكرت ان هناك نظام اسمه الصلحيات ممكن يضاف الى المشروع كيف يتم ذلك

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

هل يمكن عمل هذا بالاكسس

احترامى اخيك

 

Data5.accdb

تم تعديل فبراير 4, 2021 بواسطه abouelhassan

[jjafferr]

7 ساعات مضت, ابوخليل said:

ان نخصص للمستخدمين الآخرين فورم خاص

اخوي ابوخليل ، ظاهرا انك ما لاحظت وجود هذا الحقل المخفي ، واللي يأخذ قيم مربعات سرد "نوع العدد" ، سواء اللي فوق او اللي تحت :

.

.

واستعلامات البرنامج تأخذ قيمها من حقول هذا النموذج ،

فمجرد عمل نموذج واجهة آخر لن يجعل البرنامج يعمل ، واذا اردناه ان يعمل ، فيجب عند اختيار اي من الحقول في النموذج الجديد ، ان نرسل القيمة الى الحقل في النموذج القديم (اجعله مفتوح ومخفي) ، ومن ثم نشغل النماذج او التقارير 🙂

 

لماذا اجعل برامجي تعمل هكذا ؟ حتى لا اعمل عشرات الاستعلامات ، وكل استعلام يعمل لنموذج معين فقط ،

بينما بالطريقة هذه ، فمهما عملت من نماذج ، ارسل قيمها لنموذج الواجهة ، ونفس الاستعلام يعمل لجميع النماذج/التقارير ، لأن معيارها هو نموذج الواجهة المفتوح دائما 🙂

 

جعفر

[abouelhassan]

بارك الله فيك استاذ جعفر واستاذ ابو خليل حبايب قلبى اقسم بالله لو امكن استاذى ابو خليل حتى لا اتعب حضرتك

ممكن اعرف ازى اتحايل على الخط Kana

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

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

هل يمكن عمل هذا بالاكسس

بارك الله فيك استاذى الحبيب

تم تعديل فبراير 4, 2021 بواسطه abouelhassan

[ابوخليل]

4 ساعات مضت, jjafferr said:

اخوي ابوخليل ، ظاهرا انك ما لاحظت وجود هذا الحقل المخفي ، واللي يأخذ قيم مربعات سرد "نوع العدد" ، سواء اللي فوق او اللي تحت :.

شكرا استاذنا على المداخلة والتنبيه

صحيح .. فعلا .. غفلت عن هذا .  حتى انني لم اجرب  فتح التقارير  

وعلى كل حال سوف اسلك طريقا آخر في اعداد الصلاحية

 

 

[jjafferr]

في ٤‏/٢‏/٢٠٢١ at 23:12, ابوخليل said:

وعلى كل حال سوف اسلك طريقا آخر في اعداد الصلاحية

رحم الله والديك اخوي ابوخليل 🙂

جعفر

[ابوخليل]

تم ضبط الصلاحية باستخدام العناصر الموجودة داخل النموذج 

واستخدمت كلمة نصية مشفرة "modeer" للتمييز بين المدير وغيره بدلا من خانة الاختيار  والتي يسهل الوصول اليها من الجدول ,والتلاعب بها

هذا يعني انك اذا اردت تسجيل مستخدم جديد واردت تعيينه كمدير يلزم كتابة كلمة  modeer في حقل Admin

ايضا اظهرت لك اسم المستخدم في حقل خاص

الطريقة لإظهارة في اي حقل سواء في النماذج او التقارير  هو ان تكتب  الدالة التالية في مصدر بيانات الحقل 

=myUserName()

انظر الى الكود ادناه  في حال عدم  كون المستخدم مدير  فسوف يتم اخفاء العناصر  واحدا واحدا

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

If myCheckUser <> "modeer" Then
cmd_rpt_Items_Dates_3.Visible = False
cmd_rpt_Items_Dates_3_No_Labels.Visible = False
cmd_rpt_Items_Pages_3.Visible = False
cmd_frm_Items_All.Visible = False
srch_Date_From_3.Visible = False
srch_Date_To_3.Visible = False
srch_All_3.Visible = False
srch_Page_From_3.Visible = False
srch_Page_To_3.Visible = False
zerUsers.Visible = False
Box21.Visible = False
End If

 

اي استفسار لا يخص الصلاحية يفضل عرضه في موضوع جديد

   

DATA11.rar

[abouelhassan]

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

ما ينقصنى شئ واحد فقط والحمد لله وزادكم الله من فضله

هو موضوع الادخال اى شئ يسهل على سرعة ادخال البيانات فى فورم الادخال

حفظكم رب العباد يارب

جعله الله بميزان حسناتكم

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

 

[ابوخليل]

تم اصلاح الخلل في المرفق

وتم ايضا تنقيح المشاركات وذلك بحذف ما لا يلزم

DATA12.rar