|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
使用filesystemobject,可以对服务器上的文件进行操作,浏览、复制、移动、删除等。有ado的支持,asp对数据库的操作非常得心应手。你甚至可以像使用本地数据库那样,管理远程主机上的数据库,对表格、记录进行各种操作。分页|纪录集|分页|纪录集人人都晓得在Dreamwerver中能够很便利地完成纪录集的分页显现,可是天生的代码切实其实很复杂,影响了网页的显现速率,看起来层次也不是很明晰,那末,可不成以用复杂的体例完成一样的功效呢?固然能够,笔者经由过程以下一些复杂的代码就完成了纪录集的分页显现,如今拿出来人人一同分享。
次要代码以下:
<%
Ifrs1.recordcount>0Then’纪录集不为空则处置纪录
rs1.pagesize=10’设置每页显现的纪录数
num=rs1.recordcount’纪录总数
pagenum=rs1.pagecount’页总数
page=request("page")’猎取页码的原始信息
’处置页码原始信息的入手下手!
Ifpage<>""then
page=cint(page)
iferr.number<>0then
err.clear
page=1
endif
ifpage<1then
page=1
endif
else
page=1
Endif
ifpage*rs1.pagesize>numandnot((page-1)*rs1.pagesize<num)then
page=1
endif
’处置页码原始信息的停止!设置以后页码
rs1.absolutepage=page
%>
<!--判别以后页是不是是最初一页,并依据判别设置纪录的反复显现-->
<%
ifpage<>pagenumthen
lablenum=rs1.pagesize
else
lablenum=num-(page-1)*rs1.pagesize
endif
fori=1tolablenum
%>
<trbgcolor="#FFFFFF">
<tdheight="25"><divalign="center"><%=(rs1.Fields.Item("id").Value)%></div></td>
<td><divalign="center"><%=(rs1.Fields.Item("称号").Value)%></div></td>
<td><divalign="center"><%=(rs1.Fields.Item("地点").Value)%></div></td>
<td><divalign="center"><%=(rs1.Fields.Item("种别").Value)%></div></td>
<td><divalign="center"><%=(rs1.Fields.Item("最初修正").Value)%></div></td>
<td><divalign="center"><%=(rs1.Fields.Item("修正人").Value)%></div></td>
</tr>
<%
rs1.movenext
next
%>
<!--以后页的纪录显现停止,以下代码为纪录集分页链接代码-->
<tablewidth="70%"border="0"align="center"cellpadding="0"cellspacing="0">
<tr>
<tdheight="35">
<divalign="right">
<fontcolor="#333333">
共有<%=num%>个链接|
<ahref=linkadmin.asp?page=1>首页</a>|
<%ifpage>1then%><ahref=linkadmin.asp?page=<%=page-1%>><%endif%>上一页</a>|
<%ifpage<pagenumthen%><ahref=linkadmin.asp?page=<%=page+1%>><%endif%>下一页</a>|
<ahref=linkadmin.asp?page=<%=pagenum%>>尾页</a>|
页次:<%=page%>/<%=pagenum%>页|
共<%=pagenum%>页
</font>
</div>
</td>
</tr>
</table>
<!--纪录集分页链接代码停止,纪录集为空时实行以下代码-->
<%else%>
<trbgcolor="#FFFFFF">
<tdheight="25"colspan="6"><divalign="center"><%response.Write("没有了局可显现!")%>
</div></td>
</tr>
<%
endif
rs1.Close()
Setrs1=Nothing
%>
好了,很复杂吧!只需复杂地修正一下就可以拔出到你的网页显现纪录的中央了,从速尝尝吧!
</p>优点:简单易学、开发速度快、有很多年“历史”,能找到非常多别人做好的程序来用、配合activeX功能强大,很多php做不到的asp+activeX能做到,例如银行安全控件 |
|