关于多条件查询分页

<%
dim rst,sqlt,temp
set rst=server.CreateObject("adodb.recordset")
sqlt="select * from sj_user where 1=1"
'判断是否选择了菜系类型
if request("caiid")<>"" then
sqlt=sqlt&"and caiid='"&request("caiid")&"'"
temp="caiid="&request("caiid")
end if
'判断是否选择了路段类型
if request("roadid")<>"" then
sqlt=sqlt&"and roadid='"&request("roadid")&"'"
temp="roadid="&request("roadid")
end if
'判断是否选择了消费类型
if request("moneyid")<>"" then
sqlt=sqlt&"and moneyid='"&request("moneyid")&"'"
temp="moneyid="&request("moneyid")
end if
rst.open sqlt,conn,1,1
%>
<%
if page>1 then
response.write"<a href='?page=1&"&temp&"'  class=a1>第一页</a>"
response.write"<a href='?page="&page-1&"&"&temp&"' class=a1>上一页</a>"
end if
if page<rst.pagecount then
response.write"<a href='?page="&page+1&"&"&temp&"' class=a1>下一页</a>"
response.write"<a href='?page="&rst.pagecount&"&"&temp&"' class=a1>最后一页</a>"
end if
rst.close
set rst=nothing
%>

文章来自: 本站原创
引用通告: 查看所有引用 | 我要引用此文章
Tags:
相关日志: