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

📄 save_replyinfo.asp

📁 OA最新破解2008版 全新 破解 希望大家用着舒服
💻 ASP
字号:
<!--#include file="../../conn/dbconn2.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>"
%>

⌨️ 快捷键说明

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