<%
size=request("size")
c1=request("case")
if size="" then
size=20
end if
n=1
title=trim(request("title"))
action=request("action")
sh=request("sh")
set rs=server.createobject("adodb.recordset")
if action="branch" then
if title="" then
sql="select * from xc_jhzj where username='"&session("username")&"' order by actdata desc" '正常模式
else
sql="select * from xc_jhzj where username='"&session("username")&"' and branch='"&title&"' order by actdata desc" '正常模式
end if
elseif action="actdata" then
if title="" then
sql="select * from xc_jhzj where username='"&session("username")&"' order by actdata desc" '正常模式
else
sql="select * from xc_jhzj where username='"&session("username")&"' and year(actdata)='"&title&"' order by actdata desc" '正常模式
end if
else
sql="select * from xc_jhzj where username='"&session("username")&"' order by actdata desc"
end if
rs.open sql,conn,1,1
rs.pagesize=size
'实现分页开始。
if rs.Eof then
rs_total = 0
else
rs_total = rs.RecordCount
end if
dim pageno
maxpage=rs.pagecount
getpageno = (Request("pageno"))
if(getpageno = "")then
pageno = 1
else
pageno = getpageno
End if
if(not rs.Eof)then
rs.AbsolutePage = pageno
end if
if rs.eof and rs.bof then
%>
你把临时用response.write(sql)
输出,复制到查询分析器中执行,是否有数据?