Hi all,

i have an issue with my loginsystem and seek for some geek help
When using the first made user (admin) the system does what it needs to do.
But when i try to login with a different user it wont work.
And i get my error "username and password unknown"

When i remove following lines from the code i can login with all other users

ElseIf (currentUser <> username AndAlso currentPassword <> password) Then
MessageBox.Show("Username and password unknown", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
Return False





Code:
Public Function Login(ByVal username As String, ByVal password As String)
        Dim usersDatasSet As New DataSet()
        usersDataAdapter.FillSchema(usersDatasSet, SchemaType.Source, "Users")
        usersDataAdapter.Fill(usersDatasSet, "Users")
        Dim table As DataTable = usersDatasSet.Tables("Users")
 
        For i As Integer = 0 To table.Rows.Count - 1
            Dim currentUser As String = table.Rows(i)("Username").ToString().Trim()
            Dim currentPassword As String = table.Rows(i)("Password").ToString().Trim()
 

            'Check input

            If (currentUser <> username And currentPassword = password) Then
                MessageBox.Show("Unknown user", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
                Return False
 
            ElseIf (currentUser = username And currentPassword <> password) Then
                MessageBox.Show("Wrong password", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
                Return False
 

            ElseIf (currentUser <> username AndAlso currentPassword <> password) Then
                MessageBox.Show("Username and  password unknown", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
                Return False
 
            ElseIf (currentUser = username AndAlso currentPassword = password) Then
                usersDatasSet.Dispose()
                Connection.Close()
                Return True
            End If
 
        Next
        usersDatasSet.Dispose()
        Connection.Close()
        Return False
    End Function
Thanks for any help in this issue