indexlist.asp

更新内容： 1 增加了搜索功能 2 提供了帮助页面 修改若干小问题 管理名称 admin 初始密码：admin-update : added a search function to help pro

<table width="650"  bgcolor="<%=tablebgcolor%>"  cellspacing="0" cellpadding="0" border="1"  style="border-collapse: collapse" cellpadding="0" bordercolor="<%=bordercolor%>" align="center">                     
  <tr>                      
    <td  valign="top" rowspan="3" width="110" height="1" align="center" bgcolor="<%=namebg%>">                      
      <table width="100%" border="0" cellspacing="0" cellpadding="0" height="164"  align=center  bgcolor="<%=namebg%>">                     
        <tr >
          <td height="164" valign="top" bgcolor="<%=namebg%>"><br>
          <%if  rs("guestname")=admin_name then%>
          <img src="pic/teammo.gif">
          <%end if%>
          <span STYLE="position:relative; width:105; height:25; filter:glow(Color=<%=bordercolor%>,Strength=4); margin-left:2px">
          <p align="center"><font color="#FFFFFF"><%=rs("guestname")%></font></p>
            </span>
            <p align="center"><img src="images/image<%=rs("face")%>.gif"> </p>
            <% if rs("from")<>"" then %>                     
            <p align="center"> 來自：<%=rs("from")%></p><%end if%><p align="center"> 编号：<%=j%> </p>               
          </td>                     
        </tr>                     
      </table>                     
    </td>                     
    <td height="18" bgcolor="<%=infobg%>">&nbsp;<img src="pic/posttime.gif"> 发表于：<%=rs("guestdate")%>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
         <%if rs("email")<>"" then %>                     
            <a href="mailto:<%=rs("email")%>"> <img src="pic/email.gif"  border="0">E-MAIL</a>                    
            <%else%><img src="pic/email1.gif"  border="0">E-MAIL<%end if%>&nbsp;                    
            <%if rs("homepage")<>"" then%>                     
            <a href="<%=rs("homepage")%>" target="blank">                      
            <img src="pic/home.gif" border="0">主页</a><%else%>
<img src="pic/home1.gif" border="0">主页<%end if%>&nbsp;
            <% if rs("oicq")<>"" then%>                     
            <a href="http://search.tencent.com/cgi-bin/friend/user_show_info?ln=<%=rs("oicq")%>" target="blank" title="<%=rs("oicq")%>"><img src="pic/qq.gif"  border="0"></a>Q&nbsp;Q 
            <%else%><img src="pic/qq1.gif"  border="0"></a>Q&nbsp;Q <%end if%>                    
            &nbsp;<%if session.sessionid=rs("sessionid") then%>                    
            <a href="edit.asp?id=<%=rs("id")%>"><img src="pic/edit.gif" border="0">编辑</a><%else%><img src="pic/edit1.gif" border="0">编辑<%end if%>&nbsp;</td>                     
  </tr>                     
  <tr>                      
    <td valign="top">                      
      <table width="500" align="center"  height="124" cellspacing="0" cellpadding="0">                                       
<tr>                                        
<td style="padding-left:4px;MARGIN-TOP:2px;MARGIN-BOTTOM:2px;MARGIN-LEFT:2px;MARGIN-RIGHT:2px; word-break: break-all; font-size: 10pt"  width="511"  height="71" bgcolor="<%=tablebgcolor%>" valign="top">
<p style="class="font">
<%
secretly=trim(rs("secretly"))
if secretly<>"" then
%>
<br>
<img src="images/hidden.gif"><font color="#800000">此留言为悄悄话，版主请进入管理后查看</font>
<br>
<%else%>
<%
guestcontent=ubbcode(rs("guestcontent"))
guestcontent=replace(guestcontent,chr(13),"<br>")
%>
<br>
<%=guestcontent%>
<br>
</p>
 
<%end if%>  
       <%if rs("guestreply")<>"" then %><hr noshade size="1" color="<%=bordercolor%>">
<img border="0" src="images/Replynow.gif"><font color="#FF0000">回复：</font><p class="font"><%=ubbcode(rs("guestreply"))%> </p>
<p><font color="#666666">&nbsp; 回复时间：<%=rs("redate")%></font></p>       
            <%end if%></td></tr>                                 
</table>               
    </td>               
  </tr>               
  <tr>                
    <td height="1" valign="bottom" bgcolor="<%=infobg%>">
    <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="537" bordercolorlight="#183EAD" bordercolordark="#183EAD">
      <tr>
        <td width="516" height="18"><img src="images/ip.GIF" width="15" height="13">IP:<%=ip%>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
        </td>
        <td width="15">
        <p align="right"><a title="返回网页顶部" href="#top"><img src="images/gotop.gif" border="0" ></a></td>
      </tr>
    </table>
    </td>               
  </tr>               
</table> 
<div align="center">                
  <% 
rs.movenext 
i=i+1 
j=j-1
loop 
%>
  <table align=center cellpadding="0" bgcolor="<%=tablebgcolor%>" cellspacing="0" width="650" height="17"> 
    <tr> 
      <td width="100%" style="padding: 6"> 
总计留言<%=Rs.recordcount%>条&nbsp;共有<%=page%>/<%=Rs.pagecount%>页 跳到第
<% for go=1 to Rs.pagecount
%>
 <a href=index.asp?page=<%=go%>><%=go%></a>
<%next%>页&nbsp;<% if page=1 then %> <%else%><a href=index.asp?page=<%=page-1%>>上一页</a>&nbsp;<%end if%><% if Rs.pagecount-page <> 0 then %><a href=index.asp?page=<%=page+1%>>下一页</a>&nbsp;<%else%> <%end if%>
</td> <%end if%>
    </tr> 
  </table> 
  </center> 
</div>

<%
connclose()    
%>             
<hr noshade width="650" color="<%=bordercolor%>" size="1">