modi_write1.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" -->
<%
indexid=request("indexid")
subject=left(trim(request("subject")),100)
document=trim(request("content"))
'length=len(document)

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