日期查询

DT　发表于：2013-01-06 13:41:03 　

请问老师：

用SQL视图查询能通过

select distinct * into tmp from booka where 存放日期 between date() and dateadd("m",-2,date())

用窗体按钮写代码却不能通过，为什么。系统显示错误，缺少语句结束。

Private Sub Command22_Click()
Dim qq As String
qq="select distinct * into tmp from booka where 存放日期 between date() and dateadd("m",-2,date())"
DoCmd.RunSQL qq
End Sub

Top

麥田发表于：2013-01-06 15:16:40

日期查询参考刘小军老师的示例

刘小军ACCESS窗体查询及教程
http://www.accessoft.com/article-show.asp?id=5580

Top

煮江品茶发表于：2013-01-07 13:48:23

把into tmp干掉即可

Top

cspa 发表于：2013-01-07 16:45:53

这样写：

qq="select distinct * from booka where 存放日期 between date and dateadd(‘m‘,-2,date);"

Top

cspa 发表于：2013-01-07 16:47:20

这样写：

qq="select distinct * from booka where 存放日期 between date and dateadd('m',-2,date);"

Top

dbaseIIIer 发表于：2013-01-07 17:11:31

人家就是要建立表呀，干嘛你们一个二个都叫人家不要建表？

正确语句：

qq="select * into tmp from booka where 存放日期 between date() and dateadd(""m"",-2,date())"

注意你那个双双引号！

Top

cspa 发表于：2013-01-07 19:05:46

好像句尾要加一个分号“;”吧？

qq="select * into tmp from booka where 存放日期 between date() and dateadd(""m"",-2,date());"

Top

dbaseIIIer 发表于：2013-01-08 05:07:58

你就试试看哦！

标准 sql 语句是需要的！因为要一大段 sql 语句执行时候是需要分开执行的！

不过很多情况你只有一句的话，有没有是无所谓的！

我连 distinct 都不用了（有distinct,sql的引擎还会执行慢一点），分号不用了，其实那个双双引号都可以换成单引号的！

反正只是单个双引号就不对！

Top

DT 发表于：2013-01-08 16:01:48

感谢dbaseIIIer这位大哥，试了下面几种方法都行！谢谢了！

qq="select * into tmp from booka where 存放日期 between date() and dateadd(""m"",-2,date());"

qq="select * into tmp from booka where 存放日期 between date() and dateadd(""m"",-2,date())"

qq="select * into tmp from booka where 存放日期 between date() and dateadd('m',-2,date());"

Top

总记录：8篇页次：1/1 9 1 :

Access交流中心

日期查询