when using the dlookup command, only the first password situated on the top of the ta

[Larvish]

I have tried the followig codes form my logon form but for all the usernames that has been seted, only the first password in the table that allows the logon all the other passwords give on error.... help

............... ............... ............... ............... .

  If txtpassword.Value = DLookup("[pswrd]", "tbllogin", "[cbousername] =" & Me.Cbousername.Value) Then
        DoCmd.Close
        DoCmd.OpenForm ("frmmain")
    Else
        intmsg = MsgBox("Invalid Password. Choose your user name and enter a valid password!", vbOKOnly + vbCritical, "Login")
        Me.txtpassword.SetFocus
        Me.txtpassword.Text = ""
 End If

[RuralGuy]

My guess is your password is a string value so it needs to be enclosed within single quotes inn this case:

If txtpassword.Value = DLookup("[pswrd]", "tbllogin", "[cbousername] ='" & Me.Cbousername.Value & "'") Then