分页显示数据

最新推荐文章于 2024-09-25 14:00:00 发布

xiashu

最新推荐文章于 2024-09-25 14:00:00 发布

阅读量401

点赞数

分类专栏： asp 文章标签： javascript input function border table action

本文链接：https://blog.csdn.net/xiashu/article/details/1450857

版权

asp 专栏收录该内容

2 篇文章 0 订阅

订阅专栏

<%
dim sql
set rs=server.createobject("adodb.recordset")
sql="select * from message"
rs.open sql,conn,1,1
%>
<html>
<head>
</head>
<title>
</title>
<body>
<Table border=1 width="100%">
<tr bgcolor=#FFFFEE>
<td colspan=2 align=middle><b>消息</b></td>
</tr>
<tr>
<form method="post" action="delete.asp" id=form2 name=content>
<%
'if not(rs.eof or rs.bof) then
'数据分页显示
If rs.recordcount>0 Then '记录集不为空则处理记录
%>
<td>
<%
rs.pagesize = 20 ' 设置每页显示的记录数
num=rs.recordcount ' 记录总数
pagenum=rs.pagecount ' 页总数
page=request("page") ' 获取页码的原始信息
' 处理页码原始信息的开始！
If page <> "" then
page = cint(page)
if err.number <> 0 then
err.clear
page = 1
end if
if page < 1 then
page = 1
end if
else
page = 1
End if
if page*rs.pagesize > num and not((page-1)*rs.pagesize < num)then
page=1
end if
' 处理页码原始信息的结束！设置当前页码
rs.absolutepage = page
%>

<%
if page<>pagenum then
lablenum=rs.pagesize
else
lablenum=num-(page-1)*rs.pagesize
end if
for i=1 to lablenum
%>
<input type="checkbox" name="checkbox" value="<%=rs("id")%>">
</td>
<td>
<a href=Javascript:newin('editmessage.asp?message=<%=trim(rs("message"))%>','详细信息','width=500,height=400')><%=trim

(rs("message"))%>
</a>
</td>
</tr>
<tr>
<td>
<%
rs.movenext
next
%>
</td>
</tr>
<tr>
<td colspan=2>

<table width="70%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="35">
<div align="right">
<font color="#333333" size=1>
共有 <%=num%> 条记录 |
<a href=display.asp?page=1>首页</a> |
<%if page>1 then%><a href=display.asp?page=<%=page-1%>><%end if%>上一页</a> |
<%if page<pagenum then%><a href=display.asp?page=<%=page+1%>><%end if%>下一页</a> |
<a href=display.asp?page=<%=pagenum%>>尾页</a> |
页次:<%=page%>/<%=pagenum%>页 |
共<%=pagenum%>页
</font>
</div>
</td>
</tr>
</table>

<%
else
%>
<td colspan=2>
<%
response.Write("没有结果可显示！")
end if
%>
</td>
</tr>
<tr>
<td colspan=2>
        <table width=100%>
   <tr>
      <td>
                  <input type=checkbox name=chkall value=on οnclick="CheckAll(this.form)">
                       <font size=1>选中所有</font> 
     <input type=button name=chkall1 value="全部取消" οnclick="unselectall(this.form)">
                    
    <input type=submit name=action1 οnclick="{if(confirm('确定删除选定的纪录吗?'))

{this.document.content.submit();return true;}return false;}" value="删除">
      </td>
          </tr>
</table>
</td>
</form>
</tr>
</table>

</body>
</html>
<script language="JavaScript">
<!--
function CheckAll(form) {
for (var i=0;i<form.elements.length;i++)    {
    var e = form.elements[i];
    if ((e.name != 'chkall' && e.disabled!=true)|| e.name != 'chkall1')       e.checked = form.chkall.checked;
   }
}

function unselectall(form)
{
   for (var i=0;i<form.elements.length;i++)    {
    var e = form.elements[i];
    if(e.checked=1) e.checked =0;
}
}
//新弹出窗口

function newin(url,name,size)
{
var windowname=window.open(url,name,"left=200,top=200,status=no,scrollbars=no,resizable=no,"+size);
}

//-->
</script>