<!-- #include file="../include/conn.asp" -->
<!--#include file="seeion.asp" -->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<%
'website:http://www.angelasp.com
' Angel工作室技术开发团队:QQ:815657032、QQ：709047174
' Copyright (C) Angel工作室 (http://www.angelasp.com).  All rights reserved
Dim id,mysend
mysend = Request.Form("mysend") 
 if Trim(mysend) ="" then
   Response.Write ("<script>alet('参数错误请，检查检查！');window.close();</script>")
   Response.End()
 end If
id = Request.Form("id")
replycontent = Request.Form("replycontent")
set rs=server.CreateObject("adodb.recordset")
sql="select * from [Message] where id="&id&""
rs.open sql,conn,1,3
rs("msg_reply")=replycontent
rs.update
rs.close
Set rs=Nothing 
conn.close
Set conn=Nothing
response.redirect("index.asp") 
%>