Question

新手求助！！只有35分了，全给。 VB SQL查询ACCESS数据库表中含有单纯数字、字母、或者数字组合记录问题？

哪位大哥帮忙看看出了什么问题？感觉好像是需要将含有单纯数字或者数字字符组合的记录转换一下。怎么处理呢？
下面的代码只能查询到纯字符的记录！
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=" & App.Path & "\main.mdb" '设置数据库路径
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = "select * from 图书库 where 书名 ='" & trim(text1.text) & "'"
Adodc1.Refresh
求帮助。
救命！！！！哪位大侠指点一下？
下面各位所提示的各种方法以前都试过了，到目前还是没有头绪。晕死了。谁来救救我哦

Answer 1

1.换一下这个：“Provider=Microsoft.Jet.OleDb.4.0;”试试！
2.不用&连接，换用+来连接！
3.把这个 "select * from 图书库 where 书名 ='" & trim(text1.text) & "'"字符串输出看看！是不是冒号和单引号出错！

Answer 2

这要看字段的类型，字段是字符文本的用你这种可以，是数字的话要去掉单引号
Adodc1.RecordSource = "select * from 图书库 where 书名 =" & trim(text1.text)

追问

多谢。我试过了，但是像a1这样的记录怎么也查不到呢？

追答

要先来一句MSHFlexGrid1.Clear清楚掉原来的

追问

呵呵。还是不行。我还加了一句MSHFlexGrid1.Refresh也不行

追答

代码没错，你输入的内容必须跟数据库的内容完全一样

Answer 3

根据描述应该是记录在同一个字段里面，所以即使321也可以当做文本查询出来的，试一下cstr（），强制转换字符串：
Adodc1.RecordSource = "select * from 图书库 where 书名 ='" & cstr(trim(text1.text)) & "'"

Answer 4

去掉Adodc1.RecordSource = "select * from 图书库 where 书名 ='" & trim(text1.text) & "'"
中的单引号，变成Adodc1.RecordSource = "select * from 图书库 where 书名 =" & trim(text1.text) & " "

Answer 5

看上去没有错误
查询的条件是Text1的文本

追问

Text1的文本输入数字或者数字字符组合时查不到记录！纯字符就可以查到。我晕死了