i am storing a usernames and passwords in a table called Users.
I present a login form to the user when my application starts up
(VB.NET, .NET CF, Windows Mobile 5)
The user chooses a username from a combo box that queries the Users
table. Then they type in a password string.
I then use the following code to validate the string when the user
clicks on the Submit menu item
Private Sub Submit_Click(By Val sender As System.Object, ByVal e As
System.EventArg s) Handles Submit.Click
vUserName = Me.UserCombo.Te xt 'set variable for use later in
the app
'MsgBox(vUserNa me)
Dim vPassword2 As String
vPassword2 =
CStr(Me.UsersTa bleAdapter.GetP assword(UserDat aSet.Users, vUserName))
'MsgBox(vPasswo rd2)
If vPassword2 <Me.UserPasswor d.Text Then
MessageBox.Show ("Login Failed. Please try again.",
"Login", MessageBoxButto ns.OK, MessageBoxIcon. Exclamation,
MessageBoxDefau ltButton.Button 1)
'refill the username list with all options
Me.UsersTableAd apter.Fill(User DataSet.Users)
Else
Dim frmMainMenu As New SystemMenu 'create the system menu
class
frmMainMenu.Sho w()
End If
End Sub
I am not able to get this to compare and validate the password string.
any advice, comments or experience would be most appreciated.
Ryan
I present a login form to the user when my application starts up
(VB.NET, .NET CF, Windows Mobile 5)
The user chooses a username from a combo box that queries the Users
table. Then they type in a password string.
I then use the following code to validate the string when the user
clicks on the Submit menu item
Private Sub Submit_Click(By Val sender As System.Object, ByVal e As
System.EventArg s) Handles Submit.Click
vUserName = Me.UserCombo.Te xt 'set variable for use later in
the app
'MsgBox(vUserNa me)
Dim vPassword2 As String
vPassword2 =
CStr(Me.UsersTa bleAdapter.GetP assword(UserDat aSet.Users, vUserName))
'MsgBox(vPasswo rd2)
If vPassword2 <Me.UserPasswor d.Text Then
MessageBox.Show ("Login Failed. Please try again.",
"Login", MessageBoxButto ns.OK, MessageBoxIcon. Exclamation,
MessageBoxDefau ltButton.Button 1)
'refill the username list with all options
Me.UsersTableAd apter.Fill(User DataSet.Users)
Else
Dim frmMainMenu As New SystemMenu 'create the system menu
class
frmMainMenu.Sho w()
End If
End Sub
I am not able to get this to compare and validate the password string.
any advice, comments or experience would be most appreciated.
Ryan
Comment