<!--#include file ="../connadmin.asp"-->
<!--#include file = "tuzh_pri.asp"-->
<% 
set rs= Server.CreateObject("adodb.recordset")
sql="select * from main where id="&request("id") '定位回复的位置,where后面跟的是回复的条件,只授我们传递过来的留言ID值,并赋值到当前的ID变量上,这样我们只会对当前回复的留言来回复,这个很关键,不然都乱套了
rs.open sql,conn,1,3
if request.form("active")="" then  '用来判断的表单提交还是刷新页面,如果是提交表单,那么隐藏域的值肯定被提交,这样Request.form("active")不为空,就执行以下回复语句.如果没提交表单,而是刷新页面,那么隐藏域的值没有提交,Request.form("active")肯定为空,就跳过不执行
 else
rs("repcontent")=request.form("repcontent") '注意此代码前没有加rsedit.addnew,因为这是更新原有的记录,在原有的留言中在追加回复内容,而不是再添加一条新记录
rs.update
rs.close
set rs=nothing
response.redirect "mymanage.asp"
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>心情故事屋留言本系统-回复留言</title>
<link href="style.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.style2 {font-size: 18px}
-->
</style>
<link href="css.css" rel="stylesheet" type="text/css">
</head>

<body>
<form action="reply.asp?id=<%=request("id")%>" method="post" name="add">
  <table width="450" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#FCA2A1">
    <tr bgcolor="#FFE7E7">
      <td height="40" colspan="3" align="center"><span class="text3 style2">
		心情故事屋留言本系统-回复留言</span></td>
    </tr>
    <tr bgcolor="#FFFFFF">
      <td width="122"><P style="MARGIN-TOP: 2px; MARGIN-LEFT: 80px">姓名</p></td>
      <td width="175"><input name="name" type="text" id="name" value="<% =rs("name") %>" size="20" maxlength="10">      </td>
      <td width="137" rowspan="4"><div align="center">
        <p><img src="<% =rs("pci") %>" name="pci" id=pci><br>
          头像</p>
      </div></td>
    </tr>
    <tr bgcolor="#FFFFFF">
      <td><P style="MARGIN-TOP: 5px; MARGIN-LEFT: 80px">姓别</p></td>
      <td><input name="name2" type="text" id="name2" value="<% =rs("name") %>" size="10" maxlength="10"></td>
    </tr>
    <tr bgcolor="#FFFFFF">
      <td><P style="MARGIN-TOP: 2px; MARGIN-LEFT: 80px">QQ号</p></td>
      <td><input name="qq" type="text" value="<% =rs("qq") %>" size="20" maxlength="15">      </td>
    </tr>
    <tr bgcolor="#FFFFFF">
      <td><P style="MARGIN-TOP: 2px; MARGIN-LEFT: 80px">邮件</p></td>
      <td><input name="email" type="text" value="<%=rs("email")%>" size="25">
      </td>
    </tr>
    <tr bgcolor="#FFFFFF">
      <td valign="top"><P style="MARGIN-TOP: 5px; MARGIN-LEFT: 80px">主页</p></td>
      <td colspan="2"><input name="home" type="text" id="home" value="<% =rs("home") %>" size="25" maxlength="30">      </td>
    </tr>
    <tr bgcolor="#FFFFFF">
      <td valign="top"><P style="MARGIN-TOP: 2px; MARGIN-LEFT: 80px">主题</p></td>
      <td colspan="2"><input name="title" type="text" id="title" value="<% =rs("title") %>" size="25" maxlength="30">
      <span class="style1 style3" style="color: #FF0000"></span></td>
    </tr>
    <tr bgcolor="#FFFFFF">
      <td valign="top"><P style="MARGIN-TOP: 5px; MARGIN-LEFT: 80px">内容</p></td>
      <td colspan="2"><textarea name="textarea" cols="35" rows="8"><% =rs("content") %>
      </textarea></td>
    </tr>
    <tr bgcolor="#FFFFFF">
      <td valign="top"><P style="MARGIN-TOP: 5px; MARGIN-LEFT: 80px">回复</p></td>
      <td colspan="2"><textarea name="repcontent" cols="35" rows="8" id="repcontent"><% =rs("repcontent") %>
      </textarea>
      <input name="active" type="hidden" id="active" value="yes"></td>
    </tr>
    <tr align="center" bgcolor="#FFFFFF">
      <td colspan="3"><input type="submit" name="Submit" value="写好了">
    　　　　　　　　
      <input type="reset" name="Submit" value="重新写">
      </td>
    </tr>
  </table>
</form>
  <table width="770" height="1" border="0" align="center" cellpadding="0" cellspacing="0" id="talbe0001"> 
    <tr> 
      <td height="1" background="image/0004.gif"></td> 
    </tr> 
  </table>

</body>
</html>