如何在数据库中检索出符合件的所有记录

[qhdzh]

各位高手，我在程序中用到如下语句，想从其中检索出所有符合条件的记录，主要是时间。代码如下：
With DataEnv
.rsdbXueYuan("Ruxuedate").Properties("optimize") = True '建立动态索引
.rsdbXueYuan.Sort = "RuXueDate"
.rsdbXueYuan.Filter = ("ruxuEdate >=" & "'" & Format(dtpBegin.Value, "yyyy-mm-dd") & "'")
'.rsdbXueYuan.Filter = ("ruxuedate <=" & "'" & Format(dtpEnd.Value, "yyyy-mm-dd") & "'" and )
End With

If DataEnv.rsdbXueYuan.RecordCount = 0 Then
MsgBox "没有查到数据", vbOKOnly + vbInformation
Exit Sub
End If
Set DataRep.DataSource = DataEnv
DataRep.DataMember = "dbXueYuan"
'DataEnv.rsdbXueYuan.Filter = ("ruxuEdate >=" & "'" & Format(dtpBegin.Value, "yyyy-mm-dd") & "'")
DataEnv.rsdbXueYuan.Filter = ("ruxuEdate <=" & "'" & Format(dtpEnd.Value, "yyyy-mm-dd") & "'")
If DataEnv.rsdbXueYuan.RecordCount = 0 Then
MsgBox "没有查到数据", vbOKOnly + vbInformation
Exit Sub
End If

[qhdzh]

这个问题很难吗？

[qhdzh]

?

[china_lwx]

请把问题说清楚~

[lxcc]

DataEnv.rsdbXueYuan.Filter = ("ruxuEdate <=" & "'" & Format(dtpEnd.Value, "yyyy-mm-dd") & " 00:00:00'")

[qhdzh]

我是查找在一段时间（dtpBegin 到 dtpEnd )内的所有记录

[qhdzh]

执行以上代码时，就会将数据库中所有记录都显示出来。

[qhdzh]

?