www.gusucode.com > 芝麻屋小小留言本 2.0码程序 > admin/ly_lb.asp

    <!--#include file="conn.asp" -->
<%
if not session("check")=1 then 
response.Redirect"left.asp"
else
end if
%>
<%
exec="select * from guestbook order by id desc"
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,1
%>
<link href="icon/alink.css" rel="stylesheet" type="text/css" />
<table width="99%" border="0" align="center" cellpadding="3" cellspacing="1" class="bx">
  <tr class="bg">
    <td height="21" colspan="4">留言列表</td>
  </tr>
<% if not rs.eof then %>  
  <tr>
    <td height="18" colspan="4" bgcolor="#FFFFFF">　
      <!--#include file="pg.asp" -->
	</td>
  </tr>
<% for i=1 to rs.pagesize %>	 
<% if rs.eof then
   exit for
   end if
%> 
  <tr>
    <td height="1" colspan="4" align="center" class="bg3"></td>
  </tr>
  <tr class="bg">
    <td width="21" align="center" valign="top" bgcolor="#FFFFFF" ><%=rs("id")%></td>
    <td height="22" colspan="3" bgcolor="#FFFFFF"> <table width="100%" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td width="5%" class="wenliang">标题：</td>
        <td width="84%" class="wenliang"><span class="wenliang"><%=rs("ly_bt")%>&nbsp;</span></td>
       <% if not session("name")="test" then %>
	    <td width="7%" align="center"><a href="ly_hf.asp?id=<% =rs("id") %>">回复</a></td>
        <td width="4%" align="center">
		<a href="LY_DEL.ASP?id=<%=rs("id")%>" onclick='{if(confirm(&quot;确定删除?　&quot;)){return true;}return false;}'><img src="icon/D.GIF" width="16" height="16" border="0" /></a>
		</td>
		<% else %>
		 <td width="7%" align="center">回复</td>
        <td width="4%" align="center"><img src="icon/D.GIF" width="16" height="16" border="0" />
		</td>
		<% end if %>
      </tr>
      
    </table>    </td>
  </tr>
  <tr bgcolor="#FFFFFF">
    <td width="21" rowspan="4" align="center" bgcolor="#FFFFFF" class="t1"><% =i %></td>    
	<td width="559" rowspan="3" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td width="7%" class="bg-2">内容：</td>
          <td width="93%" class="bg-2"><%=rs("ly_nr")%>　</td>
        </tr>
        <tr>
          <td>回复：</td>
          <td><%=rs("ly_hf")%></td>
        </tr>
   </table></td>
    <td>姓名：<%=rs("ly_name")%>　　　</td>
    <td>性别：<%=rs("ly_sex")%> </td>
  </tr>
  <tr bgcolor="#FFFFFF">
    <td width="124"><table width="100%" height="10" border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td width="20" align="center"><img src="icon/Q2.GIF" width="16" height="16" /></td>
        <td><a href="http://wpa.qq.com/msgrd?V=1&amp;Uin=<%=rs("ly_qq")%>&amp;Site=联系我&amp;Menu=yes"target="blank" ><%=rs("ly_qq")%></a></td>
      </tr>
    </table></td>
    <td width="95"><table width="100%" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td width="20" align="center"><img src="icon/T3.GIF" width="9" height="17" /></td>
        <td><%=rs("ly_tel")%></td>
      </tr>
    </table></td>
  </tr>
  <tr bgcolor="#FFFFFF">
    <td colspan="2"><table width="100%" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td width="20" align="center"><img src="icon/E5.GIF" width="14" height="10" /></td>
        <td><%=rs("ly_email")%></td>
      </tr>
    </table></td>
  </tr>
  <tr bgcolor="#FFFFFF">
    <td valign="top">留言时间： <%=rs("ly_time")%><span class="wenliang"> 　　 </span>回复时间： <%=rs("hf_time")%></td>
    <td colspan="2">地址：<%=rs("address")%></td>
  </tr>
<%
rs.movenext
next
%>  
<% else %>
  <tr class="bg">
    <td height="21" colspan="4" align="center">- 暂时没有留言记录 -</td>
  </tr>
<% end if %>
</table>