小妖女 发表于 2015-1-16 22:32:37

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!
想法是和程序员的想法不一样的.至于为什么.大家去想一想.跟心理学有关的

爱飞 发表于 2015-1-19 16:22:54

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

变相怪杰 发表于 2015-1-25 20:08:47

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

精灵巫婆 发表于 2015-2-3 20:01:29

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

谁可相欹 发表于 2015-2-9 05:01:49

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

老尸 发表于 2015-2-27 00:04:22

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

若相依 发表于 2015-3-8 18:47:28

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

活着的死人 发表于 2015-3-16 11:37:16

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

莫相离 发表于 2015-3-22 22:49:04

封装性使得代码逻辑清晰,易于管理,并且应用到ASP.Net上就可以使业务逻辑和Html页面分离,这样无论页面原型如何改变,业务逻辑代码都不必做任何改动;继承性和多态性使得代码的可重用性大大提高。
页: [1]
查看完整版本: ASP网页设计用RecordSet完成分页(by Daniel Adrian...