按日期查询后的分页问题
按日期查询后的分页问题我是一个初学者，以下是我的页面代码，在按日期段及姓名查询后分页不正常，请大家帮忙指点一下，先谢谢
<!--#include file =conn.asp-->
<%
if session("baoxiuuser_id")="" then
response.write "<script language=jscript>alert('对不起，您不是本站的注册用户或没有登陆系统！');window.location.href='index.asp';</script>"
response.end
end if
%>
<html>
<head>
<title>报修管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../admin/style.css" rel="stylesheet" type="text/css">
</head>
<script src="../js/js.js"></script>
</SCRIPT>
<DIV ID="overDiv" STYLE="position:absolute; visibility:hide; z-index:1;"></DIV><BR>
<SCRIPT LANGUAGE="JavaScript" SRC="../js/overlib.js"></SCRIPT>
<script language="javascript" src="js/calendar.js"> </script>
</script>
<script language="Javascript"><!--
function gopage(p){ var url1 = "baoxiu_guanli.asp"
window.location.href = url1 ;//這里妳可以這樣該改!
}
// --></script>
<script language="javascript">
function checkform()
{
if (form1.baoxiu_date1.value=="")
{
alert("开始日期不能为空");
form1.baoxiu_date1.focus();
return false;
}
if (form1.baoxiu_date2.value=="")
{
alert("结束日期不能为空");
form1.baoxiu_date2.focus();
return false;
}
if (form1.baoxiu_date2.value<form1.baoxiu_date1.value)
{
alert("结束日期不能小于开始日期");
form1.baoxiu_date2.focus();
return false;
}
return true;
if (form1.paidan_name.value=="")
{
alert("工程师姓名不能为空");
form1.paidan_name.focus();
return false;
}
}
</script>
<body>
<table width="99%" border="0" align="center" cellpadding="0" cellspacing="1" class="TableBorder">
<tr>
<td height="30" colspan=4 align="center" class="TableTitle1"><b>服务数据管理</b></td>
</tr>
<tr>
<td width="92" align="center" class="TableRow2" height=25><strong>服务管理：</strong></td>
<td width="184" class="TableRow2"><div align="left">数据分析 | <a href="dengluok.asp">退出管理</a></div></td>
<td width="667" height="30"valign="middle" class="TableRow2">
<form name="form1" method="POST" action="baoxiu_guanli.asp" onsubmit="return checkform() ">
<div align="left">日期:
<input name="baoxiu_date1" type="text" id="baoxiu_date1" size="20" value="<%= year(date)%>-<%= month(date)%>-1" onFocus="setday(this)" readonly >
至
<input name="baoxiu_date2" type="text" id="baoxiu_date2" onFocus="setday(this)" value="<%= year(date)%>-<%= month(date)%>-<%= day(date)%>" size="20" readonly>
工程师:
<select name="paidan_name" size="1" id="paidan_name" >
<option value="" selected>选择所有人员</option>
<option value="周伟">周伟</option>
<option value="汪伟">汪伟</option>
<option value="王波">王波</option>
<option value="熊飞">熊飞</option>
<option value="汪龙">汪龙</option>
<option value="袁海江">袁海江</option>
</select>
<input type="submit" name="Submit" value="提交">
</div>
<input type="hidden" name="xingming" value="<%=request.form("paidan_name")%>">
<input type="hidden" name="date1" value="<%=request.form("baoxiu_date1")%>">
<input type="hidden" name="date2" value="<%=request.form("baoxiu_date2")%>">
<input type="hidden" name="condition2" value="<%=getcondition%>">
<input type="hidden" name="key" value="<%=getkey%>">
<input type="hidden" name="pageno" value="<%=getpageno%>">
</form> </td>
<td width="17" class="TableRow2"> </td>
</table>
<div id="main1" style="color:blue" onClick="document.all.child1.style.display=(document.all.child1.style.display =='none')?'':'none'" >
<%
dim xingming,date1,date2
xingming=request.form("paidan_name")
date1=request.form("baoxiu_date1")
date2=request.form("baoxiu_date2")
sql="select * from baoxiu where paidan_name like '%" & xingming & "%' and baoxiu_date between #"&date1&"# and #"&date2&"# order by baoxiu_date desc"
Set rs= Server.CreateObject("ADODB.Recordset")
rs.open sql,conn,1,1
rs.pagesize=""&htshu&""
'实现分页
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
%>
<table width="962" bgcolor="#CCCC99" border="0" align="center" cellpadding="0" cellspacing="0" >
<tr>
<td width="8%" height="30" align="center" ><strong>工程师名</strong></td>
<td width="7%" align="center" ><strong>服务单数</strong></td>
<td width="5%" align="center" ><strong>满意</strong></td>
<td width="5%" align="center" ><strong>一般</strong></td>
<td width="5%" align="center" ><strong>投诉</strong></td>
<td width="5%" align="center" ><strong>未访</strong></td>
<td width="9%" align="center" ><strong>应收费用</strong></td>
<td width="9%" align="center" ><strong>实收金额</strong></td>
<td width="8%" align="center" ><strong>创收金额</strong></td>
<td width="10%" align="center" ><strong>服务单费</strong></td>
<td width="7%" align="center" ><strong>客户评价</strong></td>
<td width="9%" align="center" ><strong>所得合计</strong></td>
<td width="9%" align="center" ><strong>查看祥细</strong></td>
</tr>
</table>
</div>
<div id="child1" style="display:none">
<table width="962" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><table width="100%" border="0" align="center" cellpadding="0" cellspacing="1" class="tableBorder5">
<tr>
<td width="150" height="30" align="center" class="TableTitle1" ><strong> 报修时间</strong></td>
<td width="55" align="center" class="TableTitle1" ><strong>客户</strong></td>
<td width="110" align="center" class="TableTitle1" ><strong>联系电话</strong></td>
<td width="220" height="30" align="center" class="TableTitle1" ><strong>联系地址</strong></td>
<td width="120" align="center" class="TableTitle1" ><strong>报修原因</strong></td>
<td width="55" align="center" class="TableTitle1" ><strong>工程师</strong></td>
<td width="65" height="30" align="center" class="TableTitle1" ><strong>服务状态</strong></td>
<td width="85" align="center" class="TableTitle1" ><strong>服务时间</strong></td>
<td width="85" align="center" class="TableTitle1" ><strong>客户评价</strong></td>
</tr>
<%
If(rs.Eof)Then
%>
<tr>
<td height="120" colspan="9" align="center" class="TableBody1">对不起！没有找到你需要的报修记录！</td>
</tr>
<!--#include file ="bottom.asp"-->
<%
Response.End()
End If
repeat_rows = 0
While(repeat_rows < rs.PageSize and Not rs.Eof)
%>
<%baoxiu_id=rs("baoxiu_id")%>
<tr>
<%'报修时间-------------------------------------------------------------------------------------------------------- %>
<td width="140" height="30" align="center" class="TableBody1" ><a href="baoxiu_list.asp?baoxiu_id=<%=baoxiu_id%>"><font color="#0099FF"><%=rs("baoxiu_date")%></font></a>
</td>
<%'报修姓名--------------------------------------------------------------------------------------------------------%>
<td width="65" height="30" align="center" class="TableBody1" >
<%
Response.Write("<a href='baoxiu_list.asp?baoxiu_id="&rs("baoxiu_id")&"'>"&(rs("user_name"))&"</a>")
%>
</td>
<%'报修电话--------------------------------------------------------------------------------------------------------%>
<td width="85" height="30" align="center" class="TableBody1" >
<%
Response.Write("<a href='baoxiu_list.asp?baoxiu_id="&rs("baoxiu_id")&"'>"&(rs("contact"))&"</a>")
%>
</td>
<%'联系地址-------------------------------------------------------------------------------------------------------%>
<td width="200" height="30" align="center" class="TableBody1" >
<%
If(Len(rs("user_dizhi")) > 9)Then
Response.Write("<a href='baoxiu_list.asp?baoxiu_id="&rs("baoxiu_id")&"'>"&(Mid(rs("user_dizhi"),1,9))&"…</a>")
Else
Response.Write("<a href='baoxiu_list.asp?baoxiu_id="&rs("baoxiu_id")&"'>"&(rs("user_dizhi"))&"</a>")
End If
%>
</td>
<%'报修原因--------------------------------------------------------------------------------------------------------%>
<td width="180" height="30" align="center" class="TableBody1" >
<%
If(Len(rs("baoxiu_yuanyin")) > 9)Then
Response.Write("<a href='baoxiu_list.asp?baoxiu_id="&rs("baoxiu_id")&"'>"&(Mid(rs("baoxiu_yuanyin"),1,9))&"…</a>")
Else
Response.Write("<a href='baoxiu_list.asp?baoxiu_id="&rs("baoxiu_id")&"'>"&(rs("baoxiu_yuanyin"))&"</a>")
End If
%>
</td>
<%'工程师姓名--------------------------------------------------------------------------------------------------------%>
<td width="75" height="30" align="center" class="TableBody1" ><a href="baoxiu_list.asp?baoxiu_id=<%=baoxiu_id%>" onMouseOver="drc('姓名：<%=rs("user_name")%><br>电话：<%=rs("contact")%><br>地址：<%=rs("user_dizhi")%><br>原因：<%=rs("baoxiu_yuanyin")%><br>服务费：<%=rs("user_feiyong")%><br>对策：<%=rs("weixiu_main")%><br>实收：<%=rs("weixiu_feiyong")%><br>客户评价：<%=rs("kehuyijian")%>','<%=rs("paidan_name")%>的单子'); return true;" onMouseOut="nd(); return true;"><%=rs("paidan_name")%></a>
</td>
<%'报修状态--------------------------------------------------------------------------------------------------------%>
<td width="75" height="30" align="center" class="TableBody1" ><%if rs("weixiu_zhuangtai")<>"" then%><a href="baoxiu_list.asp?baoxiu_id=<%=baoxiu_id%>"><%=rs("weixiu_zhuangtai")%><%else%><b>×</b><%end if%></td>
<td width="70" align="center" class="TableBody1"><%if rs("weixiu_zhuangtai")<>"" then%><a href="baoxiu_list.asp?baoxiu_id=<%=baoxiu_id%>"><%=rs("weixiu_time")%><%else%><b>×</b><%end if%></td>
<td width="70" align="center" class="TableBody1">
<%if rs("keping")="未联系上" then%><a href="baoxiu_list.asp?baoxiu_id=<%=baoxiu_id%>"><font color="#000000"><%=rs("keping")%></font><%else%><b></b>
<%if rs("keping")="投诉" then%><a href="baoxiu_list.asp?baoxiu_id=<%=baoxiu_id%>"><font color="#009933"><%=rs("keping")%></font><%else%><b></b>
<%if rs("keping")="非常不满" then%><a href="baoxiu_list.asp?baoxiu_id=<%=baoxiu_id%>"><font color="#0000FF"><%=rs("keping")%></font><%else%><b></b>
<%if rs("keping")="不满意" then%><a href="baoxiu_list.asp?baoxiu_id=<%=baoxiu_id%>"><font color="#0000FF"><%=rs("keping")%></font><%else%><b></b>
<%if rs("keping")="一般" then%><a href="baoxiu_list.asp?baoxiu_id=<%=baoxiu_id%>"><font color="#FF00FF"><%=rs("keping")%></font><%else%><b></b>
<%if rs("keping")="比较满意" then%><a href="baoxiu_list.asp?baoxiu_id=<%=baoxiu_id%>"><font color="#FF0000"><%=rs("keping")%></font><%else%><b></b>
<%if rs("keping")="非常满意" then%><a href="baoxiu_list.asp?baoxiu_id=<%=baoxiu_id%>"><font color="#FF0000"><%=rs("keping")%></font><%else%><b></b>
<%if rs("keping")<>"" then%><a href="baoxiu_list.asp?baoxiu_id=<%=baoxiu_id%>"><font color="#FF0000"><%=rs("keping")%></font><%else%><b>×</b>
<%end if%>
<%end if%>
<%end if%>
<%end if%>
<%end if%>
<%end if%>
<%end if%>
<%end if%>
</td>
</tr>
<%
repeat_rows = repeat_rows + 1
rs.MoveNext
Wend
%>
</table>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="302" height="30">[<font color=red><%=pageno%></font>/<%=rs.PageCount%>] 每页<font color=red><%=rs.PageSize%></font>条 共<font color=red><%=rs_total%></font>条记录 【<a href="baoxiulist.xls">Excel</a>】</td>
<td width="171"> </td>
<td width="277"><span>
</span>
<div align="right">
<table width="400" height="20" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="400" align="right"><%for i=1 to maxpage%>
[<a href="dengluok.asp?pageno=<%=i%>"><%=i%></a>]
<%next%> </td>
</tr>
</table>
</div>
<%
rs.close
Set rs = Nothing
%></td>
</tr>
</table>
</td>
</tr>
</table>
</div>
<div id="main1" style="color:blue" onClick="document.all.child1.style.display=(document.all.child1.style.display =='none')?'':'none'" >
<%
sql2="select count(bx_id) as danshou,sum(user_feiyong) as yingshou,sum(chuangshou)as chuang,sum(weixiu_feiyong)as shishou,sum(paodanfei)as danfei from baoxiu where paidan_name like '%" & xingming & "%' and baoxiu_date between #"&date1&"# and #"&date2&"# "
Set rshuizong= Server.CreateObject("ADODB.Recordset")
rshuizong.open sql2,conn,1,1
%>
<td><table width="962" border="0" align="center" cellpadding="0" cellspacing="1" class="tableBorder5">
<tr>
<td width="8%" height="30" align="center" class="TableRow2"><strong><%=xingming %></strong></td>
<td width="7%" align="center" class="TableRow2" ><strong><%=rshuizong("danshou")%></strong></td>
<td width="5%" align="center" class="TableRow2" ><strong></strong></td>
<td width="5%" align="center" class="TableRow2" ><strong></strong></td>
<td width="5%" align="center" class="TableRow2" ><strong></strong></td>
<td width="5%" align="center" class="TableRow2" ><strong></strong></td>
<td width="9%" align="center" class="TableRow2" ><strong><%=rshuizong("yingshou")%>.00</strong></td>
<td width="9%" align="center" class="TableRow2" ><strong><%=rshuizong("shishou")%>.00</strong></td>
<td width="8%" align="center" class="TableRow2" ><strong><%=rshuizong("chuang")%>.00</strong></td>
<td width="10%" align="center" class="TableRow2" ><strong><%=rshuizong("danfei")%>.00</strong></td>
<td width="7%" align="center" class="TableRow2"><strong></strong></td>
<td width="9%" align="center" class="TableRow2"><strong></strong></td>
<td width="9%" align="center" class="TableRow2" ><strong>查看祥细</strong></td>
</tr>
</table>
</div>
<%
sqlzong="select * from baoxiu where paidan_name like '%" & xingming & "%' and baoxiu_date between #"&date1&"# and #"&date2&"# order by baoxiu_date desc"
Set rs_zong= Server.CreateObject("ADODB.Recordset")
rs_zong.open sqlzong,conn,1,1
rs_zong.pagesize=""&htshu&""
'实现分页
if rs_zong.Eof then
rs_total = 0
else
rs_total = rs_zong.RecordCount
end if
dim pagenozong
maxpagezong=rs_zong.pagecount
getpagenozong = (Request("pagenozong"))
if(getpagenozong = "")then
pagenozong = 1
else
pagenozong = getpagenozong
End if
if(not rs_zong.Eof)then
rs_zong.AbsolutePage = pagenozong
end if
%>
<table width="100%" height="72" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="20" align=center>
<tr>
<td align=center>
<table cellspacing="0" width="100%">
<tr align="center">
<td valign="top" colspan="3">
<form name="Del_baoxiu" method="post">
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="1" class="tableBorder">
<tr>
<td width="150" height="30" align="center" class="TableTitle1" ><strong> 报修时间</strong></td>
<td width="55" align="center" class="TableTitle1" ><strong>客户</strong></td>
<td width="110" align="center" class="TableTitle1" ><strong>联系电话</strong></td>
<td width="140" height="30" align="center" class="TableTitle1" ><strong>服务原因</strong></td>
<td width="220" align="center" class="TableTitle1" ><strong>服务项目</strong></td>
<td width="50" align="center" class="TableTitle1" ><strong>应收</strong></td>
<td width="50" align="center" class="TableTitle1" ><strong>实收</strong></td>
<td width="50" align="center" class="TableTitle1" ><strong>创收</strong></td>
<td width="50" align="center" class="TableTitle1" ><strong>单费</strong></td>
<td width="45" align="center" class="TableTitle1" ><strong>工程师</strong></td>
<td width="80" align="center" class="TableTitle1" ><strong>服务时间</strong></td>
<td width="60" align="center" class="TableTitle1" ><strong>客户评价</strong></td>
<td width="30" align="center" class="TableTitle1" ><strong>删除</strong></td>
</tr>
<%
If(rs_zong.Eof)Then
%>
<tr>
<td height="120" colspan="9" align="center" class="TableRow2">对不起！没有找到你需要的报修记录！</td>
</tr>
<!--#include file ="bottom.asp"-->
<%
Response.End()
End If
repeat_rows = 0
While(repeat_rows < rs_zong.PageSize and Not rs_zong.Eof)
%>
<%baoxiu_id=rs_zong("baoxiu_id")%>
<tr>
<%'报修时间-------------------------------------------------------------------------------------------------------- %>
<td width="140" height="30" align="center" class="TableRow2" ><a href="baoxiu_list.asp?baoxiu_id=<%=baoxiu_id%>"><font color="#0099FF"><%=rs_zong("baoxiu_date")%></font></a>
</td>
<%'报修姓名--------------------------------------------------------------------------------------------------------%>
<td width="65" height="30" align="center" class="TableRow2" >
<%
Response.Write("<a href='baoxiu_list.asp?baoxiu_id="&rs_zong("baoxiu_id")&"'>"&(rs_zong("user_name"))&"</a>")
%>
</td>
<%'报修电话--------------------------------------------------------------------------------------------------------%>
<td width="85" height="30" align="center" class="TableRow2" >
<%
Response.Write("<a href='baoxiu_list.asp?baoxiu_id="&rs_zong("baoxiu_id")&"'>"&(rs_zong("contact"))&"</a>")
%>
</td>
<%'联系地址-------------------------------------------------------------------------------------------------------%>
<td width="140" height="30" align="left" class="TableRow2" >
<%
If(Len(rs_zong("baoxiu_yuanyin")) >7)Then
Response.Write("<a href='baoxiu_list.asp?baoxiu_id="&rs_zong("baoxiu_id")&"'>"&(Mid(rs_zong("baoxiu_yuanyin"),1,7))&"…</a>")
Else
Response.Write("<a href='baoxiu_list.asp?baoxiu_id="&rs_zong("baoxiu_id")&"'>"&(rs_zong("baoxiu_yuanyin"))&"</a>")
End If
%>
</td>
<%'报修原因--------------------------------------------------------------------------------------------------------%>
<td width="220" height="30" align="left" class="TableRow2" >
<%
If(Len(rs_zong("weixiu_main")) > 13)Then
Response.Write("<a href='baoxiu_list.asp?baoxiu_id="&rs_zong("baoxiu_id")&"'>"&(Mid(rs_zong("weixiu_main"),1,13))&"…</a>")
Else
Response.Write("<a href='baoxiu_list.asp?baoxiu_id="&rs_zong("baoxiu_id")&"'>"&(rs_zong("weixiu_main"))&"</a>")
End If
%>
</td>
<%'应收-------------------------------------------------------------------------------------------------------%>
<td width="35" align="center" class="TableRow2" ><a href="baoxiu_list.asp?baoxiu_id=<%=baoxiu_id%>" onMouseOver="drc('姓名：<%=rs_zong("user_name")%><br>电话：<%=rs_zong("contact")%><br>地址：<%=rs_zong("user_dizhi")%><br>原因：<%=rs_zong("baoxiu_yuanyin")%><br>现象：<%=rs_zong("guzhang")%><br>服务费：<%=rs_zong("user_feiyong")%><br>对策：<%=rs_zong("weixiu_main")%><br>实收费：<%=rs_zong("weixiu_feiyong")%><br>客户评价：<%=rs_zong("kehuyijian")%>','<%=rs_zong("paidan_name")%>的单子'); return true;" onMouseOut="nd(); return true;"><%=rs_zong("user_feiyong")%></a>
</td>
<%'应收--------------------------------------------------------------------------------------------------------%>
<td width="35" align="center" class="TableRow2" ><a href="baoxiu_list.asp?baoxiu_id=<%=baoxiu_id%>" onMouseOver="drc('姓名：<%=rs_zong("user_name")%><br>电话：<%=rs_zong("contact")%><br>地址：<%=rs_zong("user_dizhi")%><br>原因：<%=rs_zong("baoxiu_yuanyin")%><br>现象：<%=rs_zong("guzhang")%><br>服务费：<%=rs_zong("user_feiyong")%><br>对策：<%=rs_zong("weixiu_main")%><br>实收费：<%=rs_zong("weixiu_feiyong")%><br>客户评价：<%=rs_zong("kehuyijian")%>','<%=rs_zong("paidan_name")%>的单子'); return true;" onMouseOut="nd(); return true;"><%=rs_zong("weixiu_feiyong")%></a>
</td>
<%'创收--------------------------------------------------------------------------------------------------------%>
<td width="35" align="center" class="TableRow2" ><a href="baoxiu_list.asp?baoxiu_id=<%=baoxiu_id%>" onMouseOver="drc('姓名：<%=rs_zong("user_name")%><br>电话：<%=rs_zong("contact")%><br>地址：<%=rs_zong("user_dizhi")%><br>原因：<%=rs_zong("baoxiu_yuanyin")%><br>现象：<%=rs_zong("guzhang")%><br>服务费：<%=rs_zong("user_feiyong")%><br>对策：<%=rs_zong("weixiu_main")%><br>实收费：<%=rs_zong("weixiu_feiyong")%><br>客户评价：<%=rs_zong("kehuyijian")%>','<%=rs_zong("paidan_name")%>的单子'); return true;" onMouseOut="nd(); return true;"><%=rs_zong("chuangshou")%></a>
</td>
<%'单费--------------------------------------------------------------------------------------------------------%>
<td width="35" align="center" class="TableRow2" ><a href="baoxiu_list.asp?baoxiu_id=<%=baoxiu_id%>" onMouseOver="drc('姓名：<%=rs_zong("user_name")%><br>电话：<%=rs_zong("contact")%><br>地址：<%=rs_zong("user_dizhi")%><br>原因：<%=rs_zong("baoxiu_yuanyin")%><br>现象：<%=rs_zong("guzhang")%><br>服务费：<%=rs_zong("user_feiyong")%><br>对策：<%=rs_zong("weixiu_main")%><br>实收费：<%=rs_zong("weixiu_feiyong")%><br>客户评价：<%=rs_zong("kehuyijian")%>','<%=rs_zong("paidan_name")%>的单子'); return true;" onMouseOut="nd(); return true;"><%=rs_zong("paodanfei")%></a>
</td>
<%'工程师姓名--------------------------------------------------------------------------------------------------------%>
<td width="45" align="center" class="TableRow2" ><a href="baoxiu_list.asp?baoxiu_id=<%=baoxiu_id%>" onMouseOver="drc('姓名：<%=rs_zong("user_name")%><br>电话：<%=rs_zong("contact")%><br>地址：<%=rs_zong("user_dizhi")%><br>原因：<%=rs_zong("baoxiu_yuanyin")%><br>现象：<%=rs_zong("guzhang")%><br>服务费：<%=rs_zong("user_feiyong")%><br>对策：<%=rs_zong("weixiu_main")%><br>实收费：<%=rs_zong("weixiu_feiyong")%><br>客户评价：<%=rs_zong("kehuyijian")%>','<%=rs_zong("paidan_name")%>的单子'); return true;" onMouseOut="nd(); return true;"><%=rs_zong("paidan_name")%></a>
</td>
<td width="80" align="center" class="TableRow2"><%if rs_zong("weixiu_zhuangtai")<>"" then%><a href="baoxiu_list.asp?baoxiu_id=<%=baoxiu_id%>"><%=rs_zong("weixiu_time")%><%else%><b>×</b><%end if%></td>
<td width="60" align="center" class="TableRow2">
<%if rs_zong("keping")="未联系上" then%><a href="baoxiu_list.asp?baoxiu_id=<%=baoxiu_id%>"><font color="#000000"><%=rs_zong("keping")%></font><%else%><b></b>
<%if rs_zong("keping")="投诉" then%><a href="baoxiu_list.asp?baoxiu_id=<%=baoxiu_id%>"><font color="#009933"><%=rs_zong("keping")%></font><%else%><b></b>
<%if rs_zong("keping")="非常不满" then%><a href="baoxiu_list.asp?baoxiu_id=<%=baoxiu_id%>"><font color="#0000FF"><%=rs_zong("keping")%></font><%else%><b></b>
<%if rs_zong("keping")="不满意" then%><a href="baoxiu_list.asp?baoxiu_id=<%=baoxiu_id%>"><font color="#0000FF"><%=rs_zong("keping")%></font><%else%><b></b>
<%if rs_zong("keping")="一般" then%><a href="baoxiu_list.asp?baoxiu_id=<%=baoxiu_id%>"><font color="#FF00FF"><%=rs_zong("keping")%></font><%else%><b></b>
<%if rs_zong("keping")="比较满意" then%><a href="baoxiu_list.asp?baoxiu_id=<%=baoxiu_id%>"><font color="#FF0000"><%=rs_zong("keping")%></font><%else%><b></b>
<%if rs_zong("keping")="非常满意" then%><a href="baoxiu_list.asp?baoxiu_id=<%=baoxiu_id%>"><font color="#FF0000"><%=rs_zong("keping")%></font><%else%><b></b>
<%if rs_zong("keping")<>"" then%><a href="baoxiu_list.asp?baoxiu_id=<%=baoxiu_id%>"><font color="#FF0000"><%=rs_zong("keping")%></font><%else%><b>×</b>
<%end if%>
<%end if%>
<%end if%>
<%end if%>
<%end if%>
<%end if%>
<%end if%>
<%end if%>
</td>
<td width="30" align="center" class="TableRow2"><input name="BoxUser" type="checkbox" value="<%=rs_zong("baoxiu_id")%>"></td>
</tr>
<%
repeat_rows = repeat_rows + 1
rs_zong.MoveNext
Wend
%>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0" align=center>
<tr>
<td height="8" colspan=5></td>
</tr>
<tr>
<td><table width="98%" border="1" align="center" cellpadding="0" cellspacing="0" bordercolorlight="#799AE1" bordercolordark="#ffffff">
<tr>
<td><table width="98%" border="0" cellspacing="0" cellpadding="0" align=center>
<tr>
<td width="69%">[<font color=red><%=pagenozong%></font>/<%=rs_zong.pagecount%>] | [每页<font color=red><%=rs_zong.PageSize%></font>条] | [共<font color=red><%=rs_total%></font>条]
<%
if(pagenozong <> 1)then
%>
<a href="?condition=<%=getcondition%>&key=<%=getkey%>">第一页</a>
<%
end if
%>
<%
if(pagenozong <> 1)then
%>
<a href="?condition=<%=getcondition%>&key=<%=getkey%>&pagenozong=<%=(pagenozong-1)%>">上一页</a>
<%
end if
%>
<%
'这里要判断一下pageno和rs.pagecount的值相等的情况，如果不判断，当它俩的值相等时，pageno<>cstr(rs_zong.pagecount)还是true
if(instr(pagenozong,cstr(rs_zong.pagecount)) = 0)then
%>
<a href="?condition=<%=getcondition%>&key=<%=getkey%>&pagenozong=<%=(pagenozong+1)%>">下一页</a>
<%
end if
%>
<%
if(instr(pagenozong,cstr(rs_zong.pagecount)) = 0)then
%>
<a href="?condition=<%=getcondition%>&key=<%=getkey%>&pagenozong=<%=rs_zong.pagecount%>">最后一页</a>
<%
end if
rs_zong.close
set rs_zong = nothing
%></td>
<td width="3%"></td>
<td width="19%" align=right nowrap>[<a style="color:red;cursor:hand;" onClick="Check1(Del_baoxiu)">删除</a>]
<%'这里用这几个隐藏域是为了把显示这个页面所需的参数传递到删除页面，然后再由删除页面传回本页面。%>
<input type="hidden" name="condition2" value="<%=getcondition%>">
<input type="hidden" name="key" value="<%=getkey%>">
<input type="hidden" name="pageno" value="<%=getpageno%>"></td>
<input type="hidden" name="xingming" value="<%=request.form("paidan_name")%>">
<input type="hidden" name="date1" value="<%=request.form("baoxiu_date1")%>">
<input type="hidden" name="date2" value="<%=request.form("baoxiu_date2")%>">
</td>
<td width="6%" align="right" nowrap>[全选/反选]</td>
<td width="3%" height="26" align=center nowrap><input type="checkbox" name="checkbox" onClick="CheckAll(this.form.BoxUser,this.form.checkbox)"></td>
</tr>
</table></td>
</tr>
</table> </td>
</tr>
</table>
</form> </td>
</tr>
</table>
</table>
<!--#include file =bottom.asp-->
</body>
</html>
