⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 reply.asp

📁 不错的ASP整站源代码。在IIS环境下运行都没有问题
💻 ASP
字号:
<!--#include file="../checkuser.asp" -->

<%
 m_ver = Trim(request("ver"))
 if m_ver="cn" then 
  tmpstr_t="[中文版]"
 elseif  m_ver="en"  then 
 tmpstr_t="[英文版]"
 else
 response.write "错误访问页面,请重试" 
 response.end    
 End If
 %> 
<!--#include file="../../Include/db_conn.asp" -->
<!--#include file="include/const.asp"-->
<%
messageid=request("messageid")
set rs=server.createobject("adodb.recordset")
sqlstr="select * from ys_messageboard where id="&messageid
rs.open sqlstr,conn,1,3
if request("action")<>"save" then
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>回复</title>
<link href="../include/styles.css" rel="stylesheet" type="text/css">
<SCRIPT language=JavaScript>
function CheckInput(){
	if(form.reply.value==''){
		alert("公告内容不能为空!");
		form.reply.focus();
		return false;
	}
	if(form.reply.value.length>50){
		alert("公告内容不能超过50个字符!");
		form.reply.focus();
		return false;
	}
	
	return true;
}
</SCRIPT>
</head>
<body>
<TABLE class=log_td_table cellSpacing=0 cellPadding=0  width="90%" border=0 align="center">
  <TBODY>
                    <tr> 
                          
      <td width="100%" height="35"  align="center" bgcolor="#225597" class="TextFont12"><font color="#FFFFFF">留言回复<%=tmpstr_t%></font></td>
                    </tr>
                    <TR>
                      <TD class=log_text_box   style="TABLE-LAYOUT: fixed; WORD-BREAK: break-all"   vAlign=top>
                        <table width="100%" height="100%" border="1" cellpadding="0" cellspacing="0" bordercolordark="#FFFFFF" bordercolorlight="#CCCCCC">
          <tr>
                            
            <td align="center" valign="bottom" nowrap>第<%=rs("id")%>位 </td>
                            
            <td nowrap></td>
                            
            <td width="459" align="left" valign="middle" nowrap> 
              <table width="506"><tr><td width="498"><font color="#666666">TIME:<%=rs("time")%></font>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<a title=<%=rs("name")%>来自<%=rs("where")%>><img src="images/friend.gif" width="18" height="18" border="0"></a> &nbsp;<a title=QQ:<%=rs("qq")%>><img src="images/qq.gif" width="18" height="18" border="0"></a>&nbsp;&nbsp;<a href="mailto:<%=rs("email")%>" target="_blank" title=Email:<%=rs("email")%>><img src="images/MAIL.GIF" width="18" height="18" border="0"></a>&nbsp;&nbsp;<a title=IP:<%=rs("ip")%>><img src="images/ip.gif" width="18" height="18" border="0"></a>&nbsp;&nbsp;<a href="<%=rs("homepage")%>" target="_blank" title=主页:<%=rs("homepage")%>><img src="images/url.gif" width="18" height="18" border="0"></a>
							 &nbsp;&nbsp;&nbsp;[<a href="#" onClick="history.back();">返回</a>]</td></tr></table>
							</td>
                            <td width="1" align="right" valign="middle"></td>
                          </tr>
                          <tr>
                            <td width="70" rowspan="2" align="center" valign="top">
                              <p><br>
                                  <br>
                                  <img src="face/<%=rs("select")%>"><br>
                              </p>
                              <p> <strong><b><%=rs("name")%></b></strong> <br>
                                
                                
                               
                               
                            </p></td>
                            <td width="1" rowspan="2" background="/img/bg_1.gif"></td>
                          </tr>
                          <tr>
                            <td align="center" valign="middle" bgcolor="#F5F5F5">
                              <table width="95%" height="100%" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#F5F5F5" style="table-layout:fixed;word-break:break-all">
                                <tr>
                                  <td><img src="icons/<%=rs("face")%>.gif" width="17" height="17"> :<br>
                                      <font color="#333333">
                                      <%if rs("show")=1 then%>
                                      <%=htmlencode(rs("content"))%> </font>   
                                      <font color="#333333"> 悄悄话:</font><%=htmlencode(rs("content"))%> <font color="#333333">
                                     <%  end if  %>
                                    
                                    </font></td>
                                </tr>
                                <tr>
                                  <td><font color="#999999">--------------------------------------------------------</font></td>
                                </tr>
                                <tr>
                                  <td>
                                    <table width="100%" height="25" border="0" style="word-break:break-all">
                                      <tr>

                                        <td valign="top"><font color="#999999">站长回复:<%=htmlencode(rs("reply"))%></font></td>
                                      </tr>
                                  </table></td>
                                </tr>
                            </table></td>
                            <td width="1" background="/img/bg_1.gif"></td>
                          </tr>
                      </table></TD>
                    </TR>
                  </TBODY>
                </TABLE>
<form action="reply.asp?action=save&id=<%=request("id")%>" method="post" name="form" id="form" onsubmit=return(CheckInput())>
  <table class=log_td_table width="90%" border="1" align="center" cellpadding="0" cellspacing="0" bordercolordark="#FFFFFF" bordercolorlight="#CCCCCC">
    <tr> 
      <td colspan="2" align="center"> <table width="100%" border="0" class=log_titlewidth="100%">
          <tr> 
            <td width="65%" align="right"><strong>管 理 员 回 复 </strong></td>
            <td align="right">&nbsp;</td>
          </tr>
        </table></td>
    </tr>
    <tr> 
      <td colspan="2"><table width="100%" border="0" cellpadding="0" cellspacing="0">
          <tr>
            <td width="65%">&nbsp;&nbsp;&nbsp;回复<font color="#990033"><%=rs("name")%></font>的留言</td>
            <td><div align="right"></div></td>
          </tr>
        </table></td>
    </tr>
    <tr> 
      <td width="28%" align="center" valign="middle">回复内容:</td>
      <td width="72%"> 
        <textarea name="reply" cols="60" rows="8" class="1" id="reply">不超过50个字符!</textarea> 
      </td>
    </tr>
    <tr> 
      <td height="30" colspan="2" align="center"> <input type="submit" class=log value="回复留言" name="button"> 
        &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <input name="Submit2" type="reset" class=log id="Submit2" value="清除重写">
        <input type="hidden" name="ver" value="<%=m_ver%>"> 
		<input type="hidden" name="action" value="save">
		<input type="hidden" name="messageid" value="<%=messageid%>"> 
      </td>
    </tr>
  </table>
  </form>
<%
else
 '回复
if request.form("reply")="" then
response.write"<SCRIPT language=JavaScript>alert('公告内容不能为空!');"
response.write"javascript:history.go(-1)</SCRIPT>"
else
rs("reply")=Server.HTMLEncode(request.form("reply"))
rs.update
rs.close
set rs=nothing
 response.redirect "list_message.asp?ver="&m_ver
end if
end if
%>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -