zoukankan      html  css  js  c++  java
  • 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;
    }

  • 相关阅读:
    一些常用编程经验
    “一键GHOST”系统备份与还原(icmzn)
    office2010安装不成功提示缺少MSXML 6.10.1129.0?
    python 的几种启动方式
    win7 环境安装Python + IDE(vs2010)开发
    U盘单个文件最大4G限制问题
    第一百零三节,JavaScript对象和数组
    第一百零二节,JavaScript函数
    第一百零一节,JavaScript流程控制语句
    第一百节,JavaScript表达式中的运算符
  • 原文地址:https://www.cnblogs.com/aimyfly/p/2307219.html
Copyright © 2011-2022 走看看