让日期快烦死！！！select问题

[xxd88]

a_Sql = "Select * From tLogs where left(dtTime1,10)='" & rq2 & "'"
dtTime1这个字段中的数据是2009-4-9 17:36:23
我想要得到2009-4-9去和rq2比较
但是不行啊！！！
我怎么才能在select语句中得到2009-4-9呢？？

[huyongsc]

如果rq2是日期型变量，需要将dtTime1转换成日期型变量left(dtTime1,10）是字符串

[wing013]

a_Sql = "Select * From tLogs where convert(char(10),cast(dtTime1 as datetime),120)='" & formmat(rq2,"YYYY-MM-DD") & "'"

[射天狼]

一般日期都是进行区间的查询！
如果非要进行精确查询，需要对日期进行格式化，但不同数据库，格式化函数不同，需要明确你的数据库类型！

天狼工作室
http://www.j2soft.cn/

[palleexu]

dtTime1这个字段中的数据是2009-4-9 17:36:23

要是你数据库用的是ACESS的话，可以把该字段类型改成短日期样式的啊

[clear_zero]

试试看
a_Sql = "Select * From tLogs where convert(char(10),cast(dtTime1 as datetime),120)='" & formmat(rq2,"YYYY-MM-DD") & "'"

[LWMWORK]

Format(rq2, "yyyy-m-d")

[熊孩子开学喽]

我觉得是你的left(dtTime1,10)有问题吧, 这是VB的函数,你传到SQL里面去,人家怎么会理你?

[无·法]

[Quote=引用 7 楼 WallesCai 的回复:]
我觉得是你的left(dtTime1,10)有问题吧, 这是VB的函数,你传到SQL里面去,人家怎么会理你?
[/Quote]
不过在sqlserver2000里面基本vb的一些基本函数都有的 但是好像没有trim

[cxbase]

a_Sql = "Select * From tLogs where datediff(d,dtTime1,'"& rq2 &"')=0" 试试

[xxd88]

数据库是access库
Dim rq2 As Date
rq2 = Format(Now, "YYYY-MM-DD")
a_Sql = "Select * From tLogs where convert(char(10),cast(dtTime1 as datetime),120)='" & rq2 & "'"
这样不行啊！
提示错误：实时错误'-2147467259 (80004005)'
对象'Open'的方法'_Recordset'失败

[冰火小猫]

学习

[vbman2003]

access用format
Dim rq2 As Date
rq2 = Format(Now, "YYYY-MM-DD")
a_Sql = "Select * From tLogs where format(dtTime1,'yyyy-mm-dd')='" & rq2 & "'"

[of123]

a_Sql = "Select * From tLogs where dtTime1>='" & Format(rq2, "yyyy-MM-dd") & "' AND dtTime1<'" & Format(DateAdd("d", 1, rq2), "yyyy-MM-dd") & "'"

[xxd88]

Dim rq2 As Date
rq2 = Format(Now, "YYYY-MM-DD")
a_Sql = "Select * From tLogs where format(dtTime1,'yyyy-mm-dd')='" & rq2 & "'"
这样没有错误提示！但是还是查不到数据
MsgBox (rsa.RecordCount)是0


a_Sql = "Select * From tLogs where dtTime1 >= '" & Format(Now, "YYYY-M-D") & "' AND dtTime1 < '" & Format(DateAdd("d", 1, Now), "yyyy-M-d") & "'"
这样的显示实时错误 '-2147217913 (80040e07)'
标准表达式中数据类型不匹配

[of123]

你用的是什么库？

a_Sql = "Select * From tLogs where dtTime1 >= #" & Format(Now, "YYYY-M-D") & "# AND dtTime1 < #" & Format(DateAdd("d", 1, Now), "yyyy-M-d") & "#"

[xxd88]

a_Sql = "Select * From tLogs where dtTime1 >= #" & Format(Now, "YYYY-M-D") & "# AND dtTime1 < #" & Format(DateAdd("d", 1, Now), "yyyy-M-d") & "#"
查到了 access数据库需要加#？？？

[xredhat]

access和sql的语法是有差别的。
查询时间用format不就行啦吗？