<%=ForumName%>--管理页面
<%
if not master then
Errmsg=Errmsg+" "+"
本页面为管理员专用,请登陆后进入。"
call Error()
else
call main()
end if
sub main()
%>
align=center>
欢迎<%=session("mastername")%>进入管理页面
>
<%call leftmenu()%>
>
SOL语句执行操作:本操作仅限高级、对SQL编程比较熟悉的用户,您可以直接输入sql执行语句,比如delete from bbs1 where username='test'进行删除某用户帖子操作,在操作前请慎重考虑您的执行语句是否正确和完整,执行后不可恢复。
<%
if request("action") = "save" then
SQL_Statement=Request("SQL_Statement")
if SQL_Statement<>Empty then
On Error Resume Next
conn.Execute(SQL_Statement)
if err.number="0" then
response.write "执行成功"
else
response.write "语句有问题,具体出错如下: "
response.write Err.Description
err.clear
end if
end if
else
%>