ASP编程：Access2000数据库80万纪录通用疾速分页...

ASP.NET和ASP的比较,技术上比较已经没什么可说的了.新一代在大部分程度来说当然是比旧一代好了.关键看你对所做软件的理解了.因人而定.会写的话也可能比ASP.NET写得更有效率和更方便重用access|分页|数据|数据库刚用的，不错。给人人看看
次要思绪:用一条语句统计(Count)出纪录数(而不在查询时取得RecordCount属性),缓存在Cookies中,跳转时就不必再次统计.利用ADO的AbsolutePage属性举行页面跳转便可.为便利挪用而写成类,代码次要中央已有申明

硬件情况:AMDAthlonXP2600+,256DDR
软件情况:MSWindows2000AdvancedServer+IIS5.0+Access2000+IE6.0
测试了局:初度运转在250(首页)-400(末页)毫秒,(纪录数缓存后)在页面间跳转不乱在47毫秒以下.第1页跳到最初一页未几于350毫秒

合用局限:用于一般分页.不合用于有较庞大的查询时:如前提为"[Title]Like%最爱%",查询的工夫年夜年夜增添,就算Title字段作了索引也没用.:(
<%@LANGUAGE="VBScript"CODEPAGE="936"%>
<%OptionExplicit%>
<%
DimintDateStart
intDateStart=Timer()
Rem##翻开数据库毗连
Rem#################################################################
functionf__OpenConn()
DimstrDbPath
Dimconnstr
strDbPath="../db/test.mdb"
connstr="Provider=Microsoft.Jet.OLEDB.4.0;DataSource="
connstr=connstr&Server.MapPath(strDbPath)
Setconn=Server.CreateObject("Adodb.Connection")
conn.openconnstr
Endfunction
Rem#################################################################

Rem##封闭数据库毗连
Rem#################################################################
functionf__CloseConn()
IfIsObject(conn)Then
conn.close
EndIf
Setconn=nothing
Endfunction
Rem#################################################################
Rem取得实行工夫
Rem#################################################################
functiongetTimeOver(iflag)
DimtTimeOver
Ififlag=1Then
tTimeOver=FormatNumber(Timer()-intDateStart,6,true)
getTimeOver="实行工夫:"&tTimeOver&"秒"
Else
tTimeOver=FormatNumber((Timer()-intDateStart)*1000,3,true)
getTimeOver="实行工夫:"&tTimeOver&"毫秒"
EndIf
Endfunction
Rem#################################################################
ClassCls_PageView
PrivatesbooInitState
PrivatesstrCookiesName
PrivatesstrPageUrl
PrivatesstrPageVar
PrivatesstrTableName
PrivatesstrFieldsList
PrivatesstrCondiction
PrivatesstrOrderList
PrivatesstrPrimaryKey
PrivatesintRefresh

PrivatesintRecordCount
PrivatesintPageSize
PrivatesintPageNow
PrivatesintPageMax

PrivatesobjConn

PrivatesstrPageInfo

PrivateSubClass_Initialize
CallClearVars()
EndSub

PrivateSubclass_terminate()
SetsobjConn=nothing
EndSub

PublicSubClearVars()
sbooInitState=False
sstrCookiesName=""
sstrPageUrl=""
sstrPageVar="page"
sstrTableName=""
sstrFieldsList=""
sstrCondiction=""
sstrOrderList=""
sstrPrimaryKey=""
sintRefresh=0

sintRecordCount=0
sintPageSize=0
sintPageNow=0
sintPageMax=0
EndSub

Rem##保留纪录数的Cookies变量
PublicPropertyLetstrCookiesName(Value)
sstrCookiesName=Value
EndProperty

Rem##转向地点
PublicPropertyLetstrPageUrl(Value)
sstrPageUrl=Value
EndProperty

Rem##表名
PublicPropertyLetstrTableName(Value)
sstrTableName=Value
EndProperty

Rem##字段列表
PublicPropertyLetstrFieldsList(Value)
sstrFieldsList=Value
EndProperty

Rem##查询前提
PublicPropertyLetstrCondiction(Value)
IfValue""Then
sstrCondiction="WHERE"&Value
Else
sstrCondiction=""
EndIf
EndProperty

Rem##排序字段,如:[ID]ASC,[CreateDateTime]DESC
PublicPropertyLetstrOrderList(Value)
</p>因为现在数据库都使用标准的SQL语言对数据库进行管理，所以如果是标准SQL语言，两者基本上都可以通用的。SQLServer还有更多的扩展，可以用存储过程，数据库大小无极限限制。

不能只是将它停留在纸上谈兵的程度上。

Request:从字面上讲就是“请求”，因此这个是处理客户端提交的东东的,例如Resuest.Form，Request.QueryString,或者干脆Request("变量名")

那么，ASP.Net有哪些改进呢？

最近在学asp，不要问我为什么不直接学.net，因为公司网站是asp做的所以有这个需要，卖了本书asp入门到精通，对里面的六大内置对象老是记不住，还有很多属性和方法看的头晕。

ASP主要是用好六个对象，其实最主要的是用好其中两个：response和request，就可以随心所欲地控制网页变换和响应用户动作了。

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

学习是为了用的，是为了让你的程序产生价值，把握住这个原则会比较轻松点。除此之外，课外时间一定要多参加一些社会实践活动，来锻炼自己的能力。

学习ASP其实应该上升到如何学习程序设计这种境界，其实学习程序设计又是接受一种编程思想。比如ASP如何学习，你也许在以前的学习中碰到过。以下我仔细给你说几点: