VB6.0设置查询语句：按日期查询数据

第一句代码，你的原来的代码后面少了个双引号 "

如果还不对，那就是：

数据库里的字段 日期 是日期型的吧？需要将查询转换成日期型的，才会匹配。

Adodc1.RecordSource ="Select * from Data Where 日期=cdate('" &str(DTPicker2.Value) &"')"

第二个问题，用一个order by ，两个类别顺序写，先排前面的，如下：

Adodc1.RecordSource = "select * from Data order by 日期 desc, 物料标识 desc"

说明:

仔细看了看你的代码,你肯定是用combox控件来组合了一个年

月

日的

时间表,其实有个DTpicker控件

可能更适合.但你这样做也没有错,某些情况下也具有优点.

正确使用sql,在这里

你要查询的条件是对的.但你数据库里的日期字段的格式一定要设置正确(相匹配的),否则在查询有于时间变量原因可能会出现意想不到的结果,这就是你错误的原因所在.

下面是你要的sql语句.代入使用即刻

sql="select

*

from

data

where

sf='"

&

text1.text

&"'

and

beteewn

'"&

data1

&"'

and

'"&

data1

&"'"

---