www.gusucode.com > 共享世纪内容管理系统 2.1 build 080704 全站开源版 > admin/mb_editsave.asp

    <%Admin="InfoMb"%>
<!--#include file="check.asp"-->
<!--#include file="mdb_path_info.asp"-->
<!--#include file="config.asp"-->
<!--#include file="char.inc"-->
<%
'==========================================
'
'  晓宇听幽新闻文章管理系统 2004
'
'  主页地址:http://www.xoYu.com
'
'==========================================
'程序名称:晓宇听幽新闻文章管理系统
'英文名称:xoYu News 2004 Professional
'程序创建时间:2003-7-10
'程序完成时间:2003-9-11
'最后修改时间:2003-10-10
'==========================================
set rs=server.CreateObject("ADODB.RecordSet") 
if request.form("MbName")="" then errmsg=errmsg & ""模板名称"必填! \n"                
if request.form("MbContent")="" then errmsg=errmsg & ""模板内容"不能为空! \n"
if errmsg<>"" then
   set rs=nothing
   conn.close
   set conn=nothing
   response.write("<script>alert('" & errmsg & "');history.go(-1)</script>") 
else
rs.open "select * from mb where id="&request("id"),conn,1,3
rs("MbName")=request("MbName")
rs("MbContent")=request("MbContent")
rs.update
mbtype1=rs("mbtype")

rs.close
set rs=nothing
conn.close
set conn=nothing
end if
if mbtype1="1" then
response.write("<script>alert('成功:修改模板完成!');location.href='html_mb_list.asp?mbtype=1'</script>") 
response.end
elseif mbtype1="2" then
response.write("<script>alert('成功:修改模板完成!');location.href='html_mb_list.asp?mbtype=2'</script>") 
response.end
elseif mbtype1="3" then
response.write("<script>alert('成功:修改模板完成!');location.href='html_mb_list.asp?mbtype=3'</script>") 
response.end
end if
%>