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

[abouelhassan]

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

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

واعادة التفعيل بتغير التاريخ مع الشكر وخالص الدعاء

بارك الله فيكم اخوانى الافاضل

DATA1041-1.mdbFetching info...

[ابوخليل]

تفضل

لن يسمح لطارق بالدخول لان تاريخ صلاحيته اصغر من تاريخ اليوم

DATA1041-2.rarFetching info...

[abouelhassan]

الله الله الله الله تسلم ايدك استاذى الحبيب ابوخليل

دائما مبدع استاذى الغالى ينقصنى شىء واحد فقط

رسالة بانتهاء تفعيل المستخدم بدل رسالة اليوزر او الباس ورد خطأ

يعنى رسالة اخرى عند انتهاء التفعيل بخلاف رسالة خطأ اليوزر والباس ورد

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

احترامى

[ابوخليل]

تفضل

DATA1041-3.rarFetching info...

[abouelhassan]

اسعد الله وقتك بكل خير استاذى الحبيب ابوخليل

تسلم ايدك وعينك يارب كل شئ تمام عدا شى واحد

المستخدم اذا لم اكتب باس ورد وضغط login

بيعمل دخول 

هنا اختارت طارق ولم اكتب باس ورد عمل دخول

اعتقد الخطأ يكمن هنا فى هذا السطر

 Set rst = CurrentDb.OpenRecordset("select tblUser.User_Name, tblUser.Password, tblUser.userDate, tblUser.Check_User from tblUser")

بارك الله فيك يارب يارب ما يحرمنا من حضرتك ابداا يارب سيدى الكريم

 

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

[ابوخليل]

حبيبي ابو حسان

جرب اول مرفق  في مشاركتك الأولى

الخلل موجود من الأول وليس من تعديلي الأخير

على كل حال سوف انظر في الخلل

[abouelhassan]

فعلا استاذى اشكرك ربنا يحفظك يارب ويديك الصحة والعافية

[ابوخليل]

تفضل 

كود يختلف قليلا عن السابق ، علما اني استخدمه في غالب اعمالي بل اني اكتفي بتأكيد كلمة المرور  فقط

DATA1041-4.rarFetching info...

[abouelhassan]

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

حدث لى مشكل فى القاعدة الاخيرة

عند فتح فورم المستخدمين

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

الخطأ التالى مش عارف ليه والله انا كل الى بعمله بدخل البيانات التى بالصورة

ربنا يكرمك يارب يارب يارب

 

[ابوخليل]

هذه من المشكلات التي تواجه المبرمج ،، لما يغير سطر في كود  يكون له تبعات في اماكن اخرى لا تظهر الا عند التجربة

تفضل تم التعديل 

جرب ووافني بالنتيجة

DATA1041-5.rarFetching info...

[abouelhassan]

الله يعزك ويرفع شأنك حبيبى استاذى ابوخليل

اكرمك الله مثل ما اكرمتنى

قمت بعمل الاتى

قمت بحذف المكتوب بجانب Admin بالنسبة لطارق

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

وبالضغط على login

ظهر هذا الخطأ

ربنا يراضيك يارب ويرضى عنك اللهم امين

[ابوخليل]

غير  ما لون بالاصفر بهذا

myCheckUser = Nz(rst!Check_User)

 

[abouelhassan]

رحم الله والديك استاذى ابوخليل

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