⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 browsectrler.asp

📁 ASp+SQLServer编写的网上办公系统
💻 ASP
字号:
<!--#include file="../includes/keepHouse.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>WebOffice</title>
<%
call insureID()
if session("POSITION_ID")>=4 then
	response.redirect "Browse.asp"
end if
%>
</head>

<body>
<center>
<table border="0" width="100%" height="50" cellspacing="0" cellpadding="0">
 <tr>
  <td width="100%"></td>
 </tr>
</table>
<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="15%" bgcolor="#FCFCFC">部门号</td>
  <td width="60%" bgcolor="#FCFCFC">部门名称</td>
 </tr>
<%
sql="SELECT * FROM Department"

call openDB()
rs.open sql,conn,1,1
while not rs.eof
	if rs("DEPT_ID")=1 then
		rs.MoveNext
	else
		response.write "<tr>"
		response.write "<td width=""15%"" bgcolor=""#FCFCFC"">"
		response.write rs("DEPT_ID")&"</td>"
		response.write "<td width=""60%"" bgcolor=""#FCFCFC""><a href=""Browse.asp?DEPT_ID=" _
		&rs("DEPT_ID")&"&DEPARTMENT="&rs("DEPARTMENT")&""">"
		response.write rs("DEPARTMENT")&"</a></td>"
		response.write "</tr>"
		rs.MoveNext
	end if
wend
call closeDB()
%>
 <tr>
  <td width="75%" bgcolor="#EFEFEF" height="50" colspan=2 align=center>
  [<a href="javaScript:history.back()">返回</a>]
  </td>
 </tr>
</table>
</center>
</body>
</html>

⌨️ 快捷键说明

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