📄 adweb.asp

📁 一个小型ASP做的工资管理系统,这也是别人做的,我觉得他很地干静.
💻 ASP
📖 第 1 页 / 共 2 页
字号:
上一页 12
              </tr>
            </table>
        </div>
            <br>
        </td>
      </tr>
    </table>
	<table cellspacing="0" cellpadding="0" width="145" align="center">
      <tr>
        <td class="menu_title" id="menuTitle1" onMouseOver="this.className='menu_title2';" onClick="showsubmenu(5)" onMouseOut="this.className='menu_title';" style="cursor:hand" background="menu/admin_left_8.gif" height="25"><span>员工管理</span> </td>
      </tr>
      <tr>
        <td id="submenu5" style="DISPLAY: none"><div class="sec_menu" style="WIDTH: 145px">
            <table cellspacing="0" cellpadding="0" width="135" align="center">
              <tr>
                <td height="19"><a href="config.asp?menu=shen" target="main">1.注册审核</a></td>
              </tr>
              <tr>
                <td height="19"><a href="config.asp?menu=adduser" target="main">2.添加员工</a></td>
              </tr>
              <tr>
                <td height="19"><a href="config.asp?menu=list" target="main">3.所有员工信息</a></td>
              </tr>
              <tr>
                <td height="19"><a href="config.asp?menu=zhiwei2" target="main">4.在职员工列表</a></td>
              </tr>
              <tr>
                <td height="19"><a href="config.asp?menu=qiandao" target="main">5.员工签到信息</a></td>
              </tr>
            </table>
        </div>
            <br>
        </td>
      </tr>
    </table>
	<table cellspacing="0" cellpadding="0" width="145" align="center">
      <tr>
        <td class="menu_title" id="menuTitle1" onMouseOver="this.className='menu_title2';" onClick="showsubmenu(3)" onMouseOut="this.className='menu_title';" style="cursor:hand" background="menu/admin_left_4.gif" height="25"><span>资薪管理</span> </td>
      </tr>
      <tr>
        <td id="submenu3" style="DISPLAY: none"><div class="sec_menu" style="WIDTH: 145px">
            <table cellspacing="0" cellpadding="0" width="135" align="center">
              <tr>
                <td height="19"><a href="config.asp?menu=zhiwei" target="main">1.设置职位薪资</a></td>
              </tr>
              <tr>
                <td height="19"><a href="config.asp?menu=addjie" target="main">2.添加结算工资</a></td>
              </tr>
			  <tr>
                <td height="19"><a href="config.asp?menu=jiesuan" target="main">3.查看结算管理</a></td>
              </tr>
			  <tr>
                <td height="19"><a href="config.asp?menu=xianjin" target="main">4.现金提取清单</a></td>
              </tr>
			  <tr>
                <td height="19"><a href="config.asp?menu=yue" target="main">5.管理员月结操作</a></td>
              </tr>
            </table>
        </div>
            <br>
        </td>
      </tr>
    </table>
	<table cellspacing="0" cellpadding="0" width="145" align="center">
      <tr>
        <td class="menu_title" id="menuTitle1" onMouseOver="this.className='menu_title2';" onClick="showsubmenu(4)" onMouseOut="this.className='menu_title';" style="cursor:hand" background="menu/admin_left_6.gif" height="25"><span>公告管理</span> </td>
      </tr>
      <tr>
        <td id="submenu4" style="DISPLAY: none"><div class="sec_menu" style="WIDTH: 145px">
            <table cellspacing="0" cellpadding="0" width="135" align="center">
              <tr>
                <td height="20"><a href="config.asp?menu=gonggao" target="main">1.添加公告</a></td>
              </tr>
              <tr>
                <td height="20"><a href="config.asp?menu=glist" target="main">2.公告管理</a></td>
              </tr>
            </table>
        </div>
            <br>
        </td>
      </tr>
    </table>
	<table cellspacing="0" cellpadding="0" width="145" align="center">
      <tr>
        <td class="menu_title" id="menuTitle1" onMouseOver="this.className='menu_title2';" onClick="showsubmenu(6)" onMouseOut="this.className='menu_title';" style="cursor:hand" background="menu/admin_left_7.gif" height="25"><span>留言管理</span> </td>
      </tr>
      <tr>
        <td id="submenu6" style="DISPLAY: none"><div class="sec_menu" style="WIDTH: 145px">
            <table cellspacing="0" cellpadding="0" width="135" align="center">
			 <tr>
                <td height="19"><a href="config.asp?menu=gbook" target="main">1.查看我的留言</a></td>
              </tr>
              <tr>
                <td height="19"><a href="config.asp?menu=gbook2" target="main">2.发送我的留言</a></td>
              </tr>
            </table>
        </div>
            <br>
        </td>
      </tr>
    </table>
	<table cellspacing="0" cellpadding="0" width="145" align="center">
      <tr>
        <td class="menu_title" id="menuTitle1" onMouseOver="this.className='menu_title2';" onClick="showsubmenu(7)" onMouseOut="this.className='menu_title';" style="cursor:hand" background="menu/admin_left_5.gif" height="25"><span>数据库管理</span> </td>
      </tr>
      <tr>
        <td id="submenu7" style="DISPLAY: none"><div class="sec_menu" style="WIDTH: 145px">
            <table cellspacing="0" cellpadding="0" width="135" align="center">
              <tr>
                <td height="19"><a href="backup_admin.asp" target="main">1.数据库备份</a></td>
              </tr>
			  <tr>
                <td height="19"><a href="backup_admin.asp" target="main">2.数据库恢复</a></td>
              </tr>
            </table>
        </div>
            <br>
        </td>
      </tr>
    </table>
	<br>
	<table cellspacing="0" cellpadding="0" width="145" align="center">
		<tr>
			<td class="menu_title" id="menuTitle1" onMouseOver="this.className='menu_title2';" onMouseOut="this.className='menu_title';" background="menu/admin_left_9.gif" height="25">
			<span>系统信息</span> </td>
		</tr>
		<tr>
			<td>
			<div class="sec_menu" style="WIDTH: 145px">
				<table cellspacing="0" cellpadding="0" width="135" align="center">
					<tr>
						<td height="20" align="center"><span class="style1">工资管理系统</span></td>
					</tr>
				</table>
			</div>
			</td>
		</tr>
	</table><br>
</div>
<script>
function showsubmenu(sid)
{
whichEl = eval("submenu" + sid);
if (whichEl.style.display == "none")
{
eval("submenu" + sid + ".style.display=\"\";");
}
else
{
eval("submenu" + sid + ".style.display=\"none\";");
}
}
</script>
<%
end sub
sub index
%>
<table border="0" cellpadding="0" cellspacing="0" height="100%" width="100%">
	<tr>
		<td align="middle" id="frmTitle" nowrap valign="center" name="frmTitle">
		<iframe frameborder="0" id="carnoc" name="carnoc" scrolling="no" src="?menu=left" style="HEIGHT: 100%; VISIBILITY: inherit; WIDTH: 170px; Z-INDEX: 2">
		</iframe></td>
		<td class="a2" style="WIDTH: 9pt">
		<table border="0" cellpadding="0" cellspacing="0" height="100%">
			<tr>
				<td style="HEIGHT: 100%" onClick="switchSysBar()">
				<font style="FONT-SIZE: 9pt; CURSOR: default; COLOR: #ffffff">
				<br>
				<br>
				<br>
				<br>
				<br>
				<br>
				<br>
				<br>
				<br>
				<br>
				<br>
				<br>
				<br>
				<span class="navPoint" id="switchPoint" title="关闭/打开左栏">3</span><br>
				<br>
				<br>
				<br>
				<br>
				<br>
				<br>
				<br>
				屏幕切换 </td>
			</tr>
		</table>
		</td>
		<td style="WIDTH: 100%">
		<iframe frameborder="0" name="top" scrolling="no" src="?menu=top" style="HEIGHT: 4%; VISIBILITY: inherit; WIDTH: 100%; Z-INDEX: 1">
		</iframe>
		<iframe frameborder="0" id="main" name="main" scrolling="yes" src="?menu=top2" style="HEIGHT: 96%; VISIBILITY: inherit; WIDTH: 100%; Z-INDEX: 1">
		</iframe></td>
	</tr>
</table>
</center>

</html>
<%
end sub
Function IsObjInstalled(strClassString)
On Error Resume Next
IsObjInstalled = False
Err = 0
Dim xTestObj
Set xTestObj = Server.CreateObject(strClassString)
If 0 = Err Then IsObjInstalled = True
Set xTestObj = Nothing
Err = 0
End Function
%>
</body>
</html>
上一页 12
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -