怎么用ASP完成分页（一）

发表时间：2024-06-11 来源：明辉站整理相关软件相关文章人气：

[摘要]<%@ Language=VBScript %> <HTML> <HEAD> </HEAD> <BODY> <% dim currentpage '定义当前页 dim filename '文件名 Const MaxP...

<%@ Language=VBScript %>
<HTML>
<HEAD>
</HEAD>
<BODY>

<%
dim currentpage '定义当前页
dim filename '文件名
Const MaxPerPage=20 '每页显示的记录个数
dim totalnumber '记录总数
filename="showpages.asp"
totalnumber=200 '设置记录总数为200

if not isempty(request("page")) then
currentPage=cint(request("page"))
else
currentPage=1
end if
showpages totalnumber,MaxPerPage,filename
%>
</BODY>
</HTML>
<%'定义分页的函数，以totalnumber，maxperpage，filename作为函数的入口。
function showpages(totalnumber,maxperpage,filename)
dim n
if totalnumber mod maxperpage=0 then
n= totalnumber \ maxperpage
else
n= totalnumber \ maxperpage+1
end if
response.write "<form method=Post action="&filename&">"
response.write "<p align='center'>记录分页 "
if CurrentPage<2 then
response.write "<font color='999966'>首页上一页</font> "
else
response.write "<a href="&filename&"?page=1>首页</a> "
response.write "<a href="&filename&"?page="&CurrentPage-1&">上一页</a> "
end if
if n-currentpage<1 then
response.write "<font color='999966'>下一页尾页</font>"
else
response.write "<a href="&filename&"?page="&(CurrentPage+1)
response.write ">下一页</a> <a href="&filename&"?page="&n&">尾页</a>"
end if
response.write " 页次：<strong><font color=red>"&CurrentPage&"</font>/"&n&"</strong>页  "
response.write " 转到：<input type='text' name='page' size=4 maxlength=10 class=smallInput

value="&currentpage&">"
response.write "<input class=buttonface type='submit' value=' Goto ' name='cndok'></span></p></form>"

end function
%>
（出处：热点网络）

标签：怎样用ASP完成分页（一）

上一篇：动态生成gif格式的图像要注意？

下一篇：10天学会ASP.net之第10天

文章发布全站软件文章热门搜索：喜欢朋友 K歌手机酷狗电台搜索资讯首页腾讯视频爱奇艺暴风影音酷狗音乐酷我音乐影音大全软件下载软件教程电脑系统下载聊天工具办公软件杀毒教程系统工具图形图像电脑学习应用软件网络软件苹果应用注册码网站教程技术开发安卓教程其它教程您当前所在位置：网视手游站 -> 网站教程 -> 怎么用ASP完成分页（一）
怎么用ASP完成分页（一）发表时间：2024-06-11 来源：明辉站整理相关软件相关文章人气： [摘要]<%@ Language=VBScript %> <HTML> <HEAD> </HEAD> <BODY> <% dim currentpage '定义当前页 dim filename '文件名 Const MaxP... <%@ Language=VBScript %> <HTML> <HEAD> </HEAD> <BODY> <% dim currentpage '定义当前页 dim filename '文件名 Const MaxPerPage=20 '每页显示的记录个数 dim totalnumber '记录总数 filename="showpages.asp" totalnumber=200 '设置记录总数为200 if not isempty(request("page")) then currentPage=cint(request("page")) else currentPage=1 end if showpages totalnumber,MaxPerPage,filename %> </BODY> </HTML> <%'定义分页的函数，以totalnumber，maxperpage，filename作为函数的入口。 function showpages(totalnumber,maxperpage,filename) dim n if totalnumber mod maxperpage=0 then n= totalnumber \ maxperpage else n= totalnumber \ maxperpage+1 end if response.write "<form method=Post action="&filename&">" response.write "<p align='center'>记录分页 " if CurrentPage<2 then response.write "<font color='999966'>首页上一页</font> " else response.write "<a href="&filename&"?page=1>首页</a> " response.write "<a href="&filename&"?page="&CurrentPage-1&">上一页</a> " end if if n-currentpage<1 then response.write "<font color='999966'>下一页尾页</font>" else response.write "<a href="&filename&"?page="&(CurrentPage+1) response.write ">下一页</a> <a href="&filename&"?page="&n&">尾页</a>" end if response.write " 页次：<strong><font color=red>"&CurrentPage&"</font>/"&n&"</strong>页  " response.write " 转到：<input type='text' name='page' size=4 maxlength=10 class=smallInput value="&currentpage&">" response.write "<input class=buttonface type='submit' value=' Goto ' name='cndok'></span></p></form>" end function %> （出处：热点网络）标签：怎样用ASP完成分页（一）上一篇：动态生成gif格式的图像要注意？下一篇：10天学会ASP.net之第10天	推荐资讯总人气榜 1PS提示：因为图层已锁定，无法编辑图层的处理方法 2Adobe Illustrator CS5 序列号大全 3picacg苹果版怎么找不到\|picacg ios版是不是下架了介绍 4ACDsee注册码免费分享（含ACDsee18、ACDsee10等版本） 5苹果iphone自动时间不准确的多种校正方法 6眼萌app怎么色弱测试眼萌app色弱测试图文说明教程 7百度安全卫士好用么_百度安全卫士技巧说明 8PDF浏览器能看3D文件吗？PDF浏览器看3D文件图文详细教程 9Potato(马铃薯聊天)怎么注册不了\|Potato不能注册处理方法介绍 10Potato(土豆聊天)怎么换头像\|Potato app更改头像方法介绍 11ipad版office如何激活? office365激活的图文说明教程 12最新的Adobe Illustrator CS4序列号大全 1css3里如何显示圆形图片 2支付宝怎么交学费，支付宝教育缴费图文说明教程 3京东微笑面单是什么，京东微笑快递单有什么用 4高铁儿童票网上怎么买，网上买高铁儿童票具体流程 5GG广告申请 6提高谷歌联盟Adsense收入4种方法 7百度减少收录是什么原因？ 8稳定网站排名的隐秘：百度优先级算法 9百度降权并不可怕 10新手误区：揭露seo反链工具的真实面目 11我的建站经验，网站与百度关系 12浅谈增加网站外部链接的方法最新教程本月人气 110天学会ASP.net之第6天 2一个改进的UBB类 3处理在执行数据库查询中的特殊字符的问题 410天学会ASP.net之第5天 5PHP3 safe_mode 失效漏洞 6ASP编写数据库维护程序 7Session对象在各浏览器中的有效果范围 8动感首页更新完成之6 ------ 首页删除篇 9使用Indy的TIdFtp控件完成FTP协议 10动感首页更新完成之5 ------ 首页管理篇 11asp.net,xml制作广告条管理程序 12PHP+Javascript液晶时钟 1ASP调用WEBSERVICE文档 2对连串英文自动换行的处理方法 IE5.5 3使用正则表达式完成模式图片新闻.ASP 4较长数据无法在Asp页面中取出的3种处理方法 5php＋mysql扎实个人基本功 6Java咖啡馆：Java插件技术（3） 7JSP中的TagLib应用(1) 8JSP语法(2) 9每4台电脑中就有1台Win10：你升级了吗？ 10PHP输出控制技巧在简繁体转换中的应用 11老舍的原名叫什么？ 12旗舰版是什么意思？
相关文章 10天学会ASP.net之第6天一个改进的UBB类处理在执行数据库查询中的特殊字符的问题 10天学会ASP.net之第5天 PHP3 safe_mode 失效漏洞 ASP编写数据库维护程序 Session对象在各浏览器中的有效果范围动感首页更新完成之6 ------ 首页删除篇使用Indy的TIdFtp控件完成FTP协议动感首页更新完成之5 ------ 首页管理篇 asp.net,xml制作广告条管理程序 PHP+Javascript液晶时钟

怎么用ASP完成分页（一）

推荐资讯 总人气榜

最新教程 本月人气

相关文章

推荐资讯总人气榜

最新教程本月人气