VB连接Access数据库，不能实现查询！

我在Access数据库中的一个表UserInfo有3个字段：
ID：自动编号
Name：文本型
PassWord：文本型现在用VB连接Access数据库，并实现对用户输入的用户名查找相应的密码的功能时，总提示出错，我的代码如下：Dim strConn As String
 
 
 strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=database.mdb;Persist Security Info=False"
  Conn.CursorLocation = adUseClient
 
 Conn.Open strConn
  Set rs = New ADODB.Recordset
 If rs.State <> adStateClosed Then rs.Close
 
rs.Open "Select * from UserInfo where Name =" & Trim(Text1.text) & "", Conn, adOpenKeyset, adLockOptimistic
    
系统运行到这行时提示错误。请大家帮忙看看。
谢谢！
    

解决方案 »

  1.   

    好像Access数据表中，所有文本型的字段都不能实现这种查询，是我的代码有问题吗？
      

  2.   

    你的字段用了数据库保留字，SQL语句中的字段名称要用[]号括起来
      

  3.   

    楼上这位，你说的我不是很明白，是这样改吗？rs.Open "Select * from UserInfo where [Name] =" & Trim(Text1.text) & "", Conn, adOpenKeyset, adLockOptimistic
      

  4.   

    rs.Open "Select * from UserInfo where Name = '" & Trim(Text1.text) & "'", Conn, adOpenKeyset, adLockOptimistic