asp初学者必看分页程序

时间：2008-08-24 编辑：简简单单来源：一聚教程网

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>

---

网站模板 | WEB

        <%dim sqlmb,page,i
  i=0
   sqlmb="select * from webmb order by id desc "
   call opendb
   rs.open sqlmb,conn,1,1
  if not rs.eof then
  page=cint(request.querystring("page"))
  if page=0 then
  page=1
  end if
    rs.pagesize=15
  if not isnumeric(page) or page<0 or page>rs.pagecount or page="" then
  rs.absolutepage=1
  else
  rs.absolutepage=page
  end if
  end if%>




          <%
   do while not rs.eof and i    i=i+1
   %>

          <% if i mod 3=0 then%>









        <% end if
    rs.movenext
   loop

   %>



" width="143" height="95" border="1" class="tomg" style="border-color:#DDDDDD; " /> <%response.write(" "&rs("mb_name"))%>

        <%end if
'end if
call closedb()%>

共<%=rs.recordcount%>条共<%=rs.pagecount%>页第<%=page%>页当前<%=i%>条
              <%'if rs.pagecount>1 then%>
              ?page=1" class="tomg1">首页 ?page=<%=rs.pagecount%>" class="tomg1">末页
              <% if page>0 then%>
              ?page=<%=page-1%>" class="tomg1">上一页
              <%end if
     if page>0 then%>
              ?page=<%=page+1%>" class="tomg1">下一页

上一个： asp利用fso生成html页面
下一个： asp fso使用实例教程

推荐专题

最新下载

热门教程

asp初学者必看分页程序

相关文章

热门栏目

php教程

asp.net教程

手机开发

css教程

网页制作

办公数码

jsp教程