最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
用ASP做一个分页程序
时间：2022-07-02 23:39:59 编辑：袖梨 来源：一聚教程网
用ASP做一个分页程序
wodeail・CPCW
你是否为了你的站点文章过多而反复做链接上一页、下一页这些烦琐的工作发愁呢？现在有了ASP，只要你的主页支持ASP，你就可以很简单的实现对文章的管理了，排序、链接、显示这些工作都让ASP去完成吧！这么轻松的主页维护，你是不是也想试一试呢？
请看以下实现ASP分页程序的代码：
dim conn
dim connstr
dim totalPut
dim CurrentPage
dim TotalPages
dim i,j
dim sql
dim rs
on error resume next
'打开数据库
connstr="DBQ="+server.mappath("book.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
set rs=server.createobject("adodb.recordset")
'定义每页文章显示数
const MaxPerPage=18
if not isempty(request("page")) then
wodeail・CPCW
你是否为了你的站点文章过多而反复做链接上一页、下一页这些烦琐的工作发愁呢？现在有了ASP，只要你的主页支持ASP，你就可以很简单的实现对文章的管理了，排序、链接、显示这些工作都让ASP去完成吧！这么轻松的主页维护，你是不是也想试一试呢？
请看以下实现ASP分页程序的代码：
dim conn
dim connstr
dim totalPut
dim CurrentPage
dim TotalPages
dim i,j
dim sql
dim rs
on error resume next
'打开数据库
connstr="DBQ="+server.mappath("book.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
set rs=server.createobject("adodb.recordset")
'定义每页文章显示数
const MaxPerPage=18
if not isempty(request("page")) then
相关文章
- 蚂蚁新村今日答案最新2024.5.16 05-17
- 2024年5月16日蚂蚁新村答案 05-17
- 蚂蚁新村2024年5月16日答案最新 05-17
- 北京传统手工艺品毛猴是用哪种花卉制作而成 蚂蚁新村今日答案2024.5.16 05-17
- 蚂蚁新村小课堂今日答案5月16日 北京传统手工艺品毛猴是用哪种花卉制作而成 05-17
- 蚂蚁新村今日答案5.16 05-17