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 %>