“标准表达式中数据类型不匹配”,这个小问题，我看了半天也没看出来！

Question

源错误: 
行 58：         cmd = New OleDbCommand("Select [password] from udb where username=" & txtuser.Text)
行 59：         cmd.Connection = con
行 60：         reader = cmd.ExecuteReader
行 61：         pass = reader.GetString(0)
行 62：         If txtpass.Text = pass Then
 
60行显示为红色，出错在这里！
这是源代码：
Dim cmd As OleDbCommand
        Dim reader As OleDbDataReader
        Dim pass As String
        con.Open()
        cmd = New OleDbCommand("Select [password] from udb where username=" & txtuser.Text)
        cmd.Connection = con
        reader = cmd.ExecuteReader
        pass = reader.GetString(0)
        If txtpass.Text = pass Then
            Session("username") = txtuser.Text
            Response.Redirect("user.aspx")
        Else
            Label.Visible = True
        End If
        reader.Close()

Answer 1

reader = cmd.ExecuteReader
应改成reader = cmd.ExecuteReader()

Answer 2

呵呵，select 語句寫錯了，
Select [password] from udb where username=‘" & txtuser.Text & "'")

Answer 3

错了，应该是reader = cmd.ExecuteReader(CommandBehavior.CloseConnection)

Answer 4

寫全了
  cmd = New OleDbCommand("Select [password] from udb where username= '" & txtuser.Text & "'")

Answer 5

zfq308(富强) 
也指出了一个错误

Answer 6

以上朋友指出的的确是个错误，但是还有其它错误：
不存在此行/列的数据。
行 59：         cmd.Connection = con
行 60：         reader = cmd.ExecuteReader()
行 61：         pass = reader.Item("passwords")
行 62：         If txtpass.Text = pass Then
行 63：             Session("username") = txtuser.Text
61行为红色，但是我可以保证我的数据库中绝对有passwords这一列！