📄 browsedeptlist.asp
字号:
<!--#include file="../includes/keepHouse.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>WebOffice</title>
</head>
<body>
<table border="0" width="100%" cellspacing="0" cellpadding="0" height="50">
<tr>
<td width="100%"></td>
</tr>
</table>
<center>
<%
sql="SELECT Department.DEPARTMENT, Department.DEPT_ID, Personnel.PERSONNEL_ID, " _
&"Personnel.PERSON_NAME " _
&"FROM Department INNER JOIN " _
&"Personnel ON Department.DEPT_ID = Personnel.DEPT_ID INNER JOIN " _
&"[Position] ON Personnel.POSITION_ID = [Position].POSITION_ID " _
&"WHERE (([Position].POSITION_ID = 4 OR [Position].POSITION_ID = 1) AND Personnel.FIRED=0) "
call openDB()
rs.open sql,conn,1,1
%>
<table border="0" width="75%" cellspacing="0" cellpadding="0">
<tr>
<td width="5%" bgcolor="#0000FF" height="35" align=left><img border="0" src="../images/back.gif"></td>
<td width="65%" bgcolor="#0000FF" height="35" align=center><b><font color="#FFFFFF">部门列表</font></b></td>
<td width="5%" bgcolor="#0000FF" height="35" align=right><img border="0" src="../images/Close2.gif"></td>
</tr>
</table>
<table border="1" width="75%" bordercolorlight="#C0C0C0" bordercolordark="#FFFFFF" cellspacing="0" cellpadding="0">
<tr>
<td width="25%" bgcolor="#FCFCFC">部门ID</td>
<td width="25%" bgcolor="#FCFCFC">部门名称</td>
<td width="25%" bgcolor="#FCFCFC">部门负责人</td>
</tr>
<%
while not rs.eof
response.write "<tr>"
response.write "<td width=""25%"" bgcolor=""#FCFCFC"">"&rs("DEPT_ID")&"</td>"
response.write "<td width=""25%"" bgcolor=""#FCFCFC""><a href=""BrowseOneDept.asp?DEPT_ID=" _
&rs("DEPT_ID")&"&DEPARTMENT="&rs("DEPARTMENT")&""">"&rs("DEPARTMENT")&"</a></td>"
response.write "<td width=""25%"" bgcolor=""#FCFCFC"">" _
&"<a href=""Read.asp?PERSONNEL_ID="&rs("PERSONNEL_ID")&""">"&rs("PERSON_NAME")&"</a></td>"
response.write "</tr>"
rs.movenext
wend
call closeDB()
%>
<tr>
<td height=50 colspan=3 align=center bgcolor="#EFEFEF">
[<a href="javaScript:history.back()">返回</a>]
</td>
</tr>
</table>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -