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则处于劣势.这可能与公司的支持以及技术的培训有关. 掌握asp的特性而且一定要知道为什么。 Application:这个存储服务端的数据,如果不清除,会直到web应用程序结束才清除(例如重启站点) 学习是为了用的,是为了让你的程序产生价值,把握住这个原则会比较轻松点。除此之外,课外时间一定要多参加一些社会实践活动,来锻炼自己的能力。 不能只是将它停留在纸上谈兵的程度上。 兴趣爱好,那么你无须学编程,申请一个域名和空间,在网上下载一些免费开源的CMS系统,你不用改代码,只须熟悉它们的后台操作,像office一样简单方便,很快就能建一个站点,很多站长都是这样做的 如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质,我们可以在实践中不断提升自己,不断充实自己。 弱类型造成潜在的出错可能:尽管弱数据类型的编程语言使用起来回方便一些,但相对于它所造成的出错几率是远远得不偿失的。 ASP(ActiveServerPages)是Microsfot公司1996年11月推出的WEB应用程序开发技术,它既不是一种程序语言,也不是一种开发工具,而是一种技术框架,不须使用微软的产品就能编写它的代码,能产生和执行动态、交互式、高效率的站占服务器的应用程序。 下载一个源代码,然后再下载一个VBScript帮助,在源代码中遇到不认识的函数或是其他什么程序,都可以查帮助进行解决,这样学习效率很高。
页:
[1]