简单asp分页显示代码
来源:互联网 发布:重庆优化外包公司 编辑:程序博客网 时间:2024/06/05 17:58
<%
on error resume next
dim rs,sql,i
filePath = Server.MapPath("db.mdb")
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & filePath
set rs =Server.CreateObject("adodb.recordset")
sql="select * from info order by id"
rs.open sql,conn,1,1
rs.pagesize=6
page=clng(Request("page"))
if page<1 then page=1
if page>rs.pagecount then page=rs.pagecount
rs.AbsolutePage = page
%>
<table>
<% for i=1 to rs.pagesize %>
<tr>
<td ><% response.write rs("rec1") %></td>
<td ><% response.write rs("rec2") %></td>
</tr>
<% rs.movenext
If rs.EOF Then
Exit For
End If
next
%>
</table>
<script Language="JavaScript">
function ChkFields() {
if (document.Myform.page.value=='') {
window.alert ("请输入页数");
Myform.page.focus();
return false
}
Myform.action="aa.asp";
Myform.submit();
return true
}
</script>
<form mehtod="POST" name="Myform" >
输入页数:<input type="text" name="page" size="4">
<input type="button" value="确定" onclick="ChkFields()">
<%
if page>1 then
Response.write("<a href=aa.asp?page=1>第一页</a> ")
Response.write("<a href=aa.asp?page="&(page-1)&">上一页</a> ")
end if
if page <> rs.pagecount then
Response.write("<a href=aa.asp?page="&(page+1)&">下一页</a> ")
Response.write("<a href=aa.asp?page="&rs.pagecount&">最后一页</a> ")
end if
for i=1 to rs.pagecount
if i <> page then
response.write "<a href=aa.asp?page="&i&">" &i& "</a> "
else
response.write i&" "
end if
next
%>
页数:<% =page %>/<% =rs.pagecount %>
</form>
- 简单asp分页显示代码
- asp简单分页代码
- 简单ASP分页代码
- asp 简单分页代码
- asp 分页代码,asp简单分页代码
- asp.net 文章内容分页显示的代码
- asp.net datalist 分页显示代码
- 最简单的ASP分页代码
- ASP代码最新新闻显示NEW图标,分页代码!
- ASP分页显示
- asp分页显示源代码
- asp分页显示
- asp 数据表分页显示
- ::自己写的一个超简单的ASP分页代码::
- 使用简单asp分页代码(项目中)
- PHP简单实用的数据分页显示代码
- Java Web 简单的分页显示实例代码
- ASP.NET简单分页
- asterisk拨号方案的配置
- 新的生活
- Tracing memory leaks in .NET applications with ANTS Profiler
- 页面不能及时刷新,问题出在outputcache上
- VS.NET如何判断DataSet为空和非空
- 简单asp分页显示代码
- server.UrlEncode(str),解决地址栏里传递中文不能识别的问题
- 消零与数字格式化
- 关于访问控件的问题
- Linux操作系统中使用技巧集锦
- Linux配置网卡方法
- 深入理解硬盘的Linux分区
- LINUX最常用的基本操作命令
- 基于Linux操作系统的目录服务的实现