<!-- #include file="Setup.asp" -->
<!-- #include file="inc/MD5.asp" -->
<%

if CookieUserName=empty then error("<li>您还未<a href=Login.asp>登录</a>论坛")

if UserRoleID <> 1 then error("<li>您没有权限进入后台")

if Request("menu")="out" then
session("pass")=""
Log("退出后台管理")
response.redirect ""&Request.ServerVariables("script_name")&"/../"
end if

%>
<title><%=SiteSettings("SiteName")%> - 后台管理</title>
<%
select case Request("menu")
case ""
index
case "Left"
Left
case "Login"
Login
case "pass"
pass
end select






sub pass

session("pass")=md5(""&Request("pass")&"")
if SiteSettings("AdminPassword")<>session("pass") then error2("社区管理密码错误")


Log("登录后台管理")
AdminTop
%>
<table cellpadding="5" cellspacing="1" border="0" width="95%" align="center" class="a2">
	<tr>
		<td class="a1" colspan="2" align="center"><b>系统信息</b></td>
	</tr>
	<tr class="a3">
		<td width="50%">服务器域名：<%=Request.ServerVariables("server_name")%> 
		/ <%=Request.ServerVariables("LOCAL_ADDR")%></td>
		<td width="50%">脚本解释引擎：<%=ScriptEngine & "/"& ScriptEngineMajorVersion &"."&ScriptEngineMinorVersion&"."& ScriptEngineBuildVersion %></td>
	</tr>
	<tr class="a3">
		<td width="50%">服务器软件的名称：<%=Request.ServerVariables("SERVER_SOFTWARE")%></td>
		<td width="50%">ACCESS 数据库路径：<a target="_blank" href="<%=datapath%><%=datafile%>"><%=datapath%><%=datafile%></a></td>
	</tr>
	<tr class="a3">
		<td width="50%">FSO 文本读写：<%If Not IsObjInstalled("Scripting.FileSystemObject") Then%><font color="red"><b>×</b></font><%else%><b>√</b><%end if%></td>
		<td width="50%">SA-FileUp 文件上传：<%If Not IsObjInstalled("SoftArtisans.FileUp") Then%><font color="red"><b>×</b></font><%else%><b>√</b><%end if%></td>
	</tr>
	<tr class="a3">
		<td width="50%">JMail 组件支持：<%If Not IsObjInstalled("JMail.Message") Then%><font color="red"><b>×</b></font><%else%><b>√</b><%end if%></td>
		<td width="50%">JPEG 组件支持：<%If Not IsObjInstalled("Persits.Jpeg") Then%><font color="red"><b>×</b></font><%else%><b>√</b><%end if%></td>
	</tr>
</table>
<br>
<table cellpadding="5" cellspacing="1" border="0" width="95%" align="center" class="a2">
	<tr>
		<td class="a1" colspan="2" align="center"><b>管理快捷方式</b></td>
	</tr>
	<tr class="a3">
		<td width="20%">快速查找用户</td>
		<td width="80%">
		<form method="POST" action="Admin_User.asp?menu=User2">
			<input size="13" name="UserName"> <input type="submit" value="立刻查找">
		</td>
		</form>	</tr>
	<tr class="a3">
		<td width="20%">快捷功能链接</td>
		<td width="80%"><a href="Admin_bbs.asp?menu=ManageForums">
		<font color="000000">建立论坛数据</font></a> |
		<a href="Admin_bbs.asp?menu=bbsManage"><font color="000000">管理论坛资料</font></a> 
		| <a href="Admin_bbs.asp?menu=upSiteSettingsok"><font color="000000">更新论坛资料</font></a></td>
	</tr>
</table>
<br>
<span id="Licence"></span>
<table cellpadding="5" cellspacing="1" border="0" width="95%" align="center" class="a2">
	<tr class="a3">
		<td class="a1" colspan="2" align="center"><b>关于YEBBS论坛</b></td>
	</tr>
	<tr class="a3">
		<td width="20%">产品开发</td>
		<td width="80%">YEBBS工作室</td>
	</tr>
	<tr class="a3">
		<td width="20%">产品负责</td>
		<td width="80%">YEBBS工作室</td>
	</tr>
	<tr class="a3">
		<td width="20%" valign="top">联系方法</td>
		<td width="80%">电话：0598-5826636<br>
		E-mail：Sxlin050@126.com<br>
		网址：<a target="_blank" href="http://www.frxs.net">http://www.frxs.net</a><br>
		地址：福建三明沙县华山小区G幢206号</td>
	</tr>
	</table>
<script src="http://Licence.yuzi.net/Licence.asp?Site=<%=Request.ServerVariables("server_name")%>&Program=BBSXP&Ver=<%=ForumsVersion%>"></script>
<%
Conn.execute("Delete from [BBSXP_Log] where DateCreated<"&SqlNowString&"-7")

htmlend
end sub




sub Login
AdminTop
%><script language="JavaScript" src="inc/keyboard.js"></script>
<SCRIPT>
//定义当前需用软键盘的表单和控件的名称
var curEditName
curEditName="loginbbs.pass"
</SCRIPT><form action="Admin_Default.asp" method="POST" name="loginbbs">
	<input type="hidden" value="pass" name="menu">
	<table width="333" border="0" cellspacing="1" cellpadding="2" align="center" class="a2">
		<tr>
			<td width="328" class="a1" height="25" align="center">
				登录论坛管理
			</td>
		</tr>
		<tr>
			<td height="19" width="328" valign="top" class="a3" align="center">
				请输入管理密码: <input size="15" name="pass" type="password">&nbsp;&nbsp;<input onClick="showkeyboard(curEditName)" type="button" value="键盘" title="用软键盘输入密码，防止黑客软件记录键盘的录入信息" /><br>
				<input type="submit" value=" 登录 " >　<input type="reset" value=" 取消 " >
			</td>
		</tr>
	</table>
</form>
<%
htmlend
end sub

sub Left

%>
<style>BODY { MARGIN: 0px;}</style>
<table class="a2" cellSpacing="1" cellPadding="5" width="145" align="center" border="0">
		<tr class="a1" id="TableTitleLink">
			<td align="center">系统设置</td>
		</tr>

		<tr class="a3">
			<td align="center">
						<a target="main" href="Admin_Setup.asp?menu=variable">
						常规设置</a></td>
		</tr>
		<tr class="a3">
			<td align="center">
						<a target="main" href="Admin_Setup.asp?menu=SiteStat">
						统计设置</a></td>
		</tr>
		<tr class="a3">
			<td align="center">
						<a target="main" href="Admin_Setup.asp?menu=Showbanner">
						广告设置</a></td>
		</tr>
		<tr class="a3">
			<td align="center">
						<a target="main" href="Admin_Setup.asp?menu=agreement">
						注册用户协议</a></td>

		</tr>
		<tr class="a1" id="TableTitleLink">
			<td align="center">公告管理</td>
		</tr>
		<tr class="a3">
			<td align="center">
						<a target="main" href="Admin_Affiche.asp?menu=Affichelist">
						社区公告管理</a></td>
		</tr>
		<tr class="a1" id="TableTitleLink">
			<td align="center">
			<span>用户管理</span></td>
		</tr>

		<tr class="a3">
			<td align="center">
						<a target="main" href="Admin_User.asp?menu=Showall">
						注册用户管理</a></td>
		</tr>
		<tr class="a3">
			<td align="center">
						<a target="main" href="Admin_User.asp?menu=UserRank">
						用户等级名称</a></td>
		</tr>		<tr class="a3">
			<td align="center">
						<a target="main" href="Admin_User.asp?menu=Activation">
						激活用户资料</a></td>
		</tr>
		
		<tr class="a1" id="TableTitleLink">
			<td align="center">角色</td>
		</tr>
		<tr class="a3">
			<td align="center">
						<a target="main" href="Admin_Role.asp">
						管理</a></td>
		</tr>		
		<tr class="a1" id="TableTitleLink">
			<td align="center">
			<span>论坛管理</span></td>
		</tr>
		<tr class="a3">
			<td align="center">
						<a target="main" href="Admin_bbs.asp?menu=ManageForums">
						建立论坛数据</a></td>
		</tr>
		<tr class="a3">
			<td align="center">
						<a target="main" href="Admin_bbs.asp?menu=ApplyManage">
						管理所有论坛</a></td>
		</tr>
		<tr class="a3">
			<td align="center">
						<a target="main" href="Admin_bbs.asp?menu=bbsManage">
						管理论坛资料</a></td>
		</tr>
		<tr class="a3">
			<td align="center">
						<a target="main" href="Admin_bbs.asp?menu=activation&checkbox=1&type=Recycle">回收站</a> <a target="main" href="Admin_bbs.asp?menu=activation&checkbox=1&type=Censorship">审查区</a></td>
		</tr>

		<tr class="a3">
			<td align="center">
						<a target="main" href="Admin_bbs.asp?menu=upSiteSettings">
						更新论坛资料</a></td>
		</tr>
		<tr class="a1" id="TableTitleLink">
			<td align="center">
			<span>社区管理</span> </td>
		</tr>
		<tr class="a3">
			<td align="center">
						<a target="main" href="Admin_club.asp?menu=sendMail">
						群发邮件</a></td>
		</tr>
		<tr class="a3">
			<td align="center">
						<a target="main" href="Admin_club.asp?menu=Message">
						短讯息管理</a></td>
		</tr>
		<tr class="a3">
			<td align="center">
						<a target="main" href="Admin_club.asp?menu=Link">
						友情链接管理</a></td>
		</tr>
		<tr class="a3">
			<td align="center">
						<a target="main" href="Admin_club.asp?menu=Consortia">
						社区公会管理</a></td>
		</tr>
		<tr class="a1" id="TableTitleLink">
			<td align="center">
			<span>菜单管理</span></td>
		</tr>
		<tr class="a3">
			<td align="center">
						<a target="main" href="Admin_menu.asp">
						论坛菜单管理</a></td>
		</tr>
		<tr class="a1" id="TableTitleLink">
			<td align="center">
			<span>新增功能管理</span></td>
		</tr>
            <tr class="a3" id="TableTitleLink">
                <td align="center">
                                    <a target="main" href="admin_rename.asp">
                                    <font color="000000">用户名称修改</font></a></td>
            </tr>
            <tr class="a3" id="TableTitleLink">
                <td align="center">
                                    <a target="main" href="admin_user.asp?menu=user">
                                    <font color="000000">用户发放工资</font></a></td>
            </tr>
		<tr class="a3" id="TableTitleLink">
			<td align="center">
				    <a target="main" href="Admin_PostAd.Asp">
				    <font color="000000">帖间广告设置</font></a></td>
		</tr>
            <tr class="a3" id="TableTitleLink">
                 <td align="center">
                                    <a target=main href=bzsq-admingn.asp>
                                    <font color="000000">申请斑竹管理<font></a></td>
            </tr>
            <tr class="a3" id="TableTitleLink">
		<td align="middle">
				    <a target="main" href="Admin_Music.asp">
				    <font color="000000">播放曲目管理</font></a></td>
	    </tr>
            <tr class="a3 id="TableTitleLink">
                  <td align="center">
                                    <a target="main" href="Admin_ExecuteSQL.asp">
                                    执行数据语句</font></a> </td>
            </tr>
		<tr class="a1" id="TableTitleLink">
			<td align="center">
			<span>数据库管理 </span></td>
		</tr>
		<tr class="a3">
			<td align="center">
						<a target="main" href="Admin_fso.asp?menu=bak">
						ACCESS数据库</a> </td>
		</tr>		<tr class="a3">
			<td align="center">
						<a target="main" href="Admin_fso.asp?menu=statroom">
						统计占用空间</a></td>
		</tr>
		<tr class="a3">
			<td align="center">
						<a target="main" href="Admin_fso.asp?menu=PostAttachment">
						管理上传文件</a></td>
		</tr>
		<tr class="a3">
			<td align="center">
						<a target="main" href="Admin_fso.asp?menu=Posts">
						帖子数据表</a> </td>
		</tr>
		<tr class="a1" id="TableTitleLink">
			<td align="center">
			<span>其他功能</span> </td>
		</tr>
		<tr class="a3">
			<td align="center">
						<a target="main" href="Admin_other.asp?menu=circumstance">
						主机环境变量</a></td>
		</tr>
		<tr class="a3">
			<td align="center">
						<a target="main" href="Admin_other.asp?menu=discreteness">
						组件支持情况</a></td>
		</tr>
		<tr class="a3">
			<td align="center">
						<a target="main" href="Admin_other.asp?menu=Statistics">
						论坛统计记录</a></td>
		</tr>
		<tr class="a3">
			<td align="center">
						<a target="main" href="Admin_other.asp?menu=Log">
						论坛操作记录</a></td>
		</tr>		
		<tr class="a1" id="TableTitleLink">
			<td align="center">
						 <a target="_top" href="">退出管理</a></td>
		</tr>
	</table><%
end sub
sub index


%>
<frameset cols="170,*" frameborder="no" framespacing="0">
<frame src="?menu=Left" name="leftFrame" scrolling="yes">
<frame src="?menu=Login" name="main" scrolling="yes">
</frameset>
<%
end sub

%>