default.asp

功能说明： 1.支持UBB 2.支持版主回复. 3.支持留言删除. 4.支持管理密码修改. 5.管理员可查看留言网友IP地址. 6.过滤"<"">"字符带来的安全隐患. 后台

<!--#include file="conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
set showbbs=conn.execute("select*from mofeibook order by id desc") 
rs.open "select*from mofeibook order by id desc",conn,1,1 
order=0
count=rs.RecordCount
pagesize=10
pagecount=count\(pagesize+1)+1
page=request.QueryString("page")
if page="" then
	page=1
end if
%>
<!--#include file="mofei_head.asp"-->
<table border="0" cellpadding="0" cellspacing="0" width="760" align="center" bgcolor="#FFFFFF">
  <tr>
    <td height="25"><font color="#008000">
<marquee scrollamount="2" scrolldelay="40" width="680" height="22">Welcome to ::将乐留言本::!感谢您的支持!--http://mofei.tk--</marquee></font>
      </td>
    <td height="25">
      <p align="right">
      <img border="0" src="mofeiimg/mo_in_mofei.gif" width="10" height="10"><a href="mofei_input.asp" title="你认为沉默是金吗?">我要留言</a>
      </td>
  </tr>
</table>
<table>

</table>

<% 
if not showbbs.eof then
	showbbs.Move (page-1)*pagesize
	cc=(page-1)*pagesize
	do while (not showbbs.eof) and (order<pagesize)
		cc=cc+1
		order=order+1
 
%> 
<table border="1" cellpadding="0" cellspacing="0" width="763" align="center" bgcolor="#FFFFFF" bordercolor="#ACC8F0" bordercolorlight="#ACC8F0" bordercolordark="#FFFFFF">
  <tr>
    <td bgcolor="#F7F7F7" width="21%" height="25"><img border="0" src="mofeiimg/mofei_time.gif" width="19" height="14"> 
      <%=showbbs("time_")%></td>
    <td colspan="7" bgcolor="#F7F7F7" width="556"><img border="0" src="mofeiimg/mofei_title.gif" width="10" height="10"> <b><font color="#180682">标题: <%=showbbs("title_")%></font></b></td>         
  </tr>         
  <tr>         
    <td width="150" > <p align="center"><img src="mofeipict/<%=showbbs("face_")%>.jpg" width="140" border="0" align="middle"></p>      
    </td>        
    <td colspan="7" bgcolor="#FFFFFF"> 
      <table border="0" cellpadding="0" cellspacing="0" width="96%" align="center">        
        <tr>        
          <td><br><img border="0" src="mofeiimg/mofei_mofei.gif" width="9" height="9">        
            <font color="#004600">内容:</font>  <%=showbbs("mofei_")%></td>        
        </tr>        
        <tr>        
          <td width="100%" bgcolor="#FDFDFD"><br> <img border="0" src="mofeiimg/mofei_remofei.gif" width="10" height="9"><font color="#B6B6B6">版主于<%=showbbs("retime_")%>回复: </font><font color="#808080"><%=showbbs("remofei_")%></font><br><br></td>        
        </tr>        
      </table>        
    </td>        
  </tr>        
  <tr>        
    <td bgcolor="#F7F7F7" height="25"> 
      <p align="center"><img border="0" src="mofeiimg/mo_in_where.gif" width="12" height="11"> 
        <font color="#008000"><%=showbbs("where_")%></font> <img border="0" src="mofeiimg/mo_in_use.gif" width="16" height="18"> 
        <b><font color="#5E0920"><%=showbbs("use_")%></font></b></p>   
    </td>        
     <td bgcolor="#F7F7F7">      
     <table border="0" cellpadding="0" cellspacing="0" width="554" align="right" bgcolor="#F7F7F7">       
     <tr>         
    <td width="30%" ></td>       
    <td width="10%"><img border="0" src="mofeiimg/mofei_ip.gif" width="13" height="15" alt="对不起!只有版主才有此权限!">查 IP</td>       
    <td width="10%"><img border="0" src="mofeiimg/mofei_qq.gif" width="45" height="18" alt="和我聊天-QQ:<%=showbbs("qq_")%>"></td>       
    <td width="10%"><a href="<%=showbbs("home_")%>" target="_blank"><img border="0" src="mofeiimg/mofei_home.gif" width="47" height="18" alt="欢迎参观我的主页:<%=showbbs("home_")%>"></a></td>      
    <td width="10%"><a href="mailto:<%=showbbs("email_")%>"><img border="0" src="mofeiimg/mofei_email.gif" width="45" height="18" alt="朋友从写信开始!mailto:<%=showbbs("email_")%>"></a></td>      
    <td width="10%"><img border="0" src="mofeiimg/mofei_del.gif" width="52" height="16" alt="对不起!只有版主才有此权限!"></td>    
    <td width="10%"><img border="0" src="mofeiimg/mofei_re.gif" width="45" height="18" alt="对不起!只有版主才有此权限!"></td>      
   </tr>       
      </table>      
      </td>      
  </tr>      
</table><br>      
<%      
showbbs.movenext      
	loop      
end if      
showbbs.Close       
set showbbs=nothing       
%>      
<table border="0" cellpadding="0" cellspacing="0" width="760" align="center" bgcolor="#FFFFFF">      
  <tr>      
    <td>      
     现在是: <%=now()%>    
     <td colspan="7" bgcolor="#FFFFFF">        
      <p align="right">&nbsp;         
			<%if page>1 then%>         
			<a href="default.asp?page=1">第一页</a>&nbsp;&nbsp;<a href="default.asp?page=<%=page-1%>">上 页</a>&nbsp;&nbsp;         
			<%end if%>         
			<%if (page-pagecount)<0 then%>         
			<a href="default.asp?page=<%=(page+1)%>">下 页</a>&nbsp;&nbsp;         
			<a href="default.asp?page=<%=pagecount%>">最后页</a>          
			<%end if%>         
      </p>         
                  </td>         
  </tr>         
</table>         
<table>         
<!--#include file="mofei_foot.asp"-->