1、conn，1，1 ‘使用结果集RS执行strsql语句%然后是分页属性的设置 lt% rsPageSize=3 ‘设置页码 pagecount=rsPageCount #39获取总页码 page=intrequestquotpagequot #39接收页码 if pagelt=0 then page=1 #39判断 if requestquotpagequot=quotquot then page=1 rsAbsolutePage=page #39设置本页页码 %再。

2、dim page，pagecount，thispage，linenum，allline const pageline=10 #39每页显示10行 linenum=splitcontent，quotquot #39本例为计算字符串标记的个数 allline=uboundlinenum+1 #39全文换行标记总数 pagecount=intallline\pageline+1 #39计算总页数 page=requestquotpagequotif isemptypage then thispage=。

3、1首先来了解AspNet分页控件AspNetPager以及控件的属性CurrentPageIndex当前页数页码RecordCount 总数据条数 PageSize 每页数据条数 PageCount 总的页数 当然还有一些特别“人性化”的属性可以设置2接下来就是给控件属性赋值就可以了，通过Sql语句查询到数据库中的数据，SqlDataAdapter。

4、分页代码 页面URL 当前页面 共多少页 共多少条记录 每页显示多少条记录 ltreturnsltreturns public string goPagestring url， int page， int allPage， int allCount， int PageCount int startPage = page 3int endPage = page + 3。

5、多年没写asp了，下面的代码把关键的部分写出来了，应该是可以看懂的了lt%#39连接数据库等操作省略，打开数据库等省略#39rs为打开数据库的对象const pz=13 #39这里定义分页数据，即每页多少条数据rspagesize=pz #39这里设置分页的数量，asp分页必须rsabsolutepage=nowpage #39这里的nowpage是用来获取当。

6、这样的话，无论如何都要+1，而不是四舍五入如当前是238 也就是2+1=3页 if page=0 then page=1 if page3 then page=3 responsewrite Midtext，page1*8+1，8这样的分页比较传统简单但不太适合通过编辑器传输的即带有HTML或UBB代码的文本自己想想为什么吧。

7、pagesum quot#39尾页 quotelse responseWritequot下一页 尾页 quotend if end function 调用方法lt% call PageNumPage，PageSum，Act % 其中page是当前页数，PAGESUM是页面总数，ACT是点击连接的URL包括PAGE变量名称例lt% call PageNum1，PageSum，quotinfoasp？id=1page=quot %。

8、lta href=quot页面asp？Page=lt%=Page%+1下一页 lta href=quot页面asp？Page=lt%=PageCount%quot尾页 lt% Else % 下一页 尾页 lt% End If % lt%End If% 转到页 ltinput type=quothiddenquot name=quotSite_ID2quot value=quotlt%=Site_ID%quot ltinput type=quothiddenquot name=quotSearchText2quot va。

9、整个分页显示可以参考如下lt set rs=servercreateobjectquotadodbrecordsetquotsql=quotselect * from gonggao order by id descquotrsopen sql，conn，1，1 rspagesize=3 page=clngrequestquotpagequotif page=quotquot or page=0 then page=1 if pagerspagecount then page=rspagecount if not。

10、下面看一段显示1到n页，且每一个数字点击以后就出现这个数在代表的页面的代码，很常见哦lt%for i=1 to pagecount% lta href=quotlistasp？page=lt%=i%quotlt%=i%lt%next% fornext是循环从i=1开始，循环一次加1到pagecount为止最后我的实例里面包含了一个最简单的ASP程序，但是功能。

11、这是一个简短的分页显示的例子lt%language=quotvbscriptquotset conn=servercreateobjectquotadodbconnectionquotconnoen quotdriver=sql serverserver=huanguid=sapwd=database=testquotlt%pgsize=5 page=requestquerystringquotpagequotsql=quotselect * from test where id1=1quotrsopen sql，conn，1。

12、在gridview控件中插入PagerTemplate，附上代码ltPagerTemplate 当前第ltaspLabel ID=quotLabelCurrentPagequot runat=quotserverquot Text=quotlt%# GridViewContainerNamingContainerPageIndex + 1 %quotltaspLabel 页共ltaspLabel ID=quotLabelPageCountquot runat=quotserverquot Text=quotlt%# GridViewContainer。

13、在创建4个 lable意思已经加入到句子中 自己看哈共 labcount 页 当前页labnowpagetext=1 lblRecordCount1 隐藏 lblPageCount1 隐藏 下面的代码 是写在public partial class _Default 里面的 ~~ 不是pageload里 需要修改的地方是所有连接数据库的地方， 库，表，甚至。

14、记录集名为rs，粘贴上就能用 lt rsPageSize = 2 #39每页显示记录数 Page = CLngRequestquotPagequotIf Page lt 1 Then Page = 1 If Page rsPageCount Then Page = rsPageCount i=page+page1*rsPageSize1rsAbsolutePage = Page ltform ACTION=quotlt%=Myself%？pages=。

15、楼主，主要还是玩SQL语句的使用，需要那页的几条就Top对应的 以下代码供参考lt #39每页的记录数 dim pagesize pagesize= quot30quot#39读出总记录数，总页数，作者注 dim totalrecords，totalpages sqlstr=quotselect countid as recordsum from table1quotset rs=connexecutesqlstr，0，1totalrecords=rsquot。