最新下载
热门教程
- 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
相关文章
- 华为P40如何关闭应用自启动 04-16
- 腾讯视频网官网正版入口在哪 04-16
- 多邻国怎么添加一门语言 04-16
- 百度贴吧怎么查看浏览记录 04-16
- 如何进入木疙瘩官网 04-16
- Boss直聘如何在线修改简历 04-16