admin_sitecolordel.asp

庐江二中

<!--#include file="session.asp"-->
<%checkAdmin3%>
<!--#include file="conn.asp"-->
<%founderr=false

if request("ColorName")="系统默认" then
errmsg=errmsg+"<li>不能删除系统默认方案，请增加新方案！"
founderr=true
end if

if request("Ischecked")="True" then
errmsg=errmsg+"<li>不能删除已选定的方案！"
founderr=true
end if

if founderr=true then
	call error()
	conn.close
	set conn=nothing
else
	sql="delete from SiteColor where ID="&request("id")
	rs.open sql,conn,1,3
	conn.close
	set conn=nothing
	response.redirect "admin_SiteColorMana.asp"
end if
%>