海,我建立多层次的访问登录页面,这个登录页面连接到数据库,并使用vb.net 2005和SQL 2005,
我的数据库中的表列的用户名,密码和部门。登录的作品,但我想加入ACCES级功能(计数器,管理,存储的访问级别,需要你diferent页),然后我得到了错误的类型sqlCeDataReader是不定义。请劝告我如何解决这个error.This是使用代码1登录按钮,2个文本框txtusername.Text和txtpassword.Text。下面是我的代码,我还强调错误
Public Class Login
Dim table = Me.StaffTableAdapter1
Private Sub btnlogin_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnlogin.Click
Dim nama1 As String
nama1 = Me.txtusername.Text
Dim table = Me.StaffTableAdapter1.user_pass(Me.txtusername.Text, Me.txtpassword.Text)
Dim reader As SqlCeDataReader = objComm.ExecuteReader
If reader.Read Then
If reader(0) = "Admin" Then
Me.Hide()
MsgBox("You Are Login " & nama1, MsgBoxStyle.OkOnly)
databasestatus.Show()
Admin.Show()
'*************************************************************************
ElseIf reader(0) = "Store" Then
Me.Hide()
MsgBox("You Are Login " & nama1, MsgBoxStyle.OkOnly)
DatabaseStatus2.Show()
page.Show()
'**************************************************************************
ElseIf reader(0) = "Counter" Then
Counter.Show()
Me.Hide()
End If
Else
MsgBox("Incorrect Username or Password!", msgBoxStyle.Information)
txtusername.Text = ""
txtpassword.Text = ""
Me.Close()
End If