gonggao_save.asp

来自「吻宇考试管理系统源码 吻宇考试管理系统源码」· ASP 代码 · 共 24 行

<!--#include file=conn.asp-->
<!--#include file=checkuser.asp-->
<%
dim rs,sql
dim title,neirong,user
id=request.querystring("id")
title=request.form("title")
neirong=request.form("neirong")
user=request.form("user")
set rs=server.createobject("adodb.recordset")
sql="select * from gonggao where id="&id
rs.open sql,conn,2,3
rs("title")=title
rs("neirong")=neirong
rs("user")=user
rs.update
rs.close
set rs=nothing
set conn=nothing
%>
<script language="vbscript">
msgbox("恭喜你修改公告操作成功~!")
window.location.href"gonggao_gl.asp"
</script>