SQL 查询时间段记录问题请教

danhanqing

数据库练习.rar (646.88 KB, 下载次数: 13)

2017-10-15 10:49 上传

点击文件名下载附件

财务管理中，想生成请款结算明细表，但出错了，请老师们指教！

If Me.Controls(页面名称 & "_" & "起始时间") = "" Then 起始时间 = "2016/01/01" Else 起始时间 = Me.Controls(页面名称 & "_" & "起始时间")
If Me.Controls(页面名称 & "_" & "结束时间") = "" Then 结束时间 = Format(Now(), "yyyy/mm/dd") Else 结束时间 = Me.Controls(页面名称 & "_" & "结束时间")
MsgBox "起始时间＝" & 起始时间 & "；结束时间＝" & 结束时间
Dim y&, x&
Dim Conn As ADODB.Connection
    Set Conn = LinkDB
    Dim Rs As New ADODB.Recordset
    sql = "select 日期,单据编号,商品名称,品牌规格,核心参数,备注,单位,数量,单价,金额 from 财务结算总表 where 单位名称='" & Me.Controls(页面名称 & "_" & "单位名称") & "' and 尚欠<>0 and  日期 between '起始时间' and '结束时间'"

请老师帮我看一下，SQL＝这句错在哪里了？不加 and  日期 between '起始时间' and '结束时间' 时是正确的。
谢谢！
在线等！

microyip

没有附件，起始时间和结束时间是什么东东？

microyip

1. sql = "select 日期,单据编号,商品名称,品牌规格,核心参数,备注,单位,数量,单价,金额 from 财务结算总表 where 单位名称='" & Me.Controls(页面名称 & "_" & "单位名称") & "' and 尚欠<>0 and  日期 between " & 起始时间 & " and " & 结束时间

复制代码

danhanqing

microyip 发表于 2017-10-15 10:12

不报错了，但查询结果为空，请老师再帮忙看看，谢谢！

danhanqing

microyip 发表于 2017-10-15 10:10
没有附件，起始时间和结束时间是什么东东？

已上传附件，请老师指点！

microyip

1.     sql = "select 日期,单据编号,商品名称,品牌规格,核心参数,备注,单位,数量,单价,金额,尚欠 from 财务结算总表 where 单位名称='" & Me.Controls(页面名称 & "_" & "单位名称") & "' and 尚欠<>0  and 日期 between #" & 起始时间 & "# and #" & 结束时间 & "#"

复制代码

danhanqing

microyip 发表于 2017-10-15 11:01

感谢老师！