<!--#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
  set rs=server.CreateObject("ADODB.RECORDSET")
  sql="select * from news "
  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("bumen")%></div></td>
    <td><div align="center"><%=rs("neirong")%></div></td>
    <td><div align="center"><%=rs("time")%></div></td>
    <td align="center" valign="middle"><a href="delect.asp?id=<%=rs("id")%>">刪除</a></td>
  </tr>
  
  <%
  rs.movenext
  wend
  rs.close
  set rs=nothing
  conn.close
  set conn=nothing
  %>
</table>