?? browse.asp
字號:
<!--#include file="../includes/db.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>辦公自動化系統(tǒng)</title>
<%
call insureID()
'刪除資訊
if (request("action")="delete") then
if session("Position_id")>3 then
response.write "<br><p align=center>您沒有操作的權限!</p>"
response.end
end if
Notice_ID=request("Notice_ID")
sql="DELETE FROM Notice WHERE Notice_ID ="&Notice_ID
call openDB()
conn.execute(sql)
call closeDB()
end if
%>
</head>
<body >
<center>
<table border="0" width="100%" height="50" cellspacing="0" cellpadding="0">
<tr>
<td width="100%"></td>
</tr>
</table>
<table width="75%" border="0" cellpadding="0" cellspacing="1" bgcolor="#5A8BCE">
<tr bgcolor="#E6F7FF">
<td height="35" align=center bgcolor="#E6F7FF"><b><font color="#000000">最新資訊</font></b></td>
</tr>
</table>
<table width="75%" border="0" cellpadding="0" cellspacing="1" bordercolorlight="#C0C0C0" bordercolordark="#FFFFFF" bgcolor="#5A8BCE">
<tr bgcolor="#FCFCFC">
<td width="50%" height="25" align="center" bgcolor="#FCFCFC">標題</td>
<td width="15%" height="25" align="center">發(fā)布日期</td>
<%if session("Position_id")<4 then%>
<td width="10%" height="25" align="center">操作</td>
<%end if%>
</tr>
<%
dim NOTICE_TITLE
sql="SELECT * FROM Notice " _
&"ORDER BY Notice_date DESC "
call openDB()
rs.open sql,conn,1,1
if rs.eof then
response.write "<tr><td width=""75%"" colspan=2>"
response.write "還沒有公告通知。"
response.write "</td></tr>"
end if
while not rs.eof
Notice_title=rs("Notice_title")
Notice_title=replaceBack(Notice_title)
response.write"<tr>"
response.write"<td width=""50%"" height=""25"" bgcolor=""#FCFCFC""> <a href=Read.asp?NOTICE_ID="&rs("Notice_id")&">" _
&NOTICE_TITLE&"</a></td>"
response.write"<td width=""15%"" height=""25"" bgcolor=""#FCFCFC""> "&rs("Notice_date")&"</td>"
if session("Position_id")<4 then
response.write"<td width=""10%"" height=""25"" bgcolor=""#FCFCFC""> <a href=Edit.asp?NOTICE_ID="&rs("Notice_id")&">"_
&"修改</a> <a href=Browse.asp?Action=delete&Notice_id="&rs("Notice_id")&">刪除</a></td>"
end if
response.write"</tr>"
rs.MoveNext
wend
%>
<tr>
<td width=width="75%" colspan=4 height="50" bgcolor="#EFEFEF" align=center>
[<a href="javascript:history.back()">返回</a>]
<%
if session("Position_id")<4 then
response.write" [<a href=""Add.asp"">添加資訊</a>]"
end if
call closeDB()
%>
</td>
</tr>
</table>
</center>
</body>
</html>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -