Probem with Checking the database

[bharanidharanit]

Hello,
I am doing Login Screen in VS2008.
When i logon with username and password in form it only checking the first field in database.
How to do coding for checking all the fields???
This is my coding

Imports System.Data.OleDb
Public Class frmLogin
    Private connstring As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\db.mdb"
    Private conn As OleDb.OleDbConnection
    Private dr As OleDb.OleDbDataReader


    Private Sub frmLogin_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        conn = New OleDbConnection(connstring)
        conn.Open()
    End Sub

    Private Sub btnOk_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnOk.Click
        Dim cmd As New OleDbCommand("select * from login", conn)
        dr = cmd.ExecuteReader
        dr.Read()
        If dr(0) = txtUser.Text And dr(1) = txtPwd.Text Then
            Form2.Show()
        Else
            txtUser.Clear()
            txtPwd.Clear()
            txtUser.Focus()
        End If
    End Sub
End Class

 

[demausdauth]

You could try using a while statement for the read as in:

While dr.Read()

'Process login

End While

 

[cjard]

Read the DW2 link in my signature, section "Creating a Form to Search Data"

 

[bharanidharanit]

ya when i use while also the same error

 

[bharanidharanit]

this worked for me

Dim cmd As New OleDbCommand("select * from login where id= '"+txtUser.Text+"' and pass='"+txtPwd.Text+"'", conn)
        dr = cmd.ExecuteReader
        if(dr.HasRows)
            Form2.Show()
        Else
            txtUser.Clear()
            txtPwd.Clear()
            txtUser.Focus()
        End If

 

[cjard]

I give up