您没有管理本页面的权限。"
call dvbbs_error()
else
call main()
conn.close
set conn=nothing
end if
sub main()
dim sel
if request("action") = "savebadword" then
call savebadword()
else
%>
<%end if%>
<%
end sub
sub savebadword()
if request("skinid")<>"" then
if request("reaction")="badword" then
sql = "update config set badwords='"&request("badwords")&"' where id in ( "&request("skinid")&" )"
conn.execute(sql)
elseif request("reaction")="splitreg" then
sql = "update config set splitwords='"&request("splitwords")&"' where id in ( "&request("skinid")&" )"
conn.execute(sql)
end if
end if
response.write "更新成功!"
end sub
%>