Question

ASP按时间段查询句语

<form action="" method="get">
<tr>
<input type="text" name="txtsearch" value="<% =request("txtsearch") %>" />
<select name="orderlist" class="STYLE21">
<option value="1" <%if request("orderlist")=1 then response.write(" selected")%>>按金额排列</option>
<option value="2" <%if request("orderlist")=2 then response.write(" selected")%>>按积分排列</option>

</select>
开始日期<input name="Time1" class="inp3" onClick="setday(this)" value="点击选择开通日期" size="20" runat="server">
结束日期<input name="Time2" class="inp3" onClick="setday(this)" value="点击选择到期日期" size="20" runat="server">
<input type="submit" value="查询" />可模糊查找会员信息
</tr>

</form>

<%
Set Rs = Server.CreateObject("Adodb.Recordset")
dim txtsearch,orderlist
dim rs,sql
txtsearch=trim(request("txtsearch"))
orderlist=cint(request("orderlist"))

sql="select * from [sjmx] where (shangjia like '%"&txtsearch&"%' or kahao like '%"&txtsearch&"%' )"

if orderlist=1 then sql=sql & " order by jinge desc"
if orderlist=2 then sql=sql & " order by jifen desc"

if (orderlist<1) or (orderlist>2) then sql=sql & " order by id desc"
'sql=replace(sql,table2&" and",table2&" where")

Rs.Open Sql,Conn,1,1
%>

以上是查询的这一段代码。我现在是要添加按时间段查询，数据表中时间的格式 是
2013-9-8 13:37:20
上面的日期表出来的格式是 2013-09-08

Answer 1

***你自己改一下代码里的日期字段名***
<form action="" method="get">
<tr>
<input type="text" name="txtsearch" value="<% =request("txtsearch") %>" />
<select name="orderlist" class="STYLE21">
<option value="1" <%if request("orderlist")=1 then response.write(" selected")%>>按金额排列</option>
<option value="2" <%if request("orderlist")=2 then response.write(" selected")%>>按积分排列</option>
<option value="3" <%if request("orderlist")=3 then response.write(" selected")%>>按日期排列</option>

</select>
开始日期<input name="Time1" class="inp3" onClick="setday(this)" value="点击选择开通日期" size="20" runat="server">
结束日期<input name="Time2" class="inp3" onClick="setday(this)" value="点击选择到期日期" size="20" runat="server">
<input type="submit" value="查询" />可模糊查找会员信息
</tr>

</form>

<%
Set Rs = Server.CreateObject("Adodb.Recordset")
dim txtsearch,orderlist
dim rs,sql
txtsearch=trim(request("txtsearch"))
orderlist=cint(request("orderlist"))

sql="select * from [sjmx] where (shangjia like '%"&txtsearch&"%' or kahao like '%"&txtsearch&"%' )"

if orderlist=1 then sql=sql & " order by jinge desc"
if orderlist=2 then sql=sql & " order by jifen desc"
if orderlist=3 then sql=sql & " order by 日期字段名 desc"

if (orderlist<1) or (orderlist>3) then sql=sql & " order by id desc"
'sql=replace(sql,table2&" and",table2&" where")

Rs.Open Sql,Conn,1,1
%>

Answer 2

检查一下数据库类的时间字段类型是不是data类型还是datatime类型？datatime类型才是正确

追问

数据类型
日期/时间

追答

你的时间显示在什么地方？

Answer 3

使用 between

追问

我也知道用这个。希望能详细帮我写出代码。

追答

select * from 表名 where cdate(year(时间字段)&'-'&month(时间字段)&'-'&day(时间字段)) BETWEEN cdate('2001-11-11') and cdate('2001-12-25 ')