📄 depmanage.asp
字号:
<!--#include file="Conn.ASP"--><!--#include file="chkuser.asp" --><!--#include file=../include/config.asp -->
<%
IF request.cookies("KEY")<>"super" THEN
response.redirect "index_face.asp"
response.end
END IF
%>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href=site.css rel=stylesheet>
<title><%=copyright%><%=version%> <%=ver%> - 部门管理</title>
</head>
<body topmargin="0"><!--#include file=top.asp--><br>
<center>
<table border="1" width="750" cellspacing="0" cellpadding="0" style="border-collapse: collapse" bordercolor="<%=border%>">
<tr>
<td colspan="4" width="100%" align="center" valign="middle" height="24" bgcolor="<%=m_top%>"><b>
部 门 管 理</b> </td>
</tr>
<%dim deptype
deptype=request("deptype")
Set rs6 = Server.CreateObject("ADODB.Recordset")
if deptype="" then
sql6 ="SELECT * From dep order by ID"
else
sql6 ="SELECT * From dep where deptype="&deptype&" order by ID"
end if
RS6.open sql6,Conn,3,3
%>
<tr align="center" bgcolor="<%=m_top%>">
<td width="3%">原序</td>
<td width="14%">部门名称</td>
<td width="6%">类型</td>
<td width="10%">执 行</td>
</tr>
<%
do while not rs6.eof
%>
<tr>
<td width="3%" align="center" bgcolor="#FFFFFF"><%=rs6("ID")%></td>
<td width="14%" align="center" bgcolor="#FFFFFF"><%=rs6("depname")%></span></td>
<td width="6%" align="center" bgcolor="#FFFFFF"><%if rs6("deptype")="1" then%><a href=depmanage.asp?deptype=<%=rs6("deptype")%>>行政单位</a><%end if%>
<%if rs6("deptype")="2" then%><a href=depmanage.asp?deptype=<%=rs6("deptype")%>>中学</a><%end if%><%if rs6("deptype")="3" then%><a href=depmanage.asp?deptype=<%=rs6("deptype")%>>小学</a><%end if%>
<%if rs6("deptype")="4" then%><a href=depmanage.asp?deptype=<%=rs6("deptype")%>>幼儿园</a><%end if%><%if rs6("deptype")="5" then%><a href=depmanage.asp?deptype=<%=rs6("deptype")%>>其它</a><%end if%></td>
<td width="10%" bgcolor="#FFFFFF" align="center"><a href="depedit.asp?ID=<%=rs6("ID")%>&depName=<%=rs6("depName")%>" onMouseOver="window.status='编辑部门“<%=rs6("depName")%>”的属性';return true;" onMouseOut="window.status='';return true;" title='编辑部门“<%=rs6("depName")%>”的属性'>编辑</a> <a href="depkill.asp?ID=<%=rs6("ID")%>&depName=<%=rs6("depName")%>" onMouseOver="window.status='删除部门“<%=rs6("depName")%>”';return true;" onMouseOut="window.status='';return true;" title='删除部门“<%=rs6("depname")%>”'>删除</a></td>
</form>
</tr>
<%
RS6.MoveNext
Loop
rs6.close
set rs6=nothing
%>
<tr>
<td colspan="4" height="40" align="center" width="100%" bgcolor="#FFFFFF"> </td>
</tr>
<tr>
<form method="post" action="depadd.asp" name="type">
<td align="center" colspan="4" width="100%" bgcolor="<%=m_top%>" height="34">
增加部门：
<input class=text type="text" name="depname" size="15" style="font-family: 宋体; font-size: 9pt" onMouseOver="window.status='在这里输入要增加的部门名称';return true;" onMouseOut="window.status='';return true;" title="在这里输入要增加的部门名称">
部门类型： <select size="1" name="deptype" style="font-family: 宋体; font-size: 9pt">
<option value="1">行政单位</option>
<option value="2">中学</option>
<option value="3">小学</option>
<option value="4">幼儿园</option>
<option value="5">其他</option>
</select> <input type="submit" name="Submit" value="添加" style="font-family: 宋体; font-size: 9pt" title="按这个按钮添加这个部门" onMouseOver="window.status='按这个按钮重新添加小类';return true;" onMouseOut="window.status='';return true;">
<input type="reset" value="重写" name="B1" style="font-family: 宋体; font-size: 9pt" title="按这个按钮重新添加部门" onMouseOver="window.status='按这个按钮重新添加部门';return true;" onMouseOut="window.status='';return true;">
</td>
</form>
</tr>
</table>
</center>
</body>
</html>
<%conn.close
set conn=nothing%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -