Changing password after initial login

[Chekotah]

Ok. I am sure that there are tons for this request. I am trying tor force that once you log on to the data base initially that you have to change the password. I currently have a table that has a generic password but want them to change it after the initial log on as I am sure that many will not want to change their password if they don't have to. I have created a change password form so they will be able to change their password any time.

Here is the code currently which is working other than not changing the password.

Private Sub Login_Click()
On Error GoTo Err_Login_Click


Dim varEvent As Variant
Dim stDocName As String

varEvent = DLookup("[UserType]", "[ID_PW_Check]")

If Not IsNull(varEvent) Then

stDocName = "Switchboard" & varEvent
DoCmd.Close acForm, "Login", acSaveNo
DoCmd.OpenForm stDocName
Else
MsgBox "User name not found or password is incorrect", vbInformation, "Warning"
End If
Exit_Login_Click:
Exit Sub

Err_Login_Click:
MsgBox Err.Description
Resume Exit_Login_Click
End Sub

[John_G]

I don't see anything in that code that would change a password, nor is there anything that opens a form to change it.

Where is the password supposed to be changed?

Your DLookup doesn't look right - all it will do is return the value of UserType in the "first" record of ID_PW_Check, and it will be the same record each time - you don't have a criteria specification.

John

[ItsMe]

Also, I would consider a Boolean to indicate whether or not the password has been reset (temp pass) by Admin.

[Chekotah]

That is what I am trying to do is get it to open the change password form in order to change the password after they initially log into the dB.

they sign in to using their employee id. the Dlook up verifies that that they are on the table and then a switchboard will then open up based off their User type (admin or user). If their employee id is not on that table the error message pops up saing User name not found.

[John_G]

They sign in using their employee_id, but the dLookup does not indicate which Employee_ID it is to look for in the ID_PW_Check table/query.

The DLookup must contain a criteria parameter to indicate which employee record to look for, e.g:

DLookup("[UserType]", "[ID_PW_Check]","Employee_ID = " & me!Login_ID) if The Employee_ID is numeric,
or
DLookup("[UserType]", "[ID_PW_Check]","Employee_ID = '" & me!Login_ID & "'") if The Employee_ID is a text string

Now, if varevent is not null, what is there to indicate that this is the first login?

This routine does not validate the password anywhere, either - that is something it must do, otherwise what is the point of entering one?

Using English, the sequence of events would be something like this:

1. Employee enters user_id & password
2. If the User_ID is not valid, give error message and exit
3. If the password is not valid, give error message and exit
4. If the password is valid but is the initial value, open the form to change it
5. Determine the User type, and open the appropriate form

HTH

John

[Chekotah]

Thanks John however when I changed the dlook up to the one above I am getting an error message below


" Microsoft Office Acces can't find the field 'Login_ID' referred to in your expression."

[Chekotah]

Ok never mind on my last message. i now have it fixed. However, I still need some help on getting it to change password after their initial login.

[ItsMe]

What have you tried so far?

[John_G]

You will need a procedure, perhaps in a separate form, that asks the user to enter a new password, validates it, and then updates the user table.

John

[ldl]

You will need a procedure, perhaps in a separate form, that asks the user to enter a new password, validates it, and then updates the user table.

John

First, let me say hello to all. I am not an Access expert, but I have accomplished what you are inquiring about. Please see attached and hope it helps. You will have to edit the code to get the password checking form to run. The concept is very basic and should be easy to adapt in your application.

LDL

[casinc815]

IDl:

I downloaded your suggested app and it worked well!

I was wondering if you have a login routine you could share with us/me?
I need a login routine for my app and am running out of time. I can be
reached at casinc815@hotmail.com to discuss, if interested!

Thanks!

Jim

[ldl]

IDl:

I downloaded your suggested app and it worked well!

I was wondering if you have a login routine you could share with us/me?
I need a login routine for my app and am running out of time. I can be
reached at casinc815@hotmail.com to discuss, if interested!

Thanks!

Jim

Jim
See attached zip. Working model attached with login routine and password checking/change. Good Luck.

[casinc815]

IDL

Thanks for the help. I had my procedure done in three hours and used two of
your forms. After modifying to fit my project, everything appears to be working
well! So, thank you very much!

Jim

[ldl]

IDL

Thanks for the help. I had my procedure done in three hours and used two of
your forms. After modifying to fit my project, everything appears to be working
well! So, thank you very much!

Jim

Your Welcome. Glad I was able to help.