VBA中利用SQL模糊查询ACCESS(和VB有重大不同)

兰色幻想

在利用ADO+SQL查询ACCESS数据库，

VB中是这样的：

？ 任意单个字符 如LIKE ‘?南’ ,LIKE ‘?南?’

* 零个或多个字符 如:LIKE ‘*南’ , LIKE '*南*'

---

而在VBA中则不能这样用,它的用法竟然和SQL查询SQL Server数据库的语法一致：

_ 任意单个字符 如LIKE ‘_南’ ,LIKE ‘_南_’

% 零个或多个字符 如:LIKE '%南’ , LIKE '%南%'

---

例:

Sub 矩形13_单击() Dim CNN As New ADODB.Connection Dim RST As New ADODB.Recordset Dim Stpath, strSQL As String Stpath = ThisWorkbook.Path & Application.PathSeparator & "学生档案.mdb" CNN.Open "provider=Microsoft.jet.OLEDB.4.0;data source=" & Stpath '& ";Jet OLEDB:Database Password=" & "123" strSQL = "Select * from 档案 WHERE 籍贯 LIKE '%南%" 正确 strSQL = "Select * from 档案 WHERE 籍贯 LIKE '*南*'" 错误 RST.Open strSQL, CNN Sheet1.Range("A2:G100").ClearContents Sheet1.Cells(2, 1).CopyFromRecordset RST RST.Close Set RST = Nothing Set CNN = Nothing End Sub

[此贴子已经被作者于2004-12-14 11:19:03编辑过]

cofe2000

不错正是如此

taller

谢谢兰版主详细解释,

把链接加到你的置顶的帖子吧!

shuyee

微软各软件之间打架是常事.

VBA中也有个字符串符:like,它的通配符用的是*号,

VBA的查询,本身就是简单查询语言.

虽说是简单查询,但功能一般还是够用的,当然这需要一定的SQL基础,直接用文本编辑器写代码,而不是用它的界面,它有图形界面限制了它的使用.象select的嵌套和生成过程表参与查询等.

鱼之乐

请参见：

http://club.excelhome.net/viewthread.php?tid=68177

应是使用office2000或者officexp后起的变化。我以前使用office97，常常使用如 like "*A*" 的方式模糊查询都正确，自从换用xp后才出现的以上的差异。

不过，在access文件内部的查询仍然使用*代表任意字符。

hzg7818

Ansi的sql标准就是如此，绝大多数数据库的标准都是_和%，ms的jet引擎则换做了*和?，这应该是和msdos的匹配符是一脉相承的，jet引擎最初就是access的引擎，所以专门为jet开发的dao就支持*和？ado则不同，他要面对几乎所有的数据库，当然要换做通用的了，这并不算微软的错，但要改掉应该不困难，在sql语法解析时替换掉应该就可以了，为什么不给我们改过来，就是微软的错了

geoLu

以下是引用兰色幻想在2004-12-14 11:13:00的发言：

strSQL = "Select * from 档案 WHERE 籍贯 LIKE '%南%" 正确 strSQL = "Select * from 档案 WHERE 籍贯 LIKE '*南*'" 错误

我真的被弄糊涂了。最近我按上面说的做了一个数据库查询，先用“%”做通配符进行模糊查询，但总是出错，后来改为用“*”竟然通过了。我的系统是WinXp+office2003，后来移到Win98+Office2000中也能正常运行。请高手指点。

wangkang

什么是模糊查询？

丸究阵引

ado 用 % dao 用 *

雨棠木木

%可以代替任何多个字符么？？？

比如“张%”是否包括了“张 三”和“张三”这两种情况呢？？？