How can I code a password protection form?

Ex-TerMinator
03-29-2003, 09:04 AM
Hello guys I want to create two forms. One is password and the other is the main form once the user enters the correct username and password. Im at the most basic level of this type of stuff so I have no clue about arrays or stuff like that, just plain basic password coding. If you see my image, I would like to program it so that after the user enters like 10 characters for Username and 6 characters for Password, all string, he can click on "Password Check" to advance to the next form. How can I do that? Any help is much much appreciated, thanks

Mephisto666
03-29-2003, 09:06 AM
Change your text property PasswordChar to whatever you want ( deault is *)

Ex-TerMinator
03-29-2003, 10:54 AM
How can I code the command buttons (Password Check and Cancel)?

pnklphnts
03-29-2003, 11:05 AM
ok im some what of a newb too.. but this will work if you dont have that many passwords yous can just use if statements :D not very productive but heres what im talkign about:

Private Sub Command1_Click()
If username.Text = "Cameron Moore" & Pass.Text = "MyPass" Then
Form1.Show
ElseIf username.Text = "Cameron Moore" & Pass.Text <> "MyPass" Then
MsgBox "Invalid Password"
ElseIf username.Text = "Ben Moore" & Pass.Text = "Apass" Then
Form1.Show
ElseIf username.Text = "Ben Moore" & Pass.Text <> "Apass" Then
MsgBox "Invalid Password"
End If
End Sub

This is the long way, im sure theres an easier way. Also If you add a new form one of them is log in, and it is a password check thing to try using it

pnklphnts
03-29-2003, 11:07 AM
Ohh and for the cancel you probley just want it to exit? Do something like
Private Sub Cancel_Click()
End
End Sub

All this does is exit the program when they press cancel. It's pretty straight forward

Squirm
03-29-2003, 11:14 AM
Firstly, never use End. Unload all your forms and the program will terminate by itself. Using End forces the program to close without unloading objects, meaning they can linger in memory, not a nice thing.

Secondly, pnklphnts code above should use And instead of & to link conditions.

Lastly, you may wish to load usernames and passwords from a file (Open, Input, Close etc), database (ADO), or the registry (SaveSetting, GetSetting etc).

Squidge
03-29-2003, 11:24 AM
is'nt there a set login form already made??? it might help you just click new form and click the login one then u just need to edit the interface and add the paswords into the code :)

HOPE IT HELPED :-)

Squirm
03-29-2003, 11:27 AM
It looks to me like the form is already made, VBProgrammer... :-\

Squidge
03-29-2003, 11:28 AM
yeah but he hasnt coded it yet has he???

* sorry if i miskaten " :huh:

Mephisto666
03-29-2003, 01:19 PM
If txtuser.text = "User" then
If txtpass.text = "Password" then
'this happens when both are valid password and username
Else
'this happens when just the password is invalid
End if
Else
'this happens when the username is invalid
End if

EZ Archive Ads Plugin for vBulletin Copyright 2006 Computer Help Forum