<% 'db=db0l 'opendata Set rs = Server.CreateObject("ADODB.Recordset") currentpage=TRIM(request("currentpage")) if currentpage="" then currentpage=1 RS.PageSize = 14 sql = "select * from link order by num,id desc" rs.open sql,conn,3,3 rowcount=0 %> <% do until rs.eof or rowcount>=rs.pagesize rowCount = rowCount + 1 %> <%rs.movenext loop%>