查询菜问题

Question

Adodc1.RecordSource = "select *  from 单据    where    [类别] LIKE (" + "'" + Trim(Combo1(1).Text) + "%'" + ") and  [客户] LIKE (" + "'" + Trim(Combo1(0).Text) + "%'" + ") and  [品名] LIKE (" + "'" + Trim(Combo1(2).Text) + "%'" + ") and  [销售部门] LIKE (" + "'" + Trim(Combo1(3).Text) + "%'" + ") ORDER BY [单据号] ASC"我想加一个 日期的 要怎么加呢 比如 我还想查出 >=DTPicker1.Value adn  <=DTPicker2.Value 又要怎么写啊  ：） 谢谢!!!!!!!!!!!!!

Answer 1

"select *  from 单据    where    [类别] LIKE (" + "'" + Trim(Combo1(1).Text) + "%'" + ") and  [客户] LIKE (" + "'" + Trim(Combo1(0).Text) + "%'" + ") and  [品名] LIKE (" + "'" + Trim(Combo1(2).Text) + "%'" + ") and  [销售部门] LIKE (" + "'" + Trim(Combo1(3).Text) + "%'" + ") and (時間 between '" & dtpicker1.value & "' and '" & dtpicker2.value & "' ORDER BY [单据号] ASC"

Answer 2

'数据库为ACCESS：
strsql=" select * from tablename where 日期字段=# " & dtpicker1.value & " # "
'数据库为SQL：
strsql=" select * from tablename where 日期字段='"& dtpicker1.value &"'"

Answer 3

'数据库为ACCESS：
strsql=" select * from tablename where 日期字段 between # " & dtpicker1.value & " # and # " & dtpicker2.value & " # "
'数据库为SQL：
strsql=" select * from tablename where 日期字段between '" & dtpicker1.value & " ' and '" & dtpicker2.value & " '"

Answer 4

s = "select * from 车辆档案 where 车辆id = " & Val(Key) & " and 日期 >= convert(datetime,'" & Format(CVDate(rq), "MM-dd-yyyy hh:mm") & "',102) and 日期 <= convert(datetime,'" & Format(snp("日期"), "MM-dd-yyyy hh:mm") & "',102) order by 日期"

Answer 5

TO :Suron128(辰龍)  好像出错哦

Answer 6

最近 我以这样
Adodc1.RecordSource = "select *  from 单据    where    [类别] LIKE (" + "'" + Trim(Combo1(1).Text) + "%'" + ") and  [客户] LIKE (" + "'" + Trim(Combo1(0).Text) + "%'" + ") and  [品名] LIKE (" + "'" + Trim(Combo1(2).Text) + "%'" + ") and  [销售部门] LIKE (" + "'" + Trim(Combo1(3).Text) + "%'" + ") and  [单据号] LIKE (" + "'" + Trim(Text1(0).Text) + "%'" + ") and (日期 between # " & DTPicker1(2).Value & " # and # " & DTPicker1(0).Value & " # )  ORDER BY [单据号] ASC"谢谢你们