最新下载
热门教程
- 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
相关文章
- 迷你世界中如何重新实名认证 06-03
- SimSD让扩散语言模型支持token级推测解码加速 06-03
- 怪物猎人：荒野攻略——狩猎笛基础操作介绍 06-03
- 失控进化基地建造攻略：全流程详解与高效布局技巧 06-03
- DECK分类法：依一致性×置信度标记LLM幻觉的可检测性 06-03
- 失控进化隐藏环境寻找方法 失控进化全隐藏环境位置与探索技巧 06-03