jwenjian.asp

是一种自动化办公软件

<!--#include file="conn.asp"-->
<table width="742" height="109" border="1" cellpadding="0" cellspacing="0">
  <tr>
    <td colspan="7" align="center" valign="middle"><span class="STYLE1">文件中心</span></td>
  </tr>
  <tr>
    <td width="94" align="center" valign="middle">发件人</td>
    <td width="129" align="center" valign="middle">文件名称</td>
    <td width="129" align="center" valign="middle">接收部门</td>
    <td width="124" align="center" valign="middle">时间</td>
 
	<td width="68" align="center" valign="middle">下载地址</td>
    <td width="69" align="center" valign="middle">&nbsp;</td>
  </tr> 
<%
  dim rs
  dim sql
  set rs=server.CreateObject("ADODB.RECORDSET")
  sql="select * from message"
  rs.open sql,conn,1,1
  while not rs.eof
  %>
  <tr>
    <td><div align="center"><%=rs("fajianren")%></div></td>
    <td><div align="center"><%=rs("Title")%></div></td>
    <td><div align="center"><%=rs("jieshoubumen")%></div></td>
	<td><div align="center"><%=rs("time")%></div></td>
    <td align="center" valign="middle"><a href="<%=rs("address")%>">下载</a></td>
    <td align="center" valign="middle"><a href="dele3.asp?id=<%=rs("ID")%>">删除</a></td>
  </tr>
  <%
  rs.movenext
  wend
  rs.close
  set rs=nothing
  conn.close
  set conn=nothing

%>
</table>