📄 index.asp
字号:
<!--#include file="../Conn.asp"-->
<!--#include file="inc/const.asp"-->
<%If Not Dvbbs.master Or Session("flag")="" Then Response.redirect "../admin_login.asp"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="content-type" content="text/html; charset=gb2312" />
<TITLE><%=Dvbbs.Forum_info(0)%>后台管理通用模板</TITLE>
<link href="skins/css/style.css" rel="stylesheet" type="text/css" />
<style>
.main_left {table-layout:auto; background:url(skins/images/left_bg.gif)}
.main_left_top{ background:url(skins/images/left_menu_bg.gif); padding-top:2px !important; padding-top:5px;}
.main_left_title{text-align:left; padding-left:15px; font-size:14px; font-weight:bold; color:#fff;}
.left_iframe{HEIGHT: 92%; VISIBILITY: inherit;WIDTH: 180px; background:transparent;}
.main_iframe{HEIGHT: 92%; VISIBILITY: inherit; WIDTH:100%; Z-INDEX: 1}
table { font-size:12px; font-family : tahoma, 宋体, fantasy; }
td { font-size:12px; font-family : tahoma, 宋体, fantasy;}
</style>
<script language = "javaScript" src = "inc/admin.js" type="text/javascript"></script>
<SCRIPT>
var status = 1;
var Menus = new DvMenuCls;
document.onclick=Menus.Clear;
function switchSysBar(){
if (1 == window.status){
window.status = 0;
switchPoint.innerHTML = '<img src="skins/images/left.gif">';
document.all("frmTitle").style.display="none"
}
else{
window.status = 1;
switchPoint.innerHTML = '<img src="skins/images/right.gif">';
document.all("frmTitle").style.display=""
}
}
</SCRIPT>
<BODY style="MARGIN: 0px">
<!--导航部分-->
<div class="top_table">
<div class="top_table_leftbg">
<div class="system_logo"><img src="skins/images/logo_up.gif"></div>
<div class="menu">
<ul>
<%
Dim j,i
Dim tmpmenu
Dim menuname
Dim menurl
Dim TempStr,Menu_1,Menu_2
TempStr = "<a href=setting.asp target='frmright'>常规管理</a>@@<a href=setting.asp target='frmright'>论坛基本设置</a>@@<a href=forumads.asp target='frmright'>论坛广告设置</a>@@<a href='plus_ads265.asp?sessionid="&Request.Cookies(Dvbbs.Forum_sn)("AdsSessionid")&"' target='frmright'><font color='red'>站长营销(广告联盟)</font></a>@@<a href=../announcements.asp?boardid=0&action=AddAnn target=_blank>论坛公告管理</a>@@<a href=link.asp?action=add target='frmright'>友情论坛添加</a>@@<a href=link.asp target='frmright'>友情论坛管理</a>@@<a href='ForumPay.asp' target='frmright'>论坛交易管理</a>@@<a href='ForumNewsSetting.asp' target='frmright'>论坛首页调用</a>@@<a href=badword.asp?reaction=badword target='frmright'>脏话过滤设置</a>@@<a href=badword.asp?reaction=splitreg target='frmright'>注册过滤字符</a>@@<a href=lockip.asp?action=add target='frmright'>IP来访限定添加</a>@@<a href=lockip.asp target='frmright'>IP来访限定管理</a>||<a href=board.asp target='frmright'>版面管理</a>@@<a href=board.asp?action=add target='frmright'>版面(分类)添加</a>@@<a href=board.asp target='frmright'>版面(分类)管理</a>@@<a href=board.asp?action=permission target='frmright'>分版面用户权限设置</a>@@<a href=boardunite.asp target='frmright'>合并版面数据</a>@@<a href=update.asp target='frmright'>重计论坛数据和修复</a>||<a href=user.asp target='frmright'>用户相关</a>@@<a href=user.asp target='frmright'>用户资料(权限)管理</a>@@<a href=group.asp target='frmright'>用户组(等级)管理</a>@@<a href=wealth.asp target='frmright'>用户积分设置</a>@@<a href=message.asp target='frmright'>用户短信管理</a>@@<a href=update.asp?action=updateuser target='frmright'>重计用户各项数据</a>@@<a href=SendEmail.asp target='frmright'>用户邮件群发管理</a>@@<a href=admin.asp?action=add target='frmright'>管理员添加</a>@@<a href=admin.asp target='frmright'>管理员管理</a>||<a href=template.asp target='frmright'>风格界面</a>@@<a href=template.asp target='frmright'>风格界面模板总管理</a>@@<a href=loadskin.asp target='frmright'>模板导出</a>@@<a href=loadskin.asp?action=load target='frmright'>模板导入</a>||<a href=postdata.asp?action=Nowused target='frmright'>贴子管理</a>@@<a href=alldel.asp target='frmright'>批量删除</a>@@<a href=alldel.asp?action=moveinfo target='frmright'>批量移动</a>@@<a href=../recycle.asp target=_blank>回收站管理</a>@@<a href=postdata.asp?action=Nowused target='frmright'>当前帖子数据表管理</a>@@<a href=postdata.asp target='frmright'>数据表间帖子转换</a>||<a href=data.asp?action=BackupData target='frmright'>数据处理</a>@@<a href=data.asp?action=CompressData target='frmright'>压缩数据库</a>@@<a href=data.asp?action=BackupData target='frmright'>备份数据库</a>@@<a href=data.asp?action=RestoreData target='frmright'>恢复数据库</a>@@<a href=address.asp?action=add target='frmright'>论坛IP库添加</a>@@<a href=address.asp target='frmright'>论坛IP库管理</a>||<a href=uploadlist.asp target='frmright'>文件管理</a>@@<a href=upUserface.asp target='frmright'>上传头像管理</a>@@<a href=uploadlist.asp target='frmright'>上传文件管理</a>@@<a href='bbsface.asp?Stype=3' target='frmright'>注册头像管理</a>@@<a href='bbsface.asp?Stype=2' target='frmright'>发贴心情管理</a>@@<a href='bbsface.asp?Stype=1' target='frmright'>发贴表情管理</a>||<a href=plus.asp target='frmright'>插件管理</a>@@<a href=plus.asp target='frmright'>论坛菜单管理</a>@@<a href=indivGroup.asp target='frmright'>个性圈子管理</a>@@<a href='../bokeadmin.asp' target='frmright'>论坛博客管理</a>@@<a href='myspace.asp' target='frmright'>个人空间管理</a>@@<a href='plus_Tools_Info.asp?action=Setting' target='frmright'>道具中心设置</a>@@<a href='plus_Tools_Info.asp?action=List' target='frmright'>道具资料设置</a>@@<a href='plus_Tools_User.asp' target='frmright'>用户道具管理</a>@@<a href='plus_Tools_User.asp?action=paylist' target='frmright'>交易信息管理</a>@@<a href='MoneyLog.asp' target='frmright'>道具中心日志</a>@@<a href='plus_Tools_Magicface.asp' target='frmright'>魔法表情设置</a>||<a href=data.asp?action=SpaceSize target='frmright'>系统相关</a>@@<a href=data.asp?action=SpaceSize target='frmright'>系统信息检测</a>@@<a href=log.asp target='frmright'>论坛系统日志</a>@@<a href=help.asp target='frmright'>论坛帮助管理</a>@@<a href=ReloadForumCache.asp target='frmright'>更新论坛缓存</a>"
'TempStr = template.html(0)
Menu_1 = Split(TempStr,"||")
For i=0 to ubound(Menu_1)
Menu_2 = Split(Menu_1(i),"@@")
%>
<li id="menu_<%=i%>" onmouseover="Menus.Show(this,0)" onclick="getleftbar(this);"><%=Menu_2(0)%>
<div class="menu_childs" onmouseout="Menus.Hide(0);">
<ul>
<%
For j = 1 To Ubound(Menu_2)
Response.Write "<li>"&Menu_2(j)&"</li>"
Select Case i
Case 0
if j = 4 Or j = 8 then response.write "<div class=menuhr></div>"
Case 2
if j = 6 then response.write "<div class=menuhr></div>"
Case 4
if j = 3 then response.write "<div class=menuhr></div>"
Case 5
if j = 3 then response.write "<div class=menuhr></div>"
Case 6
if j = 2 then response.write "<div class=menuhr></div>"
Case 7
if j = 4 then response.write "<div class=menuhr></div>"
End Select
Next
%>
</ul>
</div>
<div class="menu_div"><img src="skins/images/menu01_right.gif" style="vertical-align:bottom;"></div></li>
<%
Next
%>
</ul>
</div>
</div>
</div>
<div style="height:24px; background:#337ABB;"></div>
<!--导航部分结束-->
<TABLE border=0 cellPadding=0 cellSpacing=0 height="92%" width="100%" style="background:#337ABB;">
<TBODY>
<TR>
<TD align=middle id=frmTitle vAlign=top name="fmTitle" class="main_left">
<table width="100%" border="0" cellspacing="0" cellpadding="0" class="main_left_top">
<tr height="32">
<td valign="top"></td>
<td class="main_left_title" id="leftmenu_title">常用快捷功能</td>
<td valign="top" align="right"></td>
</tr>
</table>
<IFRAME frameBorder=0 id=frmleft name=frmleft src="left.htm" class="left_iframe" allowTransparency="true"></IFRAME>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr height="32">
<td valign="top"></td>
<td valign="bottom" align="center"></td>
<td valign="top" align="right"></td>
</tr>
</table>
</td>
<TD bgColor=#337ABB style="WIDTH: 10px">
<TABLE border=0 cellPadding=0 cellSpacing=0 height="100%">
<TBODY>
<TR>
<TD onclick=switchSysBar() style="HEIGHT: 100%">
<SPAN class=navPoint id=switchPoint title="关闭/打开左栏"><img src="skins/images/right.gif"></SPAN>
</TD>
</TR>
</TBODY>
</TABLE>
</TD>
<TD bgcolor="#337ABB" width="100%" vAlign=top>
<table width="100%" border="0" cellspacing="0" cellpadding="0" bgcolor="#C4D8ED">
<tr height="32">
<td valign="top" width="10" background="skins/images/bg2.gif"><img src="skins/images/teble_top_left.gif" alt="" /></td>
<td background="skins/images/bg2.gif"width="28" ><img src="skins/images/arrow.gif" alt="" align="absmiddle" /></td>
<td background="skins/images/bg2.gif"><span style="float:left">官方公告：</span><span style="color:#c00; font-weight:bold; float:left;width:300px;" id="dvbbsannounce"></span></td>
<td background="skins/images/bg2.gif" style="text-align:right; color: #135294; "><%=Dvbbs.MemberName%>(<%=Dvbbs.MemberClass%>) | <a href="index.asp" target='_top'>后台首页</a> | <a href="../index.asp" target="_top">论坛首页</a> | <a href="logout.asp" target="_top">退出</a> </td>
<td align="right" valign="top" background="skins/images/bg2.gif" width="28" ><img src="skins/images/teble_top_right.gif" alt="" /></td>
<td align="right" width="16" bgcolor="#337ABB"></td>
</tr>
</table>
<IFRAME frameBorder=0 id=frmright name=frmright scrolling=yes src="main_index.asp" class="main_iframe"></IFRAME>
<table width="100%" border="0" cellspacing="0" cellpadding="0" style="background:#C4D8ED;">
<tr>
<td><img src="skins/images/teble_bottom_left.gif" alt="" width="5" height="6" /></td>
<td align="right"><img src="skins/images/teble_bottom_right.gif" alt="" width="5" height="6" /></td>
<td align="right" width="16" bgcolor="#337ABB"></td>
</tr>
</table>
</TD>
</TR>
</TBODY>
</TABLE>
<div id="dvbbsannounce_true" style="display:none;">
<%
If Session("packjs") =empty Then
Dim Yrs,packjs
set Yrs=Dvbbs.Execute("select * from Dv_setup")
packjs ="http://bbs.dvbbs.net/packjs.asp?c="&Dvbbs.Forum_info(0)&"&d="&Replace(Lcase(Dvbbs.Get_ScriptNameUrl),Lcase(Dvbbs.CacheData(33,0)),"")&"&e="&Yrs("Forum_usernum")&"&f="&Yrs("Forum_PostNum")&"&g="&Dvbbs.Forum_info(5)&"&h="&IsSqlDatabase&"&i=Dvbbs Version "&Dvbbs.Forum_Version&"&j="&Yrs("Forum_TopicNum")&"&k="&MyBoardOnline.Forum_Online&"&l="&Dvbbs.Forum_ChanSetting(0)
Yrs.close
set Yrs=nothing
Session("packjs")=packjs
End If
Response.Write "<script src="""&Session("packjs")&"""></script>"
%>
</div>
<SCRIPT LANGUAGE="JavaScript">
<!--
document.getElementById("dvbbsannounce").innerHTML = document.getElementById("dvbbsannounce_true").innerHTML;
//-->
</SCRIPT>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -