PDA

View Full Version : پسورد گذاشتن بر روی برنامه



mamad7khat
سه شنبه 18 بهمن 1390, 14:24 عصر
سلام
خسته نباشید
من میخواستم روی برنامه در VB6 پسورد بزارم.یعنی برنامه تا باز بشه یک پسورد بخواد ؟؟؟؟ممنون میشم کمکم کنید.:قلب::قلب::قلب:

m_account
سه شنبه 18 بهمن 1390, 16:44 عصر
سلام
سوال شما واضح نیست.
دو تا جواب به ذهن ما رسید.
1- اگر بخواهیم که روی برنامه خودمون پسورد بگذاریم که مشخص هست
2- ولی اگر بخواهیم برنامه ای بسازیم که روی برنامه های اجرایی پسورد بگذاره قدری دشوار هست و نیاز به دانستن ساختار فایل های اجرایی دارد و طریقه افزودن section header به اونها.
من توصیه میکنم برای یاد گرفتن مورد دوم به سراغ سورس ویروس ها بروید.

mamad7khat
سه شنبه 18 بهمن 1390, 17:06 عصر
سلام
سوال شما واضح نیست.
دو تا جواب به ذهن ما رسید.
1- اگر بخواهیم که روی برنامه خودمون پسورد بگذاریم که مشخص هست
2- ولی اگر بخواهیم برنامه ای بسازیم که روی برنامه های اجرایی پسورد بگذاره قدری دشوار هست و نیاز به دانستن ساختار فایل های اجرایی دارد و طریقه افزودن section header به اونها.
من توصیه میکنم برای یاد گرفتن مورد دوم به سراغ سورس ویروس ها بروید.


داداش من میخوام وقتی رو برنامه کسی کلیک میکنه یه کادری بیاد و پسورد رو که وارد میکنیم برنامه باز بشه.یعنی من خودم از تو Vb پسورد رو انتخاب کنم.

sr2m72
سه شنبه 18 بهمن 1390, 18:57 عصر
داداش من میخوام وقتی رو برنامه کسی کلیک میکنه یه کادری بیاد و پسورد رو که وارد میکنیم برنامه باز بشه.یعنی من خودم از تو Vb پسورد رو انتخاب کنم.

دوست عزیز با یه if ساده میتونید این کار رو انجام بدین:

Private Sub Command1_Click()
password = Text1.Text
If password = "1234" Then
frmmain.Show
Else
MsgBox "Input True Password!", vbCritical
End If
End Sub

mamad7khat
سه شنبه 18 بهمن 1390, 21:17 عصر
دوست عزیز با یه if ساده میتونید این کار رو انجام بدین:

Private Sub Command1_Click()
password = Text1.Text
If password = "1234" Then
frmmain.Show
Else
MsgBox "Input True Password!", vbCritical
End If
End Sub


دادش ممنونم.
اما به این ارور میده

password = Text1.Text

به password

sr2m72
سه شنبه 18 بهمن 1390, 21:26 عصر
دادش ممنونم.
اما به این ارور میده

password = Text1.Text

به password

این رو به برنامه اضافه کن:
Dim password As String

mamad7khat
جمعه 21 بهمن 1390, 21:14 عصر
این رو به برنامه اضافه کن:
Dim password As String

سلام
ممنونم داداش.اما من میخوام این طوری باشه که وقتی پسورد رو وارد نکرده دکمه اوکی رو میزنده ارور بده و تا پسورد روو کامل وارد نکرده وارد برنامه نشه.اگه میشه یه سروس برام بزارید ممنون.:قلب:

sr2m72
شنبه 22 بهمن 1390, 18:50 عصر
سلام
ممنونم داداش.اما من میخوام این طوری باشه که وقتی پسورد رو وارد نکرده دکمه اوکی رو میزنده ارور بده و تا پسورد روو کامل وارد نکرده وارد برنامه نشه.اگه میشه یه سروس برام بزارید ممنون.:قلب:

دوست عزیز، خب کد بالا همین کار رو انجام میده.
یه برنامه نمونه واست نوشتم این رو دانلود کن: