ctongzhi.asp

是一种自动化办公软件

<!--#include file="conn.asp"-->
<table width="777" height="121" border="1" cellpadding="0" cellspacing="0">
  <tr>
    <td colspan="7" align="center"><span class="STYLE5">通知中心</span></td>
  </tr>
  <tr>
    <td width="141" align="center">标题</td>
    <td width="141" align="center" valign="middle">作者</td>
    <td width="142" align="center">部门</td>
    <td width="108" align="center">内容</td>
    <td width="161" align="center" valign="middle">发表时间</td>
   
    <td width="70" align="center" valign="middle">&nbsp;</td>
  </tr>
  <%
  dim rs
  dim sql,id 
  set rs=server.CreateObject("ADODB.RECORDSET")
  sql="select * from note1"
  rs.open sql,conn,1,1
  
  while not rs.eof
  
  
  %>
  <tr>
    <td><div align="center"><%=rs("title")%></div></td>
    <td><div align="center"><%=rs("zuozhe")%></div></td>
    <td><div align="center"><%=rs("select1")%></div></td>
    <td><div align="center"><%=rs("content")%></div></td>
    <td><div align="center"><%=rs("time")%></div></td>
    <td align="center" valign="middle"><a href="dele.asp?id=<%=rs("id")%>">删除</a></td>
  </tr>
  <%
  rs.movenext
  wend
  rs.close
  set rs=nothing
  conn.close
  set conn=nothing
  %>
</table>