ورود

نسخه کامل مشاهده نسخه کامل : قفل شدن برنامه بعد از سه بار ورود اشتباه پسورد



bahar009
17-08-2009, 07:39
سلام دوستان
چطوری میشه کاری کرد که در فرم login بعد از سه بار ورود اشتباه پسورد برنامه قفل بشه؟
در واقع کد قفل شدن برنامه چیه؟
ممنون میشم اگه کسی راهنماییم کنه :11:

mahdi7s
17-08-2009, 10:30
منظورتان که تحت وب نیست ؟!

می توانید Enabled فرم رو false کنید.


برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

bahar009
17-08-2009, 11:03
منظورتان که تحت وب نیست ؟!

می توانید Enabled فرم رو false کنید.


برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
سللام ممنون از اینکه جواب دادید.
نه.منظورم ویندوز اپلیکیشن بود.
مرسی

sajjadlove
17-08-2009, 11:49
برای چی میخواین این کار رو انجام بدید...
فکر نکنم کار درستی باشه...

bahar009
17-08-2009, 12:45
برای چی میخواین این کار رو انجام بدید...
فکر نکنم کار درستی باشه...
سلام
چرا کار درستی نباشه؟
می خوام اگه کسی قصد ورود غیرمجاز داشت جلوگیری بشه!

sari-1369
17-08-2009, 16:49
Me.ControlBox = False
Me.Cursor = Cursors.WaitCursor
Me.Enabled=False
ببین این کارتو راه میندازه ؟

sajjadlove
17-08-2009, 17:37
سلام
چرا کار درستی نباشه؟
می خوام اگه کسی قصد ورود غیرمجاز داشت جلوگیری بشه!

خوب برنامه رو exit کنید.من تا حالا این همه برنامه دیدم ندیدم برای ورود غیرمجاز برنامه قفل بشه.....

BILLY_Mgs
20-08-2009, 01:34
با این موافقم کاملا درسته :

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
یه قسمت تو برنامتون بزارید که تعداد خطا هارو بشماره وقتی از حد مجاز گذشت این کارو بکنه که دوستمون تو پست ه 2 نوشتن .
دستشون درد نکنه.

mahdi7610
20-08-2009, 12:19
به نظر من هم قفل کردن برنامه کار اشتباهی هستش.

بهتره کاری کنید که برنامه Exit بشه .

موفق باشید :)

Arshia001
20-08-2009, 19:37
جفت این راها (خروج و قفل) یه مشکل دارن و اونم اینکه از هر کدومشون استفاده بشه دوباره میشه برنامه رو بست و باز کرد و از اول وارد کرد.برای یه برنامه ی مستقل قفل شدن کار بیهوده ایه(به نظر من) و اگه میخواین سعی و خطا رو سخت کنین من توصیه میکنم برای هر بار پسورد اشتباه چند ثانیه صبر کنید و دوباره بذارید امتحان کنن،دقیقا شبیه کاری که لینوکس انجام میده.برای چند ثانیه قفل شدن میتونید از همون راهی که دوستان گفتن استفاده کنید و یه تایمر هم بذارید که وقتی تموم شد دوباره فعال شه.

MicrosoftH
24-08-2009, 14:35
یک متغیر تعریف کن اگر رمز اشتباه بود یک واحد بهش اضافه کن بعد یک دستور if بنویس اگر متغیر برابر با 3 بود تمامی کنترل ها رو غیرفعال کن به همین راحتی

MicrosoftH
24-08-2009, 14:37
بیا اینم کد راستی این رو تو کافی نت نوشتم اشتباه بود ببخشید دیگه
dim Err1 as byte
if txtpassword.text<>"159" then
err1=err1+1
if err1=3 then
me.enable=false
endif
else
frmmain.show
endif