ASP教程之ASP分页显现之乱盖

源代码保护方面其实现在考虑得没那么多了..NET也可以反编译.ASP写得复杂的话别人能看得懂的话.他也有能力自己写了.这方面担心的倒不太多.纵观现在网上可以下载的那些所谓BBS还有什么网站等等的源代码分页|显现第一次写这类贴子：)
团体以为功效不错，完整自创，尽无剽窃，如有相同，纯属偶合！
申明：
.pagesize界说每页显现纪录数
.recordcount纪录总数
.pagecount总页数
.absolutepage以后页码（页面）
index.asp未到场任何版面计划，故有点乱。功效俺也没测试，实际上是能够完成的（除俺敲错键）。……
index.asp示例程序以下：

<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%>
<%
optionexplicit强迫请求界说变量
onerrorresumenext

dimpage界说页码变量
page=Request.QueryString("page")猎取地点栏页码
ifIsNumeric(page)then页码为整数
page=cint(page)
ifpage<1thenpage=1
else
page=1
endif

dimstrSql界说sql语句
mtest表名
file1字段（这里例出一个字段，实践中通常为多个字段）
strSql="selectfile1frommtest"

dimobjConn,strConn,objRs
setobjConn=server.CreateObject("ADODB.connection")
strConn="DRIVER={MicrosoftAccessDriver(*.mdb)};DBQ="&server.MapPath("db.mdb")
objConn.OpenstrConn
setobjRs=server.CreateObject("ADODB.recordset")
objRs.openstrSql,objConn,1,1

ifobjRs.eoforobjRs.bofthen表内的纪录情形
以下一段为实时封闭、开释资本
objRs.close
setobjRs=nothing
objConn.close
setobjConn=nothing
response.write"未无数据"
else
objRs.pagesize=20一页显现的纪录数
dimintReCun,intPaCun
intReCun=objRs.Recordcount总纪录数
intPaCun=objRs.pagecount总页数
ifpage>intPaCunthenpage=intPaCun以后页码于总页数对照
objRs.absolutepage=page

response.write"共:"&intReCun&"页以后为:"&intPaCun&"页"
dimstrFile1,i
setstrFile1=objRs("file1")创建工具（这里例出一个字段，实践中通常为多个字段）
i=1
这里应当用工具
dowhilenotobjRs.eofandi<=20此时的20为是一页显现的纪录数objRs.pagesize
response.write(strFile1&"<br>")
i=i+1
objRs.movenext下移一名
loop
以下一段为实时封闭、开释资本
objRs.close
setobjRs=nothing
objConn.close
setobjConn=nothing
setstrFile1=nothing
%>

<table>
<formaction="index.asp"method="get"name="PostTopic">
<tr>
<tdheight="18"align="center"><ahref="index.asp">第一页</a>
<ahref="index.asp?page=<%=page-1%>">上一页</a>
<inputname="page"type="text"id="page"value="<%=page%>"size="6"maxlength="4">

<inputname=cmdConfromtype=submitid="cmdConfrom"value=提交>
<ahref="index.asp?page=<%=page+1%>">下一页</a><ahref="index.asp?page=<%=intPaCun%>">最初一页</a>
</td>
</tr>
</form>
</table>
<%
endif
%></p>asp,jsp,php是web开发的三大技术,asp简单易用且有microsoft做靠山,jsp功能强大是因为有java支持,php则开源跨平台.在国内,asp应用范围最广,jsp发展势头最猛,php则处于劣势.这可能与公司的支持以及技术的培训有关.

下载一个源代码，然后再下载一个VBScript帮助，在源代码中遇到不认识的函数或是其他什么程序，都可以查帮助进行解决，这样学习效率很高。

ASP（ActiveServerPages）是Microsfot公司1996年11月推出的WEB应用程序开发技术，它既不是一种程序语言，也不是一种开发工具，而是一种技术框架，不须使用微软的产品就能编写它的代码，能产生和执行动态、交互式、高效率的站占服务器的应用程序。

弱类型造成潜在的出错可能：尽管弱数据类型的编程语言使用起来回方便一些，但相对于它所造成的出错几率是远远得不偿失的。

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

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

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

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

Application:这个存储服务端的数据，如果不清除，会直到web应用程序结束才清除(例如重启站点)

掌握asp的特性而且一定要知道为什么。