modi_write2.asp

来自「树型ASP论坛下载」· ASP 代码 · 共 39 行

<% if session("level")="" then%>
  <script language="javascript"> 
  alert("超时了，请重新登录！");
  document.location.href="index.asp"
  //history.go(-1);
  </script> 
<%end if%>
<% if session("level")<>"3" then%>
  <script language="javascript"> 
  alert("你不是管理员，请退出去！");
  document.location.href="/index.asp"
  //history.go(-1);
  </script> 
<%end if%>
<!--#include file="opendb.asp" -->
<%
repid=request("repid")
rep=trim(request("rep"))
'length=len(document)

 '事务处理和卷回处理
 conn.BeginTrans
   set rs1=server.createobject("adodb.recordset")
   sql="select * from yfrep where repid="&repid
     rs1.open sql,conn,1,3
     rs1("content")=rep
     rs1.update
     rs1.Close
    set rs1=nothing
  if conn.Errors.Count=0 then
   conn.CommitTrans 
  else
   conn.RollbackTrans 
  end if
  '完成事务处理和卷回处理
  'Response.Write("showbbs.asp?indexid="&Request("indexid")&"&page_code="&Request("page_code")&"&board="&Request("board")&"&suboard="&Request("suboard"))
  'Response.end
  response.redirect "showbbs.asp?indexid="&Request("indexid")&"&page_code="&Request("page_code")&"&board="&Request("board")&"&suboard="&Request("suboard")
%>