📄 register.asp

📁 学校勤工助学管理网站功能可管理考勤计算工资并进行等级评估。

💻 ASP

字号:

<!--#INCLUDE FILE="../database/conn.asp"-->
 <html> 
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
</head>
<body>

<table width="600">
 <tr bgcolor="#A4B6D7"> 
            <td height="25">
<%
if 1=1 then
 	sql="select * from gangwei "
	Set rs= Server.CreateObject("ADODB.Recordset")
	rs.open sql,conn,1,1
 	
 
%></td>
            <td width="150">&nbsp; 
              <%
  	if rs.eof and rs.bof then
		    response.Write(" Now NO news !!</td></tr></table>")
 	else
    	totalPut=rs.recordcount
		if currentpage<1 then
       		currentpage=1
    	end if
    	if (currentpage-1)*MaxPerPage>totalput then
	   		if (totalPut mod MaxPerPage)=0 then
	     		currentpage= totalPut \ MaxPerPage
		  	else
		      	currentpage= totalPut \ MaxPerPage + 1
	   		end if

    	end if %>
		 <!--#include file=../Pub/TurnPage.asp-->
 	 <%
	Dim RowCount,lRowCount
		RowCount = 3                                                           '每页显示的记录条数		
		lRowCount=0
	Call TurnPage(Rs,RowCount)  
 %> </td><td></td>
          </tr>
        </table>
                <table class="border" border="0" cellspacing="2" width="620" cellpadding="0" style="word-break:break-all">
            <tr bgcolor="#A4B6D7" class="title"> 
             <td width="375" align="center" bgcolor="#A4B6D7" ><span  class="style">岗位</span></td>
             <td width="239" align="center" ><span  class="style">招牌数量</span></td>
                          <td width="239" align="center" ><span  class="style">工资</span></td>

           </tr>
          <%do while not rs.eof%>
          <tr class=""> 
              <td width="375" bgcolor="#ECF5FF"><a href="ganweixiugai.asp?id=<%=rs("id")%>"><%=left(rs("gangweitype"),18)%></a></td>
             <td width="239" align="center" bgcolor="#ECF5FF"><%=rs("gangweitotal")%> </td>
            <td width="239" align="center" bgcolor="#ECF5FF"><%=rs("gongzi")%> </td>
           </tr>
          <%
	  
	      rs.movenext
	       loop
end if
end if 
%>
</table>
<table>
<tr>	
<td align=right colspan=3>共有 <FONT COLOR="#0000FF"><%=Rs.recordcount%></FONT> 条纪录</td>
</tr>
</table>
<%
On Error Resume Next
	rs.Close
	Set rs = Nothing
	%>
     </body>
	</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -