📄 viewnews.asp
字号:
<!--#include file="adminconn.inc" -->
<%
if request("delnews")<>"" then
conn.Execute("delete * from message where id="&request("delnews"))
end if
%>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../inc/guhongying.css" type="text/css">
</head>
<body bgcolor="6699CC" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="100%" border="0" cellspacing="1" cellpadding="2" bgcolor="#000000" vspace="0" hspace="0">
<tr>
<td bgcolor="#316395" height="27"><font color="#FFFFFF">.:: 您可以在这里观看和删除公告</font></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="50"> </td>
</tr>
</table>
<%
sql= "select * from message order by id desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
for i=1 to rs.recordcount
%>
<table border="0" cellspacing="1" cellpadding="4" bgcolor="#000000" width="60%" align="center">
<tr bgcolor="336699">
<td width="23%" align="right" valign="top"><font color="#FFFFFF">公告标题: </font></td>
<td width="77%"> <font color=ffffff><%=rs("subject")%></font></td>
</tr>
<tr bgcolor="7C96B8">
<td width="23%" align="right" valign="top"><font color="#FFFFFF">公告内容: </font></td>
<td width="77%" bgcolor="eeeeee">
<%
message = rs("message")
message = replace(message,chr(13),"<br>")
message = replace(message,chr(32)," ")
response.write message
%>
</td>
</tr>
<tr bgcolor="336699">
<td colspan="2" align="right" valign="top"><font color="#FFFFFF">发布人: <%=rs("senduser")%> 发布时间:
<%=rs("idate")%> <a href="viewnews.asp?delnews=<%=rs("id")%>"><font color="#FFFFFF">删除</font></a></font></td>
</tr>
</table>
<table>
<tr><td height="30" bgcolor="6699CC" colspan="2"></td></tr>
</table>
<%
rs.movenext
next
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -