div 分页

<html>
<head>
 <meta http-epuiv="Content-Type" content="text/html;charset=gb2312" />
  <title>落落学习网</title>
  <link type="text/css" rel="stylesheet" href="style/style.css">
</head>
<body id="container">
<!--#include file="conn.asp"-->
<!--#include file="top.asp"-->
<div id="fla">
   <object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0" width="1003" height="206" title="flash">
        <param name="movie" value="Flash/ff1.swf">
        <param name="quality" value="high">
        <embed src="Flash/ff1.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="1003" height="206"></embed>
      </object>   
 </div>

<div id="main">
   <ul id="xwzx_left">
       <div id="gsjj_top"><img src="images/t1.jpg" width="210px" height="40px" /></div>
    <div class="gsjj_left1"><a href="news.asp"新闻中心>新闻中心</a></div> 
    <div class="gsjj_left1"><a href="news1.asp?tea_arttype=公司新闻">公司新闻</a></div> 
    <div class="gsjj_left1"><a href="intro.asp?lx=企业风采">行业新闻</a></div> 
    <div class="gsjj_left1"><a href="intro.asp?lx=支付方式">发货通知</a></div> 
    <div><img src="images/loginbtm.jpg" width="210" height="16" /></div>
 
   <div id="xwzx_fla1">
         <object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0" width="202" height="173">
                       <param name="movie" value="Flash/jiameig.swf">
                       <param name="quality" value="high">
                       <embed src="Flash/jiameig.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="202" height="173"></embed>
            </object>
       </div>
    </ul>
 
  <ul id="gsjj_con">
    <div id="gsjj_bt1">关于 -&gt;<%=request("tea_arttype")%></div>
   
      <%set rs=server.CreateObject("adodb.recordset")
     tea_arttype=request("tea_arttype")
     if tea_arttype="" then
         sql="select * from tea_data order by id desc"
      else
      sql="select * from tea_data where tea_arttype='"+tea_arttype+"' order by id desc"
      end if
      rs.open sql,conn,1,1
     
      if rs.bof and rs.eof then
         response.Write "暂无新闻"
    else
   %>
   <div id ="xwzx_2">
       <%dim curpage,j
    if request("page")="" then
       curpage = 1
   else
       curpage = cint(request("page"))
   end if
   rs.pagesize=17
   rs.absolutepage=curpage
   
   for j = 1 to rs.pagesize
    %>
    <div id="xwzx_21">
       <ul class="xwzx_tp"> <img src="images/bot.jpg" width="9" height="9" />&nbsp;&nbsp;<a href="show.asp?id=<%=rs("id")%>" target="_blank"><%=rs("tea_topic")%></a></ul>
    <ul class="xwzx_sj"> <%=rs("tea_time")%></ul>
    <%if (j mod 1 )=0 then response.write "</div>"
            rs.movenext
        if rs.eof then
        j=j+1
        exit for
        end if
               next
      %>
     
      <div id="xwzx_db">
         <form action="" method="post">
           <%
response.write "<center>"            
response.write "第<font color=red>" + cstr(curpage) + "</font>页/总" + cstr(rs.pagecount) + "页 "            
response.write "每页显示"&rs.pagesize&"个,总共有" + cstr(rs.recordcount) + "条信息&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;"            
if curpage = 1 then             
 response.write "首页 前页 "            
else            
 response.write "<a href='" & request.ServerVariables("script_name") & "?lx=" & request("lx") & "&page=1'>首页</a> <a href='" & request.ServerVariables("script_name") & "?lx=" & request("lx") & "&page=" + cstr(curpage-1) + "'>前页</a> "            
end if
  
if  curpage = rs.pagecount then            
 response.write "后页 末页"            
else            
 response.write "<a href='" & request.ServerVariables("script_name") & "?lx=" & request("lx") & "&page=" + cstr(curpage+1) + "'>后页</a> <a href='" & request.ServerVariables("script_name") & "?lx=" & request("lx") & "&page=" + cstr(rs.pagecount) + "'>末页</a>"            

end if
end if %>
                      转:
                      <select name='page' size='1' onchange='javascript:submit()' class="text1" >
                        <%for i = 1 to cint(rs.pagecount)%>
                        <option value='<%=i%>' <%if cint(request("page"))=cint(i) then%> selected="selected" <%end if%>>第<%=i%>页</option>
                        <%next%>
                      </select>
                    </form>
 </div>
                  <%rs.close
      set rs=nothing%>
 
    </div>
  </ul>
</div>
<!--#include file="bottom.asp"-->

</body>
</html>

#xwzx_21 {
 
  height:27px;
  background:url("../images/xuxian.gif");
   border-bottom:dashed 1px #ababab;
  padding-top:10px;

#xwzx_2 {
    680px;
   margin-top:20px;
   padding-left:20px;
}
.xwzx_tp {
   86%;
   float:left;
}
.xwzx_tp a {
   text-decoration:none;
   color:#333333;
}
.xwzx_sj {
   float:left;
   text-align:right;
}
#xwzx_db {
   margin-top:50px;
   margin-left:100px;
}

原文地址:https://www.cnblogs.com/aimyfly/p/2307219.html