ASP应用范例-分页_代码部分

<% dim Conn,RS,sqlStr,PageSize,RowCount,TotalPages,PageNo,Position,PageBegin,PageEnd

<% dim Conn,RS,sqlStr,PageSize,RowCount,TotalPages,PageNo,Position,PageBegin,PageEnd

<% set conn=server.createobject("adodb.connection") conn.open("DRIVER=Driver do Microsoft Access

<% '****************************************************************** '** 本程序名："无限流"分页程序 '** 作者：

一篇文章如字数太多，则用1,2,3.... 分成多页，便于用户浏览。 <% set recordset1=

<% '****************************************************************** '** 本程序名："无限流"分页程序 '** 作者：

<%@ language = "vbscript" codepage = 936%> <% option explicit '强制定义变量 dim idcount'记录总数 dim

使用asp作东西已经比较多了，但是一直没有注意这个东西，今天就花了一点时间写了一些，方便以后使用。 <%SUB ListPageMenu(objRs,intrsPageSize) Di

页：1 / 2 | 记录：1 - 10 / 11 商品代码 商品名称 型号规格 计量单位 参考进价 参考售价 备注

<% '===================================================================== 'XDOWNPAGE ASP版本 '版本