display.asp

机械工业出版社马涛主编的《网站建设与管理》电子课件+示例源码

<link rel="stylesheet" href="style.css" type="text/css">
<!--#include file=conn.asp-->
<%
dim key
key=Request.QueryString("id")
set rs=server.createobject("adodb.recordset")
sql="select * from news where id="&key&""
rs.open sql,conn,2,3
%>
	
<title>阅读公告</title>
<table width="314" border="0" cellspacing="1" cellpadding="8" align="center" bgcolor="#CC9999">
  <tr> 
    <td colspan="2" align="center"><b><font color="#FFFFFF">阅读公告</font></b></td>
  </tr>
  <tr> 
    <td colspan="2" bgcolor="#FFFFFF" height="6"></td>
  </tr>
  <tr> 
    <td width="63"><font color="#FFFFFF">公告标题：</font></td>
    <td width="224" bgcolor="#FFFFFF"><%=RS("Title")%></td>
  </tr>
  <tr> 
    <td width="63"><font color="#FFFFFF">发布时间：</font></td>
    <td width="224" bgcolor="#FFFFFF" align="center"><%=RS("Date")%>发布</td>
  </tr>
  <tr> 
    <td width="63" height="152"><font color="#FFFFFF">公告内容：</font></td>
    <td width="224" bgcolor="#FFFFFF" height="152"><%=RS("Text")%></td>
  </tr>
</table>
<!--#include file=info.asp-->
<%    
		  rs.close
	      conn.close
	      set rs=nothing
	      set conn=nothing
%>