Help With Simple Password Form

[dan.cawthorne]

Hi all,

Need Some Help With A Simple Password Form

What a I Have Is Single Field Table, With One Record In It The Field
is Called [Password] table is also called "Password"

which ive created a form that represents this table, so the admin can
change the password if needed at ease.
With on My Main form "ProjectsMenu" i have Button that Opens A form
called "Project_Password_Dailog"

On This form i have a Unbound Text Box Named "txtpassword" Which Has
its Input Mast Set to *****

Then I Have a Two Command Buttons,

One Called Cancel and Brings The User Back to The Mainform,"

Second Button is To Open a Form Called "Anaylsis_Create_Dialog"

What Would Be The Code I Write In the On Click Event Section Thats
Allows Me To Open This Form "Anaylsis_Create_Dialog" Only When The
Password Enterted in the unbound text box matches the Password stored
in the password Table?

Any Help Would Be Really Appreciated,

Regards
Dan

[Len Robichaud]

Dim strPassword as string

'Lookup the password in the password table
strPassword = DLookup("[Password]", "Password")

'Check to see if the passwords match
If strPassword <me.txtpassword then
msgbox ("The Password you entered is Incorrect. Access Denied")
'Since the wrong password was entered, set it to blank
me.txtpassword = ""
'Return the cursor to the txtpassword control
me.txtpassword.setfocus
Else
Your code to open the form...
End if

Len

PS a word of advice... don't use the same name for different things. Name
your table something like tblPasssword. That way when you write code there
is no confusion between the table named "password" and the data field named
"password".
<da***********@gmail.comwrote in message
news:11**********************@j4g2000prf.googlegro ups.com...

Hi all,

Need Some Help With A Simple Password Form

What a I Have Is Single Field Table, With One Record In It The Field
is Called [Password] table is also called "Password"

which ive created a form that represents this table, so the admin can
change the password if needed at ease.
With on My Main form "ProjectsMenu" i have Button that Opens A form
called "Project_Password_Dailog"

On This form i have a Unbound Text Box Named "txtpassword" Which Has
its Input Mast Set to *****

Then I Have a Two Command Buttons,

One Called Cancel and Brings The User Back to The Mainform,"

Second Button is To Open a Form Called "Anaylsis_Create_Dialog"

What Would Be The Code I Write In the On Click Event Section Thats
Allows Me To Open This Form "Anaylsis_Create_Dialog" Only When The
Password Enterted in the unbound text box matches the Password stored
in the password Table?

Any Help Would Be Really Appreciated,

Regards
Dan