日期:2014-05-17  浏览次数:20961 次

请帮忙把这段代码弄个翻页``
<style   type= "text/css ">
<!--
a:link{text-decoration:none;color:green};
a:visited{text-decoration:none;color:000000};
-->
</style>
<title> ===学生列表=== </title> <body   bgcolor= "d9e9ee "> <div   align= "center ">
  <!--#include   file= "../conn.asp "-->
  <%   set   rs=server.CreateObject( "adodb.recordset ")
  sql= "select*from   stu   order   by   stu_depa "
  rs.open   sql,conn,1,3%>
    <table   width= "643 "   height= "101 "   border= "0 "   cellpadding= "0 "   cellspacing= "1 "   bgcolor= "#000000 ">
        <tr   bgcolor= "d9e9ee ">  
            <td   height= "31 "   colspan= "5 "> <div   align= "center "> <strong> <font   color= "#FF0000 "> 学 生 列 表 </font> </strong> </div> </td>
        </tr>
        <tr   bgcolor= "#FFFFFF ">  
            <td   width= "127 "   height= "23 "> <div   align= "center "> <font   color= "#0000FF "   size= "2 "> 学生证号 </font> </div> </td>
            <td   width= "83 "> <div   align= "center "> <font   color= "#0000FF "   size= "2 "> 学生姓名 </font> </div> </td>
            <td   width= "143 "> <div   align= "center "> <font   color= "#0000FF "   size= "2 "> 所在系别 </font> </div> </td>
            <td   width= "142 "> <div   align= "center "> <font   color= "#0000FF "   size= "2 "> 所在年级 </font> </div> </td>
            <td   width= "142 "> <div   align= "center "> <font   color= "#0000FF "   size= "2 "> 删除学生 </font> </div> </td>
        </tr>
        <%   do   while   not   rs.eof   %>
        <tr   bgcolor= "#FFFFFF ">  
            <td> <div   align= "center "> <font   size= "2 "> <%=rs( "stu_card ")%> </font> </div> </td>
            <td> <div   align= "center "> <font   size= "2 "> <%=rs( "stu_name ")%> </font> </div> </td>
            <td> <div   align= "center "> <font   size= "2 "> <%=rs( "stu_depa ")%> </font> </div> </td>
            <td> <div   align= "center "> <font   size= "2 ">