pg1.asp

来自「网上报名系统!用于 电脑学校(院)」· ASP 代码 · 共 31 行

	   
<%
rs.pagesize=1
pagecount=rs.pagecount
page=int(request.QueryString("page"))
if page<1 then page=1
if request.QueryString("page")="" then
page=1
end if
rs.AbsolutePage=page

%>

   <%
		if Page<>1 then
			response.write "<a href=?page=1>首页</a> "
			response.write "<a href=?page="+cstr(Page-1)+">上一页</a> "
		  else
			Response.Write "首页 上一页 "
			
		end if
		
		if Page<>pagecount then
			response.write "<a href=?page="+cstr(Page+1)+">下一页</a> "
			response.write "<a href=?page="+cstr(pagecount)+">尾页</a> "
		  else
			Response.Write "下一页 尾页 "
		end if
	%>