用ADO调用ACCESS时应注意的SQL语句书写方法

ycyhjj2865

这是我的再贴(初学者有益) 对EXCEL编程用ADO调用ACCESS时值得注意! 虽然是一个老的话题，但有必要在这里再次得到关注 ------------------------------------------------------------------------------- 一段代码可以说明一切： Private Sub CommandButton1_Click() Dim oConn As New ADODB.Connection Dim oRs As New ADODB.Recordset Dim RS1 As New ADODB.Recordset Dim a As String Dim b As String Dim path1 As String Dim sql_2 As String path1 = CurDir() & Application.PathSeparator & "Northwind.mdb" Rem--------- MsgBox path1 -------------测试当前路径用 oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _ "Data Source=" & path1 & ";" & _ "User Id=admin;" & _ "Password=;" a = Me.TextBox1.Text b = Me.TextBox2.Text Rem --------EXCEL中应用ADO查询语句注意的问题 Rem ---------请注意在Between ......And语句中连接日期字符变量用法：即不采用 '" & 变量 & "'方式，而是直接用 & 符号连接变量。 Rem----------而在其他SQL的Where条件字符后则采用 '" & 变量 & "'方式。 sql_2 = "select * from 订单 where 订单.订购日期 between #" & a & "# and #" & b & "#" & "and 订单.客户ID = '" & Me.ComboBox1 & "'" RS1.CursorLocation = adUseClient RS1.Open sql_2, oConn, adOpenKeyset, adLockOptimistic Sheet2.Range("c1").CopyFromRecordset RS1 End Sub

Renco

ACCESS的VBA要用#号代替单引号，，否则ACCESS会认为是文本型

ycyhjj2865

#号的作用是：操作日期类型字段的字符时所必须的，例如：#1996-07-01# 否则直接书写为 1996-07-01 将中断程序提示出错！

plxmm

谢谢。感觉复杂多了。[em08]

wwwwa

thanks

hahaffm

谢谢，没都看懂，自己基础差些。但至少符号解释部分很有用。也懂了， 特别是对日期的提醒。

能否请王者归来给几个关于 Excel ADO ACCESS 应用的连接，我真想学。谢谢。

cg1

关于此主题请参考以下文章(不要只看标题，请认真仔细地察看上述文章以及相关的评论)：
新手来看：LIKE 语句到底如何组织？*和%该用哪个？《查询》
http://access911.net/index.asp?u1=a&u2=72FAB31E13DCEAF3

----------------------- 911 社区回帖个人签名 start -----------------------

http://access911.net/csdn 无须注册提供附件上传功能，如果你提问的时候有附件请到上述地址上传并将链接复制粘贴。

http://access911.net 用 7 年时间整理了大量有关 Access 的原创资料，请有空的时候多用文章搜索功能

如果您有兴趣加入ACCESS编程的专项研究可以来QQ群“ACCESS上海研究班”看看，加入的方法请看这里《个性化的access911.net（七）QQ 群加入规则（专门讨论 ACCESS 的 ）》
http://access911.net/?kbid;72FAB01E16DCECF3

----------------------- 911 社区回帖个人签名 end -----------------------

向上看呦！

zez

学习