asp信息查询系统_论文天下网

bsp; if (totalPut mod MaxPerPage)=0 then
      currentpage= totalPut \ MaxPerPage
    else
       currentpage= totalPut \ MaxPerPage + 1
    end if

end if
 if currentPage=1 then
 showpages
 showContent
 showpages
 else
 if (currentPage-1)*MaxPerPage<totalPut then
 rs.move (currentPage-1)*MaxPerPage
 dim bookmark
 bookmark=rs.bookmark
 showpages
 showContent
 showpages
 else
 currentPage=1
 showpages
 showContent
 showpages
 end if
 end if
 rs.close
 end if

 set rs=nothing
 conn.close
 set conn=nothing

sub showContent
 dim i
 i=0

%>
 <table border="1" cellspacing="0" width="90%" bgcolor="#F0F8FF" bordercolorlight="#000000"
bordercolordark="#FFFFFF" align="center">
 <tr>
 <td width="12%" align="center">ID 号</td>
 <td width="13%" align="center">类型</td>
 <td width="47%" align="center">信息名称</td>
&n

首页上一页 2 3 4 5 6 7 8 下一页尾页 5/17/17

asp信息查询系统(五)