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

HLAI

我买了一本书《SQL Server 数据库开发培训过程》，人民邮电出版社出版。里面关于删除记录的语句例子为

Delete 馆藏书目 Where 作者='鲁迅'

但在VBA里老是不行，一定要用 Delete From 馆藏书目 Where 作者='鲁迅'？

才可以通过，搞了我半天，这是否也是各版本SQL里的不同之处呢？(Excel2000+WinXP)

雨棠木木

而且：

sql="select XXXX from XXXX where XXXX like ?%"

用ArrayList往“？”里输条件是否也可以支持模糊查询呢？？？

中文、日文、英文都如此么？？？

octsun

谢谢了

3721房间

模糊查找用

strSQL = "Select * from 档案 WHERE 籍贯 LIKE '%南%'"

但是我们在查询的时候不可能每次去改要查询的内容，如“南”改成“”北“

大部分时候都是通过窗体的比如UserForm1.textbox1的内容输入要查找的内容

因此偶将其改成

strSQL = "Select * from 档案 WHERE 籍贯 LIKE '%UserForm1.textbox1%'"

同样在UserForm1.textbox1中输入“南”，结果却不可以了，是为什么呢？请指教，应如何写呢？

朵木

QUOTE:

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

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

VB中是这样的：

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

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

---

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

---

而在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

的确如此，我当初在做《仓库管理程序》时，改用SQL的_和%，就行了，当时就纳闷，经兰版一讲，原来如此。

jin425505

QUOTE:

以下是引用3721房间在2007-1-31 1:00:00的发言：

模糊查找用

strSQL = "Select * from 档案 WHERE 籍贯 LIKE '%南%'"

但是我们在查询的时候不可能每次去改要查询的内容，如“南”改成“”北“

大部分时候都是通过窗体的比如UserForm1.textbox1的内容输入要查找的内容

因此偶将其改成

strSQL = "Select * from 档案 WHERE 籍贯 LIKE '%UserForm1.textbox1%'"

同样在UserForm1.textbox1中输入“南”，结果却不可以了，是为什么呢？请指教，应如何写呢？

      strSQL = "Select * from 档案 WHERE 籍贯 LIKE '%" & UserForm1.textbox1 & "%'"

baowang519

非常感谢！我正需要这个功能

NadrsSaber

还好我看到了这个贴..........

740688321

good job   

Cellfarmer

今天用DAO改写原来用ADO写的模糊查询，也发现了这个差异。