仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 634|回复: 9
打印 上一主题 下一主题

[学习教程] ASP编程:仿照PHP写的ASP分页

[复制链接]
变相怪杰 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 22:35:43 | 只看该作者 回帖奖励 |正序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
ASP.NET和ASP的比较,技术上比较已经没什么可说的了.新一代在大部分程度来说当然是比旧一代好了.关键看你对所做软件的理解了.因人而定.会写的话也可能比ASP.NET写得更有效率和更方便重用<%
分页程序
total_records总纪录数
everypage_records每页显现条数
current_page以后页数
url要传送的url,这里能够含有要传送的变量,好比"list.asp?"大概"list.asp?keyword=key&"
程序挪用对照复杂,不外仍是比PHP的贫苦,持续勉力中
subshow_page(total_records,everypage_records,current_page,url)
ifIsNumeric(total_records)then
total_records=Int(total_records)
else
total_records=0
endif

ifIsNumeric(everypage_records)then
everypage_records=Int(everypage_records)
ifeverypage_records<=0then
everypage_records=10
endif
else
everypage_records=10
endif

ifIsNumeric(current_page)then
current_page=Int(current_page)
else
current_page=1
endif

取总页数,即最初一页
iftotal_recordsmodeverypage_records=0then
last_page=Int(total_records/everypage_records)
else
last_page=Int(total_records/everypage_records)+1
endif

判别current_page是不是切合尺度,并附值给page
ifcurrent_page>=last_pagethen
page=last_page
elseifcurrent_page<=1then
page=1
else
page=current_page
endif

上一页
ifpage<=0then
prepg=0
else
prepg=page-1
endif
下一页
ifpage=last_pagethen
nextpg=0
else
nextpg=page+1
endif

本页入手下手纪录
firstcount=prepg*everypage_records
本页停止纪录
ifnextpg>=1then
lastcount=(nextpg-1)*everypage_records
else
lastcount=total_records
endif
入手下手分页导航条代码
pagenav=""
pagenav1=""
pagenav=pagenav&"显现第<b>"&firstcount&"-"&lastcount&"</b>笔记录共<b>"&total_records&"</b>笔记录"
pagenav1=pagenav1&"显现第<b>"&firstcount&"-"&lastcount&"</b>笔记录共<b>"&total_records&"</b>笔记录"

iflast_page>1then
当有前后页时
pagenav=pagenav&"<ahref="&url&"page=1>首页</a>"
pagenav1=pagenav1&"<ahref="&url&"page=1>首页</a>"
ifprepg>=1then
pagenav=pagenav&"<ahref="&url&"page="&prepg&">前页</a>"
pagenav1=pagenav1&"<ahref="&url&"page="&prepg&">前页</a>"
else
pagenav=pagenav&"前页"
pagenav1=pagenav1&"前页"
endif
ifnextpg>=1then
pagenav=pagenav&"<ahref="&url&"page="&nextpg&">后页</a>"
pagenav1=pagenav1&"<ahref="&url&"page="&nextpg&">后页</a>"
else
pagenav=pagenav&"后页"
pagenav1=pagenav1&"后页"
endif
pagenav=pagenav&"<ahref="&url&"page="&last_page&">尾页</a>"
pagenav1=pagenav1&"<ahref="&url&"page="&last_page&">尾页</a>"

pagenav=pagenav&"到第<inputtype=textname=text100id=text100value="&page&"size=3>页<inputtype=buttonname=button100value=go>"
pagenav=pagenav&"共"&last_page&"页"
pagenav1=pagenav1&"到第<inputtype=textname=text101id=text101value="&page&"size=3>页<inputtype=buttonname=button101value=go>"
pagenav1=pagenav1&"共"&last_page&"页"
endif
endsub
%>
大家可以自己去看一看.可以说看得想呕吐.以前有次下了个动网来看.里面连基本内置函数的保护措施(函数没防御性)都没有.难怪经常补这个补那个了.可能现在.NET版会好点吧
柔情似水 该用户已被删除
10#
发表于 2015-3-27 16:11:01 | 只看该作者
跟学别的语言一样,先掌握变量,流程控制语句(就是ifwhileselect)等,函数/过程,数组
活着的死人 该用户已被删除
9#
发表于 2015-3-19 08:42:27 | 只看该作者
用户端的浏览器不需要提供任何别的支持,这样大提高了用户与服务器之间的交互的速度。
变相怪杰 该用户已被删除
8#
 楼主| 发表于 2015-3-11 19:00:49 | 只看该作者
接下来就不能纸上谈兵了,最好的方法其实是实践。实践,只能算是让你掌握语言特性用的。而提倡做实际的Project也不是太好,因为你还没有熟练的能力去综合各种技术,这样只能使你自己越来越迷糊。
若天明 该用户已被删除
7#
发表于 2015-3-4 11:25:31 | 只看该作者
我想问如何掌握学习节奏(先学什么再学什么)最好详细点?
愤怒的大鸟 该用户已被删除
6#
发表于 2015-2-15 10:16:31 | 只看该作者
多看多学多思。多看一些关于ASP的书籍,一方面可以扩展知识面一方面可以鉴借别人是如何掌握、运用ASP的;多学善于关注别人,向同学老师多多学习,不论知识的大小;多思则是要将学到的知识灵活运用。
精灵巫婆 该用户已被删除
5#
发表于 2015-2-6 03:23:23 | 只看该作者
接下来就不能纸上谈兵了,最好的方法其实是实践。实践,只能算是让你掌握语言特性用的。而提倡做实际的Project也不是太好,因为你还没有熟练的能力去综合各种技术,这样只能使你自己越来越迷糊。
飘飘悠悠 该用户已被删除
地板
发表于 2015-1-29 19:01:39 来自手机 | 只看该作者
先学习用frontpage熟悉html编辑然后学习asp和vbscript建议买书进行系统学习
蒙在股里 该用户已被删除
板凳
发表于 2015-1-20 19:53:19 | 只看该作者
下载一个源代码,然后再下载一个VBScript帮助,在源代码中遇到不认识的函数或是其他什么程序,都可以查帮助进行解决,这样学习效率很高。
山那边是海 该用户已被删除
沙发
发表于 2015-1-17 15:43:46 | 只看该作者
学习ASP其实应该上升到如何学习程序设计这种境界,其实学习程序设计又是接受一种编程思想。比如ASP如何学习,你也许在以前的学习中碰到过。以下我仔细给你说几点:
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-12-23 05:35

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表