搜索日期条件怎么写

[zzs_2013]

<input type="text" name="search_content">时间范围:
<select name="search_time">
<option value="1">所有</option>
<option value="2">1天内</option>
<option value="3">3天内</option>
<option value="4">7天内</option>
<option value="5">15天内</option>
</select>
数据库中对应的该查询字段为login_time条件怎么写啊?

[davs]

sql="select * from table "
login_time=request.form("search_time")
select case login_time
case 2:sql=sql&" where login_time>dateadd(d,-1,login_time)"
case 3:sql=sql&" where login_time>dateadd(d,-3,login_time)"
case 4:sql=sql&" where login_time>dateadd(d,-7,login_time)"
case 5:sql=sql&" where login_time>dateadd(d,-15,login_time)"
end select

[ljupin]

Dim search_content
search_content = Request.Form("search_content")

sql = "Select * From [TalbeName]"
Select Case search_content
Case 5
sql = sql & " Where (Date()-login_time) <= 15"
Case 4
sql = sql & " Where (Date()-login_time) <= 7"
Case 3
sql = sql & " Where (Date()-login_time) <= 3"
Case 2
sql = sql & " Where (Date()-login_time) <= 1"
End Select

[tatty_bad]

Good
比较即得！

[wangjinmin1982]

学习中~~~

[lienzhu]

改
<input type="text" name="search_content">时间范围:
<select name="search_time">
<option value="0">所有</option>
<option value="1">1天内</option>
<option value="3">3天内</option>
<option value="7">7天内</option>
<option value="15">15天内</option>
</select>
数据库中对应的该查询字段为login_time条件怎么写啊?

search_content = Request.Form("search_content")
if search_content<>"" and isnumeric(search_content) then
search_content=-1*int(search_content)
if search_content=0 then
sql="select * from tname"
else
'sql server数据库
sql="select * from tname where login_time>'" & dateadd('d',date,search_content) & "'"
'acess
' sql="select * from tname where login_time>#" & dateadd('d',date,search_content) "#"
end if
end if

[zzs_2013]

已经解决!给分!