نمونه جهت تست گذاشتم(با استفاده از کدهای جناب اقای hasanrعزیز)
لطفا اصلاح بفرمایید
مشکلات :
1- اگر ما بخواهیم TxtCurUser را مخفی کنیم ،وفوکوس را روی شی دیگر فرم f_main بگذاریم ...بعد از کلیک بر روی دکمه ورود فرم f_login ، خطا نشان داده می شود.اگر هم وارد شود کاربر به همه جا دسترسی دارد.
2- اگر کاربر بدون انتخاب یوزر و یا وارد کردن پسورد بخواهد وارد سیستم شود ،به اوپیغام داده واجازه ورود نمی دهد ولی اگر کاربر پسورد را اشتباهی وارد نماید ،به او پیغام داده می شود که پسورد اشتباه است ولی او را وارد فرم اصلی می کند.
3- کاربر سطح 5 به هیچ قسمتی دسترسی ندارد ولی من می خواهم وقتی به او پیغام داد و او روی دکمه ok کلیک کرد ، او را از سیستم خارج نماید.
اضافه شده :
1- تاریخچه ورود افراد در یک تیبل ذخیره می گردد.
2- فرم تنظیمات کاربران برای ویرایش کاربران توسط ادمین آماده شده است.
3- Tabpage به فرم اصلی افزوده شده ودسترسی کاربران به آن ویا قسمتهایی از آن ممکن است محدود شده باشد.
4- تیبل تقویم شمسی ومیلادی تا اول 30/12/1399 و 20/03/2021 اضافه شده است.(جهت تاریخچه ورود کاربران احتیاج است)
5- سطح دسترسی 5 تعریف شده ،که به هنگام ورود کاربر با این سطح دسترسی به او پیغام داده می شود که"کاربر محترم دسترسی شما به برنامه تا اطلاع ثانوی مسدود می باشد" و کاربر به هیچ قسمتی دسترسی ندارد.
6- تاریخ وزمان ورود کاربر به صورت مخفی بر روی فرم ورود وجود دارد.(جهت تاریچه ورود به آن نیاز است)
7- پیغام های فارسی در بدو ورود (اکشن دکمه ورود فرم f_login)حذف نشده به دلیل اینکه ممکن است کسی با این برنامه کار کند که زیاد با کامپیوتر آشنا نباشد.
8- چون می خواستم نام کاربر فعلی در فرم f_main باشد از تابع dmax استفاده کردم(راه دیگری بلد نیستم)
نظر :
بعضی دوستان می گویند که چطور دسترسی به یک فرم خاص را محدود کنیم،من می گویم شما یک فرم ورود کاربر دارید ،بعد از اینکه کاربر وارد شد قرار نیست 20 تا ویا...فرم باز بشه که ،،،،،،یک فرم باز می شود که فرم اصلی است.از روی همان روی command button ها فرم ها را کنترل نمایید.وقتی کاربر به یک دکمه ای دسترسی نداشته باشد حتما به فرم آن هم دسترسی ندارد(فرمی که در رویداد آن دکمه اعمال شده)