index.asp.bak

一个用Dreamweaver制作的留言本

<!--#include file="conn.asp"-->
<!--#include file="adovbs.inc"-->
<title>简单留言本</title>
<%

set rs = conn.execute("exec sp_ebook 'select'")
if rs.eof and rs.bof then
response.write "暂时没有记录"&"<a href='add.asp'>"&"请添加记录"&"</a>"
else
%>
<% do while not rs.eof %>
<table  align="center" border="1" bordercolor="#999999" width="400" cellpadding="0"  cellspacing="0" class="size1">
  <tr>
<td width="20%" class="size2">
作者：<%=rs("uname")%>
</td>
<td  colspan="2" width="70%">
标题：<%=rs("utitle")%>
</td>
</tr>
<tr>
<td>&nbsp;

</td>
<td width="100%" height="100" colspan="2">
内容:<%=rs("ubody")%>
</td>
</tr>
<tr class="size2">
<td colspan="3" align="right">
发表时间为:<%
response.write rs("utime")

if session ("admin") <>"" then
%>
<a href="del.asp?id=<%=rs("id")%>">删除</a>
&nbsp;&nbsp;
<%end if%>
 <a href="add.asp">添加</a></td>

</tr>
</table>

<br>

<%
rs.movenext
loop
rs.close
set rs=nothing
conn.close
end if
%>