ASP网页设计用RecordSet完成分页(by Daniel Adrian...

ASP在国内异常流行，因为国内大多使用的是盗版的Windows和盗版的SQLServer，而ASP＋COM＋SQLServer实际上也是一种不错的搭配，其性能也不输于PHP+MYSQL，特别是Windows系统和SQLServer都有图形界面，比APACHE和MYSQL易于维护，因此对于不重视知识产权的国家来说也是一种不错的选择。Pagingthrougharecordset
byDanielAdrian

Skilllevel:Beginner

Firstposted:Monday,October09,2000





Pagingthrougharecordset

WhenIwanttodevelopanapplicationwithalotofrecordstoshow,ImakepagessoIcaneasilynavigate
throughthedatabaseandmakethepagelookgoodandloadquickly.

Thiscanbedoneveryeasily.Shallwestart?

Takealookatthesenextlinesofcode:

IfRequest.QueryString("Page")=""Then
Page=1
Else
Page=Request.QueryString("Page")
EndIf

recordsToShow=20
n=0



TheselinesofcodearesayingifthevalueofRequest.QueryString("Page")iswithoutanyvaluethenpage
=1elsepagegetsthepagetheuserrequested.Recordstoshowisthenumberoflinesineachpage.
Nisnumberofrecordsprinted.

Nowletsputitintoaction:
objrs.PageSize=recordsToShow



(objrsisADODB.RecordsetObject)



Inpagesizewearetellingtherecordsetthateverypagewillhave20recordsbecauserecordstoshowis20.

Nowlet’spulloutsomerecords:

Dountilobjrs.EOF
ifn=recordsToShowthen
exitdo
endif
writewhatthatyouwanthere
n=n+1
loop



Nowwearewritingdateforthedatabaseandeverytimethatwearerepeatingtheloopwecheckifwedone
it20timessomewhenit’s20wewillstoptheloop.

Nowlet’swritethenavigation:

ifPage1then
Response.Write"<ahref=pagename.asp?currentPage="&currentPage-1&">"
endif
Response.Write"<<Back"

ifPage1then
Response.Write"</a>"
endif

-------------------------
ForintCount=1toobjRs.PageCount

IfintCount=1then
Response.Write"|"
EndIf

Ifcint(intCount)=cint(Page)then
Response.Write"<fontcolor=darkblue><b>"&intCount&"</b></font>|"
Else
Response.Write"<ahref=pagename.asp?currentPage="&intCount&""">"&intCount&"</a>|"
EndIf

Next
-------------------------
ifcint(page)=cint(objRs.PageCount)then
Response.Write"<ahref=pagename.asp?currentPage="&currentPage+1&">"
endif
Response.Write"Next>>"
ifcint(Page)=cint(objRs.PageCount)then
Response.Write"</a>"
endif



Firstwearecheckingifthecurrentpageisnot1soit’smorethenonesowecangoback.

Afterthisweneedtowriteallofthepagesintherecordset.
Nowweneedtocheckifwecandonext.

Thatisall!Yesit’sthateasy!
想法是和程序员的想法不一样的.至于为什么.大家去想一想.跟心理学有关的

多看多学多思。多看一些关于ASP的书籍，一方面可以扩展知识面一方面可以鉴借别人是如何掌握、运用ASP的;多学善于关注别人，向同学老师多多学习，不论知识的大小;多思则是要将学到的知识灵活运用。

完全不知道到底自己学的是什么。最后，除了教程里面说的几个例子，还是什么都不会。

ASP的语言不仅仅只是命令格式差不多，而是包含在<%%>之内的命令完全就是VB语法。虽然ASP也是做为单独的一个技术来提出的，但他就是完全继承了VB所有的功能。

我就感觉到ASP和一些常用的数据库编程以及软件工程方面的思想是非常重要的。我现在也在尝试自己做网页，这其中就用到了ASP，我想它的作用是可想而知的。

如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质，我们可以在实践中不断提升自己，不断充实自己。

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

ASP的语言不仅仅只是命令格式差不多，而是包含在<%%>之内的命令完全就是VB语法。虽然ASP也是做为单独的一个技术来提出的，但他就是完全继承了VB所有的功能。

封装性使得代码逻辑清晰，易于管理，并且应用到ASP.Net上就可以使业务逻辑和Html页面分离，这样无论页面原型如何改变，业务逻辑代码都不必做任何改动；继承性和多态性使得代码的可重用性大大提高。