I can't seem to get a recordset set up. Can I use a DataReader? See the code marked with ">>>>>>". I get an OutOfRangeException error with this. Thanks for your help.
Sub LoginBtn_Click(Sender As Object, E As EventArgs)
Dim conn as OleDbConnection
Dim cmd as OleDbCommand
Dim dbReader as OleDbDataReader
Dim result as string
' Create Connection using OLEDB
conn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("\TEST.mdb"

)
Dim strSQL as string = "select Email FROM LOGIN WHERE Email='" & txtEmail.Text & "' AND Password='" & txtPassword.Text & "'"
conn.open()
cmd = new OleDbcommand(strSQL,conn)
dbReader = cmd.executereader
' Bind result to repeater control
DataGrid1.datasource = dbReader
DataGrid1.databind()
If DataGrid1.Items.Count = 1 Then
>>>>>> Dim strName = dbReader("FirstName"
Response.Cookies("userInfo"

("Name"

= strName
Response.Cookies("userInfo"

.Expires = DateTime.Now.AddDays(3652)
Response.Redirect("Default.aspx"

Else
lblMessage.Text = "Invalid Information!"
End If
' Close Connections
dbReader.close()
conn.close()
End Sub