Question

VB中的一个关于"select附近有语法错误"问题

数据库已经用adodc1连好，text1输入用户名，text2是密码，用户表userT中存好了用户名和密码，程序如下
Private Sub Command1_Click()
Adodc1.RecordSource = "SELECT * FROM userT WHERE (用户名='" & Text1.Text & "')"
Adodc1.Refresh
If Adodc1.Recordset.RecordCount > 0 Then
If Text2.Text = Adodc1.Recordset.Fields("密码") Then
MsgBox "登录成功", , "提示"
Unload Me
Form2.Show
Else
MsgBox "用户名或密码不正确在！请重新输入", , "注意"
Text1.SetFocus
End If
End If
End Sub
运行就提示"select附近有语法错误"，refresh adodc1失败。有加分

Answer 1

1 adodc1.refresh 放在select之前 试一下
2 字段名为中文 改成应为试一下
3 括号问题
4 引号问题 双引号 select 语句 用户名=单引号 双引号 & 内容 & 双引号 单引号 双引号

追问

1 adodc1.refresh 放在select之前 肯定不行，我以前就是这个错误导致不论输入什么都能登陆成功
2 字段我改过英文的还是不行
3 括号问题，我加括号，不加括号都试过，都不行
4 引号问题 ，引号肯定没问题

Answer 2

Adodc1.RecordSource=后面的不对，不用加括号，你改为以下语句即可：
Adodc1.RecordSource="select * from userT where 用户名='" & Text1.Text & "'"

追问

我以前没加括号，不好使，然后看网上有人说要加才加上的，还是不好使

Answer 3

Adodc1.RecordSource = "SELECT * FROM userT WHERE (用户名='" & Text1.Text & "')"
前面缺少一句
Adodc1.ConnectionString ="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\his.mdb;Persist Security Info=False"
这样的语句

追问

adodc1已经连接好数据库了，在属性面板里

追答

需要重新连接才好使