仓酷云

标题: ASP网站制作之函数型显示翻页毗连 [打印本页]

作者: 小女巫 时间: 2015-2-3 23:43
标题: ASP网站制作之函数型显示翻页毗连
Access是一种桌面数据库，只适合数据量少的应用，在处理少量数据和单机访问的数据库时是很好的，效率也很高。但是它的同时访问客户端不能多于4个。access数据库有一定的极限，如果数据达到100M左右，很容易造成服务器iis假死，或者消耗掉服务器的内存导致服务器崩溃。翻页|函数|显示|翻页|函数这个法式将显示翻页毗连功效独自抽出，而不触及其它操作，可内置翻页后果，便利天真。

pagehanshu.asp
<%
'设置页码及URL
'value1 翻页地址
'value2 page的值
'value3 地址标签 eg:第一页、下一页
'value4 依据vaule1而定
'假如 value1 = "page.asp" 时，value4 = 1; value1 = "page.asp?id=1" 时，value4 = 0;

function page_url(value1,value2,value3,value4)
dim result
dim val
if value4 = 1 then
val = "?"
else
val = "&"
end if
result = "<a href=" & value1 & val & "page=" & value2 & ">" & value3 & "</a>"
page_url = result
end function

'获得翻页的page参数即为以后页
function page_request()
dim page

page = request("page")
if ( page <> "" and IsNumeric(page) = false ) or page = "" then
page = 1
end if
page_request = page
end function

'设置最经常使用的翻页形式，恣意添加和修正
'第一种后果写的有点繁琐
'n为总页数
function pagemode1(value1,value2)
dim out

val1 = value1
val4 = value2
page = page_request()
page = CInt(page)

val2_1 = 1
val2_2 = page - 1
val2_3 = page + 1
val2_4 = n

val3_1 = "第一页"
val3_2 = "上一页"
val3_3 = "下一页"
val3_4 = "最初页"

if page = 1 then
out1 = val3_1
out2 = val3_2
else
out1 = page_url(val1,val2_1,val3_1,val4)
out2 = page_url(val1,val2_2,val3_2,val4)
end if

if page = n then
out3 = val3_3
out4 = val3_4
else
out3 = page_url(val1,val2_3,val3_3,val4)
out4 = page_url(val1,val2_4,val3_4,val4)
end if

out = out1 & "  " & out2 & "  " & out3 & "  " & out4

pagemode1 = out
end function

'第二种后果
'n 为总页数
function pagemode2(value1,value2)
dim out
val1 = value1
val4 = value2

for i = 1 to n
val2 = i
val3 = "第" & i & "页"
out = out & page_url(val1,val2,val3,val4) & "  "
next

pagemode2 = out
end function
%>

利用举例（借用一下SunLine伴侣的法式）

<%

sql="……………………"
rs.open sql,conn,1,1 '毗连表
rs.pagesize=10 '这是每页显示几笔记录10代表是10条
n = rs.pagecount '获得总页数

page=page_request() '获得页码值
rs.AbsolutePage=page
%>

接上去将上面的代码放到需求的地位，用于显示翻页链接：
<%
out = pagemode1("page.asp",1)
'or
out = pagemode1("page.asp?id=1",0)
'or
out = pagemode2("page.asp",1)

response.write out
%>

呵呵，这个法式没有甚么新器材，也没经由任何运算速度测试和功能优化，地道是为了用起来便利，请人人多提定见，让我改善。
</p>  由于ASP提供的是一对多的服务，所以用户的一些特殊需求很难得到满足。

作者: 小魔女 时间: 2015-2-4 06:08
从事这个行业，那么你可以学ASP语言，简单快速上手，熟练dreamweav排版，写asp代码，熟练photoshop处理图片，打好基础就行了

作者: 因胸联盟 时间: 2015-2-9 17:05
ASP.Net摆脱了以前ASP使用脚本语言来编程的缺点，理论上可以使用任何编程语言包括C++,VB,JS等等，当然，最合适的编程语言还是MS为.NetFrmaework专门推出的C(读csharp)，它可以看作是VC和Java的混合体吧。

作者: 精灵巫婆 时间: 2015-2-9 22:34
我就感觉到ASP和一些常用的数据库编程以及软件工程方面的思想是非常重要的。我现在也在尝试自己做网页，这其中就用到了ASP，我想它的作用是可想而知的。

作者: 谁可相欹 时间: 2015-2-28 02:46
多看多学多思。多看一些关于ASP的书籍，一方面可以扩展知识面一方面可以鉴借别人是如何掌握、运用ASP的;多学善于关注别人，向同学老师多多学习，不论知识的大小;多思则是要将学到的知识灵活运用。

作者: 飘灵儿 时间: 2015-3-6 04:48
跟学别的语言一样，先掌握变量，流程控制语句(就是ifwhileselect)等，函数/过程，数组

作者: 小女巫 时间: 2015-3-12 20:45
你可以通过继承已有的对象最大限度保护你以前的投资。并且C#和C++、Java一样提供了完善的调试/纠错体系。

作者: 老尸 时间: 2015-3-13 04:25
尽管MS自己讲C#内核中更多的象VC，但实际上我还是认为它和Java更象一些吧。首先它是面向对象的编程语言，而不是一种脚本，所以它具有面向对象编程语言的一切特性，比如封装性、继承性、多态性等等，这就解决了刚才谈到的ASP的那些弱点。

作者: 灵魂腐蚀 时间: 2015-3-20 12:44
代码的可重用性差：由于是面向结构的编程方式，并且混合html，所以可能页面原型修改一点，整个程序都需要修改，更别提代码重用了。

作者: 蒙在股里 时间: 2015-4-1 03:27
Response:从字面上讲是“响应”，因此这个是服务端向客户端发送东西的，例如Response.Write

作者: 深爱那片海 时间: 2015-4-12 17:04
掌握asp的特性而且一定要知道为什么。

作者: 透明 时间: 2015-4-15 20:22
兴趣爱好，那么你无须学编程，申请一个域名和空间，在网上下载一些免费开源的CMS系统，你不用改代码，只须熟悉它们的后台操作，像office一样简单方便，很快就能建一个站点，很多站长都是这样做的

作者: 莫相离 时间: 2015-4-16 05:36
先学习用frontpage熟悉html编辑然后学习asp和vbscript建议买书进行系统学习

作者: 再现理想 时间: 2015-4-21 21:11
他的语法和设计思路和VB完全相同，导致很多ASP的书都留一句“相关内容请参考VB的相关教材....”更糟糕的是，相当多的ASP教程混合了Javascript,VBscript等等脚本语言，搞的初学者。

作者: 愤怒的大鸟 时间: 2015-4-26 20:25
在平时的学习过程中要注意现学现用，注重运用，在掌握了一定的基础知识后，我们可以尝试做一些网页，也许在开始的时候我们可能会遇到很多问题，比如说如何很好的构建基本框架。

作者: 不帅 时间: 2015-5-10 15:51
哪些内置对象是可以跳过的，或者哪些属性和方法是用不到的?

作者: admin 时间: 2015-6-5 22:09
还有如何才能在最短的时间内学完?我每天可以有效学习2小时，双休日4小时。

作者: 变相怪杰 时间: 2015-6-23 05:33
ASP.Net和ASP的最大区别在于编程思维的转换，而不仅仅在于功能的增强。ASP使用VBS/JS这样的脚本语言混合html来编程，而那些脚本语言属于弱类型、面向结构的编程语言，而非面向对象，这就明显产生以下几个问题：

作者: 只想知道 时间: 2015-7-12 09:55
学习ASP其实应该上升到如何学习程序设计这种境界，其实学习程序设计又是接受一种编程思想。比如ASP如何学习，你也许在以前的学习中碰到过。以下我仔细给你说几点:

欢迎光临仓酷云 (http://ckuyun.com/)