<%
sql="select * from affiche order by posttime Desc"
pagesetup=10 '设定每页的显示数量
TotalPage=getPageCount(sql,pagesetup) '总页数
PageCount = cint(Request.QueryString("ToPage"))
if PageCount > TotalPage then PageCount = TotalPage
if PageCount <1 then PageCount = 1
sql=sql&" limit "&(pagecount-1)*pagesetup&","&pagesetup '跳转到指定页数
i=0
rs.Open sql,Conn,1
Do While Not RS.EOF
i=i+1
%>