📄 browse.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>
<table border="0" width="100%" height="50" cellspacing="0" cellpadding="0">
<tr>
<td width="100%"></td>
</tr>
</table>
<center>
<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="30%" bgcolor="#FCFCFC">题目</td>
<td width="20%" bgcolor="#FCFCFC">撰写日期/发布日期</td>
<td width="10%" bgcolor="#FCFCFC">有否审核</td>
<td width="15%" bgcolor="#FCFCFC">撰写人</td>
</tr>
<%
sql="SELECT CompanyDecision.DECISION_TITLE, CompanyDecision.DECISION_ID, CompanyDecision.COMPOSE_DATE, " _
&"CompanyDecision.CONFIRMED, CompanyDecision.CONFIRM_DATE, Personnel.PERSON_NAME AS Composer " _
&"FROM CompanyDecision INNER JOIN " _
&"Personnel ON CompanyDecision.PERSONNEL_ID = Personnel.PERSONNEL_ID "
'response.write sql
'response.end
call openDB()
rs.open sql,conn,1,1
if rs.eof then
response.write "<tr><td width=""75%"" colspan=4 align=center>"
response.write "没有任何公司决策。"
response.write "</td></tr>"
end if
while not rs.eof
if session("POSITION_ID")>3 then
if rs("CONFIRMED")=0 then
rs.MoveNext
else
response.write "<tr>"
response.write"<td width=""30%"" bgcolor=""#FCFCFC""><a href=""Read.asp?DECISION_ID="&rs("DECISION_ID")&""">" _
&rs("DECISION_TITLE")&"</a></td>"
response.write "<td width=""20%"" bgcolor=""#FCFCFC"">"&rs("COMPOSE_DATE")&"/"
response.write rs("CONFIRM_DATE")&"</td>"
response.write "<td width=""10%"" bgcolor=""#FCFCFC"">已审</td>"
response.write "<td width=""15%"" bgcolor=""#FCFCFC"">"
response.write rs("Composer")&"</td>"
rs.MoveNext
end if
elseif session("POSITION_ID")<=3 then
response.write "<tr>"
response.write"<td width=""30%"" bgcolor=""#FCFCFC""><a href=""Read.asp?DECISION_ID="&rs("DECISION_ID")&""">" _
&rs("DECISION_TITLE")&"</a></td>"
response.write "<td width=""20%"" bgcolor=""#FCFCFC"">"&rs("COMPOSE_DATE")&"/"
if rs("CONFIRMED")=True then
response.write rs("CONFIRM_DATE")&"</td>"
response.write "<td width=""10%"" bgcolor=""#FCFCFC"">已审</td>"
elseif rs("CONFIRMED")=False then
response.write "无</td>"
response.write "<td width=""10%"" bgcolor=""#FCFCFC"">未审</td>"
end if
response.write "<td width=""15%"" bgcolor=""#FCFCFC"">"
response.write rs("Composer")&"</td>"
rs.MoveNext
else
call closeDB()
call trigErr()
end if
wend
call closeDB()
%>
<tr>
<td width="100%" bgcolor="#EFEFEF" height="50" colspan=4 align=center>
[<a href="javaScript:history.back()">返回</a>]
<%
if session("POSITION_ID")<3 then
response.write " [<a href=""Compose.asp"">撰写</a>]"
if session("POSITION_ID")=1 then
response.write " [<a href=""Confirm.asp"">审核</a>]"
end if
end if
%>
</td>
</tr>
</table>
</center>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -