JScript分页技术的实现

 

< SCRIPT  LANGUAGE ="JavaScript" > ...
<!--
 var global = new Object();
 global.totalNum = 0;//总记录条数
 global.totalpage = 0;
 global.pageNumber = 1;
 global.listNum = 10;
 global.rNum = '<%=Request.QueryString("recordsNum")%>';
 if (!(parseInt(global.rNum)>0))
  global.rNum = 0;
 function prePage()...{//上页
  global.rNum = parseInt(global.rNum) - global.listNum;
  if (global.rNum < 0)
   global.rNum = 0;
  window.location.href="stu_admin.asp?recordsNum=" + global.rNum;
 }
 function nextPage()...{//下页 
  global.rNum = parseInt(global.rNum) + global.listNum;
  window.location.href="stu_admin.asp?recordsNum=" + global.rNum;
 }
 function lastPage()...{//尾页
  global.rNum = (global.totalPage - 1) * global.listNum;
  window.location.href="stu_admin.asp?recordsNum=" + global.rNum;
 }
 function firstPage()...{//守业
  window.location.href="stu_admin.asp";
 }
//-->
</ SCRIPT >
<!-- #include file="conn.asp" -->
<% ...
 dim curNum,totalNum
 curNum = Request.QueryString("recordsNum")
 curNum = curNum + 0
 objComm.CommandText = "select COUNT(*) AS A from userstu"
 set objRS = objComm.Execute
 totalNum = objRS("A")
 objComm.CommandText = "select * from userstu"
 set objRS = objComm.Execute
 objRS.Move curNum
%>
< SCRIPT  LANGUAGE ="JavaScript" > ...
<!--
 global.totalNum = '<%=totalNum%>'; 
 global.totalPage = parseInt(global.totalNum/global.listNum);
 if (global.totalNum%global.listNum != 0)
  global.totalPage ++ ;

//-->
</ SCRIPT >
< link  type ="text/css"  rel ="stylesheet"  href ="style.css"   />
< style  type ="text/css" > ...
<!--
body {...}{
 margin-left: 10px;
}
.STYLE2 {...}{color: #000000}
-->



</ style >< table  width ="850"  height ="15"  border ="0"  cellpadding ="0"  cellspacing ="0" >
   < tr >
     < td  width ="373" >< form  id ="form1"  name ="form1"  method ="post"  action ="" >
      请输入关键字:
       < input  type ="text"  name ="textfield"   />
       < select  name ="select" >
         < option > 姓名 </ option >
         < option > 学号 </ option >
         < option > 系别 </ option >
       </ select >
        &nbsp; < input  type ="submit"  name ="Submit"  value ="搜索"   />
     </ form >     
     </ td >
     < td  width ="309"  align ="right" >< a  href ="stu_admin.asp"  target ="_self" > 【查看记录】 </ a >< a  href ="stu_add.asp"  target ="_self" > 【添加记录】 </ a ></ td >
   </ tr >
   < tr >< td  colspan ="2" >< hr  color ="#999999"  size ="0"   /></ td ></ tr >
</ table >
< table  border ="0"  cellspacing ="1"  width ="600" >
< tr >< td  colspan =3  align =center >
</ td ></ tr >
</ table >
< table  align =center >
  < tr >
   < td >
     < span  style ="cursor:hand;color:#0000FF" >
    < font  onclick ='firstPage()' > 首页 </ font >
     </ span >
   </ td >
   < td >
     < span  id ='btn2'  style ="cursor:hand;color:#0000FF" >
    < font  onclick ='prePage()' > 上一页 </ font >
     </ span >
   </ td >
   < td >
     < span  id ='btn1'  style ="cursor:hand;color:#0000FF" >
    < font  onclick ='nextPage()' > 下一页 </ font >
     </ span >
   </ td >
   < td >
     < span  style ="cursor:hand;color:#0000FF" >
    < font  onclick ='lastPage()' > 尾页 </ font >
     </ span >
   </ td >
  </ tr >
</ table >
< table  border =0  cellspacing =1  bgcolor =#000000 >
< tr >
  < td  width ="100"  align ="center"  bgcolor =#33CCFF >< span  class ="STYLE2" > 姓名 </ span ></ td >
  < td  width ="100"  align ="center"  bgcolor =#33CCFF > 学号 </ td >
  < td  width ="100"  align ="center"  bgcolor =#33CCFF > 密码 </ td >
  < td  width ="200"  align ="center"  bgcolor =#33CCFF > 邮件 </ td >
  < td  width ="120"  align ="center"  bgcolor =#33CCFF > 系别 </ td >
  < td  width ="100"  align ="center"  bgcolor =#33CCFF > 分数 </ td >
  < td  width ="30"  align ="center"  bgcolor =#33CCFF > 删除 </ td >
  < td  width ="30"  align ="center"  bgcolor =#33CCFF > 修改 </ td >
   </ tr >   
<% ...
 dim i
 i = 0
 while not objRS.eof And i< 10
%>
       < tr  class ="<%=classtype%>" >
    
    
  < td  bgcolor =#ffffff > <% = objRS( " name " ) %> </ td >