怎么用ASP实现分页(二)

<%@ Language=VBScript %>
<HTML>
<HEAD>
</HEAD>
<BODY>
<%
dim currentpage '定义当前页
dim filename '文件名
Const MaxPerPage=20 '每页显示的记录个数
dim totalnumber '记录总数
filename="showpages.asp"
totalnumber=200 '设置记录总数为200
if not isempty(request("page")) then
currentPage=cint(request("page"))
else
currentPage=1
end if
showpages totalnumber,MaxPerPage,filename
%>
</BODY>
</HTML>
<%'定义分页的函数,以totalnumber,maxperpage,filename作为函数的入口。
function showpages()
dim n
if (totalnumber mod MaxPerPage)=0 then
n= totalPut MaxPerPage
else
n= totalPut MaxPerPage + 1
end if
if n=1 then
exit sub
end if
dim k
response.write "<p align='left'>&gt;&gt; 分页 "
for k=1 to n
if k=currentPage then
response.write "[<b>"+Cstr(k)+"</b>] "
else
response.write "[<b>"+"<a href="&filename&"?page="+cstr(k)+">"+Cstr(k)+"</a></b>] "
end if
next
response.write "</p>"
end function
%>

时间: 2024-09-15 04:51:47

怎么用ASP实现分页(二)的相关文章

ASP通用分页类

分页 一.类的属性.方法 这是一个ASP通用分页类.你可以用它方便的给记录集分页,当然在网上有许多的分页类和分页函数.本分页主要有GetConn.GetRS.SQL.URL.CSSFile.FldName.FldNote.FldWidth.FldAlign.ShowPageType.TleFTColor.TleWidth.PageSize.ShowWidth.Init.Pages.ShowData.Close等属性和方法. 1.GetConn属性:用来获取一个已创建的Connection对象.

那些年,我还在学习asp.net(二) 学习笔记_基础应用

那些年,我还在学习asp.net(二) 那些年觉得看视频是很轻松的了解一个东西,但是这样的不足就是感觉太慢了,没有看书来得快,所以在有了一些了解后,还得看点书,也许书上的不一定好,但书上会把每一个应该说到的地方说到,好有个初步的认识.比如说.NET平台.组件等知识的介绍,所以,那些年就开始了asp.net方面的进一步学习. 一.学习asp.net的准备知识 正如我前面那些年所学习的,在开始之前得对它们有一定的认识: 1.  html语言的基本使用 2.  CSS+DIV的学习,撑握基本的布局 3

asp.net分页,用一个文本框输入页面,按钮跳转到指定的分页的页面

问题描述 datalist已经查询出结果,asp.net分页已写好,用一个文本框输入页面,按钮跳转到指定的分页的页面,分页已经写好,就是不知道怎么在文文本框输入页面后跳转到指定的分页的页面,请各位给个思路 解决方案 解决方案二:傳入參數pageIndex重新執行sql語句綁定到datalist解决方案三:传入参数是指,页面跳转的时候把参数带上吗?我要跳转到本页面的,参数怎么弄呢?解决方案四:文文本框输入页面后跳转到指定的分页的页面?在跳转按钮或者链接里面想跳转到:<inputid=p><

asp.net分页控件使用详解【附实例下载】_实用技巧

一.说明 AspNetPager.dll这个分页控件主要用于asp.net webform网站,现将整理代码如下 二.代码 1.首先在测试页面Default.aspx页面添加引用 <%@ Register Assembly="AspNetPager" Namespace="Wuqi.Webdiyer" TagPrefix="webdiyer" %> 2.写一个Repeater列表控件用于显示数据 <asp:Repeater ID

ASP.Net分页控件发布

asp.net|分页|控件 由于.net自带的分页功能极其死板,自定义性不强不能满足需求,俺花了一个多星期的时间 写成的一个.net分页控件. 特性: 1.支持datagrid,datalist等分种数据显示控件,理论上只要有datasource的控件都可以 2.支持url方式分页,url分页的每一页都可以被搜索引擎搜到,并且支持url重写 3.控件样式可自定义 4.封装完全,使用过程序只需写一行代码   1 /******************************************

ASP VBScript 分页函数

vbscript|分页|函数 作用: 为了通用性考虑, 本函数主要功能为分页导航, 定义数据库连接和调用数据在调用页操作. 1.1 函数 fPageCount 内容1.2 包含文件 abbr.asp, 非必须2.1 使用函数例12.2 使用函数例22.3 使用函数例3 注: 例中的脚本为跳转框必须 效果: -------------------------------------------------------------首页 上十 上一 1 2 3 4 5 6 7 8 9 10  下一 下

用Dreamweaver和ASP实现分页技术的参考

dreamweaver|参考|分页 今天心情有点激动,想把"关于用DW+ASP实现分页技术的参考"分享给用DW+ASP做网页的朋友们.去掉只有"第一页,前一页,下一页,最后一页"的小痛苦 此效果最后的显示是:第N页[共*页] <<1 2 3 4 5 6 7 8 9 10 >>. 用DW+ASP做网页时,在绑定记录集后,代码页里马上出现以下代码: <%  Dim Recordset1  Dim Recordset1_numRows  Se

用Dreamweaver+ASP实现分页技术的参考

dreamweaver|参考|分页 今天心情有点激动,想把"关于用DW+ASP实现分页技术的参考"分享给用DW+ASP做网页的朋友们.去掉只有"第一页,前一页,下一页,最后一页"的小痛苦 此效果最后的显示是:第N页[共*页] <<1 2 3 4 5 6 7 8 9 10 >>. 用DW+ASP做网页时,在绑定记录集后,代码页里马上出现以下代码: <%  Dim Recordset1  Dim Recordset1_numRows  Se

ASP.NET分页组件更新版本

asp.net|分页 此版本经 liut 之手已经改的很好了,完全修改了内部实现的方法,也更改了使用不当的变量名, 属性: RecordCount:记录总数: PageSize:每页显示数量: CurrentPage:当前页码(只读) 事件: 翻页时触发PageChanged事件:

ASP.NET分页组件 0.1.0

asp.net|分页 修改以前做的ASCX用户组件,改编成真正意义的组件,用于制作ASP.NET中的DBGrid,DBList,Repeater等的自定义分页,配合存储过程,能提供高效的的分页功能. 属性: Number:记录总数: PageSize:每页显示数量: CurrentPage:当前页码(只读) 事件: 翻页时触发PageChanged事件: 演示代码: public class WebForm1 : System.Web.UI.Page { protected AspControl