fenye.asp

来自「基于ASP的SQL小区物业管理系统课程设计」· ASP 代码 · 共 22 行

<% sub page() %>
<%
      if not IsEmpty(Request.QueryString("page")) then 
          cur_page=Cint(Request.QueryString("page"))
	      if cur_page<1 then cur_page=1
	      if cur_page>rs.pagecount then cur_page=rs.pagecount
	  else
	      cur_page=1
	  end if
	  if not rs.eof then
	     rs.AbsolutePage=cur_page
	  else 
	     cur_page=1
	  end if 
%>  
<% end sub %>

<% sub fenye() %>
<div id="fanye">
     <p align="center"><a href="<%= url %>page=<%=cstr(1)%>">首页</a>---<a href="<%= url %>page=<%=cstr(cur_page+1)%>">下一页</a>--<a href="<%= url %>page=<%=cstr(cur_page-1)%>">上一页</a>---<a href="<%= url %>page=<%=cstr(rs.pagecount)%>">末页</a>---总共<strong><%=rs.pagecount%></strong> 页---页次<%= cstr(cur_page) %>/<%= cstr(rs.pagecount) %>--记录数（<%= m %>）</p>
   </div>
<% end sub %>