我在改用SQL连接数据库时老提示use附近有语法错误,我看了半天都没发现,请高手帮忙解决!

Question

Dim cn As New Connection
Dim rs As New Recordset
Dim data As String
data = "select username  from use where password = '" & Trim(Text1.Text) & " '"
cn.Open "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;User ID=sa;Initial Catalog=ll;Data Source=LLUO"
cn.CursorLocation = adUseClient
rs.Open data, cn, adOpenDynamic, adLockOptimistic
谢谢了

Answer 1

如果表名是user的话这样试试：
data = "select username  from [user] where [password] = '" & Trim(Text1.Text) & " '"
不过，建议楼主不要将保留字作为表名与字段名来使用

Answer 2

字段名要避开 SQL 保留字，否则要使用方括号。

Answer 3

表名 use 改成 [use]