asp+access多条件查询分页
发布网友
发布时间:2022-04-11 22:37
我来回答
共3个回答
热心网友
时间:2022-04-12 00:06
syh=Request("syh")
xxmc=Request("xxmc")
csrq=Request("csrq")
wjbh=Request("wjbh")
wjbh = replace (wjbh,"[","[[]")
wjbh = replace (wjbh,"*]","*[]]")
fbjg=Request("fbjg")
url=""
Sql= "Select * from zwgk where 1=1 "
if syh <>"" then
url=url&"&syh="&syh
Sql= Sql & "and syh like '%"& syh &"%'"
end if
if xxmc <>"" then
url=url&"&xxmc ="&xxmc
Sql= Sql & "and xxmc like '%"& xxmc &"%'"
end if
if csrq <>"" then
url=url&"&csrq ="&csrq
Sql= Sql & "and csrq like '%"& csrq &"%'"
end if
if wjbh <>"" then
url=url&"&wjbh ="&wjbh
Sql= Sql & "and wjbh like '%"& wjbh &"%'"
end if
if fbjg <>"" then
url=url&"&fbjg ="&fbjg
Sql= Sql & "and fbjg like '%"& fbjg &"%'"
end if
session("urls")=url
url=session("urls")
;;;;;;
第<%=ThisPageNum+1%>页/共<%=rs.PageCount%>页-
<%if (ThisPageNum+1) <= 1 then %>
上一页
<%else%>
<a href="<%=filename%>?pg=<%=((ThisPageNum+1)-1)%><%=url%>">上一页</a>
<%end if%>
<%if (ThisPageNum+1) >= rs.PageCount then %>
下一页
<%else%>
<a href="<%=filename%>?pg=<%=((ThisPageNum + 1)+1)%><%=url%>">下一页</a>
<%end if%>
热心网友
时间:2022-04-12 01:24
你这个应该是 DW图形化做的吧。。
DW做的好小想就是有问题。。
自己写吧。。这个代码看起来好象没有错误啊。。