Question

vb 查询数据库老是提示“from子句语法错误”。刚学vb，帮忙指点~~

Private Sub Form_Load()
With Adodc1
.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" _
& "Data Source=" & App.Path & "\qddata.MDB;Persist Security Info=False"
.CommandType = adCmdTable
.RecordSource = "select * from FCB where ZYID =" & 1 & ""
Set MSHFlexGrid1.DataSource = Adodc1 '显示到MSHFlexGrid1中
.Refresh '刷新
End With
End Sub
顺便问下，想查询所有第六位数字等于1的怎么写呢。或者第四位等于2的。举2个数据010101006和010201001

Answer 1

.CommandType = adCmdTable

这个表示查询语句中只能使用表名，不能使用SQL语句！
要改为
.CommandType = adCmdText

追问

酷！还真是~。再帮下 这个是文本型010202001有很多这样的编号，我想把第四位为2的所有内容都显示出来。大致怎么写代码呢？

追答

.RecordSource = "select * from FCB where mid(字段名,4,1) = '4'"

Answer 2

你这个 ZYID 是什么数据类型？
如果是数值
"select * from FCB where ZYID =1"

追问

是数值，试了还是不行~~
如果是显示整个表.RecordSource = "data"这样是可以的，但是一用到查询就提示，from子句语法错误啊~~