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

📄 browse.asp

📁 功能强大的网络办公系统 支持油箱管理,短消息,文件管理,考勤管理等功能
💻 ASP
字号:
<!--#include file="../includes/keepHouse.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>WebOffice</title>
<%
call insureID()
%>
</head>

<body>
<center>
<table border="0" width="100%" height="50" cellspacing="0" cellpadding="0">
 <tr>
  <td width="100%"></td>
 </tr>
</table>
<%
dim DEPT_ID
dim DEPARTMENT
if session("POSITION_ID")=1 then
	DEPT_ID=request("DEPT_ID")
	DEPARTMENT=request("DEPARTMENT")
	if DEPT_ID="" then
		call trigErr()
	end if
else
	DEPT_ID=session("DEPT_ID")
	DEPARTMENT=session("DEPARTMENT")
end if
sql="SELECT DeptDecision.DECISION_TITLE, DeptDecision.DEPT_ID, " _ 
	&"DeptDecision.COMPOSE_DATE, DeptDecision.CONFIRMED, DeptDecision.DECISION_ID, " _ 
	&"DeptDecision.CONFIRM_DATE, Personnel.PERSON_NAME AS PersonName " _ 
	&"FROM DeptDecision INNER JOIN Personnel " _ 
	&"ON DeptDecision.PERSONNEL_ID = Personnel.PERSONNEL_ID " _ 
	&"WHERE DeptDecision.DEPT_ID = "&DEPT_ID&" "
if session("POSITION_ID")<>4 then
	sql=sql&"AND DeptDecision.CONFIRMED=1 "
end if
call openDB()
rs.open sql,conn
%>
<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"><%=DEPARTMENT%>部门决策</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="30%">题 目</td>
<td width="20%">撰写日期/发布日期</td>
<td width="10%">有否审核</td>
<td width="15%">撰写人</td>
</tr>
<%
if rs.eof then
	response.write "<tr><td witdth=""75%"" colspan=4 bgcolor=""#FCFCFC"" align=center>"
	response.write "本还没有任何决策。"
	response.write "</td></tr>"
end if
while not rs.eof
	response.write"<tr>"
	response.write"<td width=""40%""><a href=""Read.asp?DECISION_ID="&rs("DECISION_ID")&"&action=Browse"">" _
	&rs("DECISION_TITLE")&"</a></td>"
	response.write"<td width=""30%"">"&rs("COMPOSE_DATE")&"/"
	if rs("CONFIRMED")=0 then
		response.write "无</td>"
		response.write"<td width=""10%""><font color=""#FF0000"">未审</font></td>"
		else
		response.write rs("CONFIRM_DATE")&"</td>"
		response.write"<td width=""10%"">已审</td>"
	end if
	response.write"<td width=""20%"">"&rs("PersonName")&"</td>"
	response.write"</tr>"
	rs.movenext
wend
%>
<tr>
<td width="75%" colspan=4 align=center bgcolor="#EFEFEF" height="50">
[<a href="javaScript:history.back()">返回</a>]
<%
if session("POSITION_ID")=4 then
	response.write "[<a href=""Compose.asp"">撰写新决策</a>]"
end if
%>
</td>
</tr>
</table>
</center>
</body>
</html>

⌨️ 快捷键说明

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