save_replyinfo.asp

全球商务网站系统介绍 GLOBALEC.COM.CN[生成HTML版] 系统概述： 软件名称：全球商务网站系统 当前版本：V1.0 最新版本：V1.1 运行环境：WINNT+（IIS）

<!--#include file="../../conn/conn.asp"-->
<!--#include file="../../inc/safe.asp"-->
<%
  Response.Buffer = true
  Response.ExpiresAbsolute=now()-1
  Response.Expires=0
  Response.CacheControl="no-cache"
%>
<%
if Not ChkPost then 
response.redirect ("../../login/chklogin.asp?login=4")
response.end
end if

if session("flag")<>1 then 
response.Redirect("../../login/login1.asp")
response.end
end if

if Chkrequest(request("id")) then
id=request("id")
else
Response.Redirect ("../../login/chklogin.asp?login=4")
end if
if Chkrequest(request("infoid")) then
infoid=request("infoid")
else
Response.Redirect ("../../login/chklogin.asp?login=4")
end if
recontent=replace_text(request.form("recontent"))
set rs=server.createobject("adodb.recordset")
sql="select * from book where bookid="&id&" and info_id="&infoid&""
rs.open sql,conn,1,3
rs("recontent")=recontent
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
response.write"<SCRIPT language=JavaScript>alert('回复留言成功！');"
response.write"javascript:window.close();</script>"
%>