need to test password field

[rwahdan@gmail.com]

Hi,



i have a text field in the table and the form. when the user put the username and password, i want to check both are entered correctly (the username and password are correct). i tried to do that but it seems since the password is showing *** it wont be able to compare it with the word field in the table so i will always get 0 records. how can i test the password field in both the form and table?

Dim dbs As DAO.Database
Dim rsSQL As DAO.Recordset
Dim test As Integer


username_1.SetFocus
theusername1 = username_1.Text


password_1.SetFocus
thepassword1 = password_1.Text


Set dbs = CurrentDb


strSQL = "SELECT username,userpassword FROM users_login where username = '" & theusername1 & "' and userpassword = '" & thepassword1 & "'"


Set rsSQL = dbs.OpenRecordset(strSQL)


If rsSQL.RecordCount = 1 Then


MsgBox "found"


Else


MsgBox "not found"


End If

[ItsMe]

Rather than
username_1.SetFocus
theusername1 = username_1.Text

Set focus somewhere else, other than the username or password textbox controls. If you code executes via a click event of a command button, that will suffice because the command button will have the focus.

Then, rather than using .Text, use the .Value property of the TextBox Controls.
dim theusername1 as string
theusername1 = username_1.Value

[rwahdan@gmail.com]

thanks a lot, it worked

[ItsMe]

thanks a lot, it worked

Sure thing. Welcome to the forum.
In VBA, the Text property is what is being typed into the control. The Value property is the result of the AfterUpdate event. After the control is updated/loses focus, the Text property is committed to the Value property. However, when formatting is used, the Text will obey the formatting.

Thanks for the friends request, but I do not have any friends. Be sure to start a new thread if you have any more questions. There are many members here (including me) willing and able to help.