admin_affiche_edit_save.asp

来自「ASP+Accesss数据库设备WEB报修」· ASP 代码 · 共 31 行

<%if session("pass")<>"ok" then 
    Response.Redirect "index.asp"
    Response.End 
  end if
%>
<!--#include file="conn.asp"-->
<!--#include file="ChkURL.asp"-->
<!--#include file="../inc/char.asp"-->
<%
dim affichename
dim affichecontent
dim sql
dim rs
dim id
affichename=request.form("affichename")
affichecontent=htmlencode2(request("affichecontent"))
AfficheId=request("AfficheId")
set rs=server.createobject("adodb.recordset")
sql="select * from affiche where afficheid="&AfficheId
rs.open sql,conn,3,3
rs("affichename")=affichename
rs("affichecontent")=affichecontent
rs("affichetime")=now()
rs.update
rs.close
set conn=nothing
%>
<script language="javascript">
	alert("公告修改成功！");
	window.location.href="Admin_Affiche.asp";
</script>