<!--#include file="conn.asp"-->
<!-- #include file="inc/const.asp" -->
<!--
=========================================================
 File: index_left.asp
 Version:7.1
 Date: 2005-07-01
 Script Written by d-5j
 site:www.d-5j.com
=========================================================
-->
<html><head>
<meta NAME=GENERATOR Content="Microsoft FrontPage 6.0" CHARSET=GB2312>
<base target="main">
<STYLE>
A {
	COLOR: #3e3e3e; TEXT-DECORATION: none
}
A:hover {
	COLOR: #000000; TEXT-DECORATION: none
}
.longwei {
	FONT-SIZE: 7pt; COLOR: #188eef; FONT-FAMILY: Verdana
}
.g3 {
	LETTER-SPACING: 3px; TEXT-DECORATION: none
}
.g3:hover {
	LETTER-SPACING: 3px; TEXT-DECORATION: none
}
BODY {
	FONT-SIZE: 12px; COLOR: #000000
}
TD {
	FONT-SIZE: 12px; COLOR: #000000
}
BODY {
	SCROLLBAR-FACE-COLOR: #74DAEF;
	SCROLLBAR-HIGHLIGHT-COLOR: #74DAEF;
	SCROLLBAR-SHADOW-COLOR: #74DAEF;
	SCROLLBAR-3DLIGHT-COLOR: #ffffff;
	SCROLLBAR-ARROW-COLOR: #ffffff;
	SCROLLBAR-TRACK-COLOR: #92EAF8;
	SCROLLBAR-DARKSHADOW-COLOR: #ffffff;
	background-color: #D1FCFE;
}
.style1 {color: #0099FF}
</STYLE>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"></head>
<BODY bottomMargin=5 leftMargin=0 topMargin=5 rightMargin=0 style="background-color: #708DD1">

<span style="font-size: 12px">
<SCRIPT language=javascript1.2>
function showsubmenu(ss,ii,aa,openimg,closeimg)
{
 if (ss.style.display=="none") 
  {ss.style.display="";
   ii.src="indexpic/left_fold2.gif";
   ii.alt="关闭菜单";
   aa.src="indexpic/left_fold7.gif";
   aa.alt="关闭菜单";
}
 else
  {ss.style.display="none"; 
	ii.src="indexpic/left_fold1.gif";
	ii.alt="展开菜单";
	aa.src="indexpic/left_fold4.gif";
	aa.alt="展开菜单";
   }
}

</SCRIPT>
<%
REM 管理栏目设置

dim FoundUser,n,m,s,rs,i
dim menu(2,10)
dim boardmenu(20,20)
n=-1
m=0
s=-1

Set Rs=Dvbbs.Execute("select boardid,boardType,depth,child from dv_board where depth<=1  order by rootid,orders")
if not rs.eof then
	do while Not rs.Eof
	if rs(2)=0 then
	n=n+1
	m=0
	else
	m=m+1
	end if
        if rs(2)<>0 then
	boardmenu(n,m)="<a href=index.asp?boardid="&rs(0)&"  target=mz520_main>"&rs(1)&"</a>"
        else
        boardmenu(n,m)=""&rs(1)&""
        end if
	rs.MoveNext
	Loop
end if
set rs=nothing

menu(s+1,0)="论坛信息"
menu(S+1,1)="<a href=query.asp?stype=3 target=mz520_main>论坛新帖"
menu(S+1,2)="<a href=query.asp?stype=4 target=mz520_main>热门贴子</a>"
menu(S+1,3)="<a href=infolist.asp?t=toplist&orders=1 target=mz520_main>发贴排行</a>"
menu(S+1,4)="<a href=infolist.asp?t=toplist&orders=7 target=mz520_main>会员列表</a>"
menu(S+1,5)="<a href=query.asp?boardid=0 target=mz520_main>社区搜索</a>"
menu(S+1,6)="<a href=boardhelp.asp?boardid=0 target=mz520_main>社区使用手册</a>"

menu(S+2,0)="论坛状态"
menu(S+2,1)="<a href=boardstat.asp target=mz520_main>今日贴数图例</a>"
menu(S+2,2)="<a href=boardstat.asp?action=lasttopicnum target=mz520_main>主题数图例</a>"
menu(S+2,3)="<a href=boardstat.asp?action=lastbbsnum target=mz520_main>总帖数图例</a>"
menu(S+2,4)="<a href=boardstat.asp?reaction=online target=mz520_main>在线图例</a>"
menu(S+2,5)="<a href=boardstat.asp?reaction=onlineinfo target=mz520_main>在线情况</a>"
menu(S+2,6)="<a href=boardstat.asp?reaction=onlineUserinfo target=mz520_main>用户组在线图 例</a>"

menu(S+3,0)="个人工具"
menu(S+3,1)="<a href=mymodify.asp target=mz520_main>我的个人资料</a>"
menu(S+3,2)="<a href=modifyadd.asp target=mz520_main>登录密码修改</a>"
menu(S+3,3)="<a href=usersms.asp target=mz520_main>社区短讯服务</a>"
menu(S+3,4)="<a href=friendlist.asp target=mz520_main>我的社区好友</a>"
menu(S+3,5)="<a href=query.asp?stype=5&s=2 target=mz520_main>我发表的贴子</a>"
menu(S+3,6)="<a href=query.asp?stype=5&s=1 target=mz520_main>我参与的贴子</a>"



if founduser then
s=s+3
else
s=s+3
end if
%>
</span>
<DIV align=center>
<TABLE cellSpacing=1 cellPadding=0 width=122 border=0>
  <TBODY>
  <TR>
    <TD style="PADDING-BOTTOM: 1px" align=middle bgColor=#708DD1>
      　</TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width="89%" border=0>
  <TBODY>
  <TR>
    <TD height=3></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=1 cellPadding=0 width=140 border=0>
  <TBODY>
  <TR>
    <TD align=middle width=138 
    bgColor=#708DD1>
      <TABLE cellSpacing=0 cellPadding=0 width=138 border=0>
        <TBODY>
        <TR>
          <TD width=166 height=4><font color="#FFFFFF"><IMG height=30 
            src="indexpic/left_t1.gif" width=138 border=0></font></TD></TR>
        <TR>
          <TD style="PADDING-LEFT: 5px" height=20><font color="#FFFFFF"><IMG height=9 
            src="indexpic/left_a1.gif" width=5 border=0> </font> <A class=g3   
            onfocus=this.blur() href="friendlist.asp" 
            target=mz520_main><font color="#FFFFFF">我的论坛好友</font></A></TD></TR>
        <TR>
          <TD style="PADDING-LEFT: 5px" height=20><font color="#FFFFFF"><IMG height=9 
            src="indexpic/left_a1.gif" width=5 border=0> </font> <A class=g3   
            onfocus=this.blur() 
            href="query.asp?stype=5&amp;s=2&amp;pSearch=0&amp;nSearch=0" 
            target=mz520_main><font color="#FFFFFF">我发起的主题</font></A></TD></TR>
        <TR>
          <TD style="PADDING-LEFT: 5px" height=20><font color="#FFFFFF"><IMG height=9 
            src="indexpic/left_a1.gif" width=5 border=0> </font> <A class=g3   
            onfocus=this.blur() 
            href="query.asp?stype=5&amp;s=1&amp;pSearch=0&amp;nSearch=0" 
            target=mz520_main><font color="#FFFFFF">我参与的主题</font></A></TD></TR>
        <TR>
          <TD style="PADDING-LEFT: 5px" height=20><font color="#FFFFFF"><IMG height=9 
            src="indexpic/left_a1.gif" width=5 border=0> </font> <A class=g3   
            onfocus=this.blur() href="myfile.asp" 
            target=mz520_main><font color="#FFFFFF">我的个人文件</font></A></TD></TR>
        <TR>
          <TD style="PADDING-LEFT: 5px" height=20><font color="#FFFFFF"><IMG height=9 
            src="indexpic/left_a1.gif" width=5 border=0> </font> <A class=g3   
            onfocus=this.blur() href="favlist.asp" 
            ttarget=mz520_main><font color="#FFFFFF">我的帖子收藏</font></A></TD></TR>
        <TR>
<TD width=166 height=3></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width="89%" border=0>
  <TBODY>
  <TR>
    <TD height=3></TD></TR></TBODY></TABLE>
<table width="150">
<TBODY><TR>
  <TD align=middle width="96%" 
    bgColor=#708DD1>
	<table width="142" border="0" cellpadding="0" cellspacing="1">
      <tr>
        <td width="140" bgcolor="#708DD1"><table  width="138" border="0" cellpadding="0" cellspacing="1">
          <tr>
            <td><font color="#FFFFFF"><img src="indexpic/left_t2.gif" width="138" height="30"></font></td>
          </tr>
          <tr>
            <td><TABLE style="WIDTH: 100%" cellSpacing=0 cellPadding=0>
                <TBODY>
                  <TR>
                    <TD width="100%">
                      <table cellpadding=0 cellspacing=0 style="width:100%" >
                        <TR>
                          <TD width="100%">
                            <TABLE height=18 cellSpacing=0 cellPadding=0 width="100%" 
                  border=0>
                              <TBODY>
                                <tr>
                                  <TD align=right width=20>
                                    <P style="MARGIN-BOTTOM: 1px">
									<font color="#FFFFFF"><IMG 
                        src="indexpic/left_fold1.gif"></font></P></TD>
                                  <TD width=20><font color="#FFFFFF"><IMG 
                      src="indexpic/left_fold6.gif"></font></TD>
                                  <TD width=94>
                                    <P style="MARGIN-TOP: 3px"><A 
                        href="main.asp" target=mz520_main><font color="#FFFFFF">网站首页</font></A></P></TD>
                                </TR>
                              </TBODY>
                          </TABLE></TD>
                        </tr>
                        <TR>
                          <TD><TABLE height=18 cellSpacing=0 cellPadding=0 width="100%" 
                  border=0>
                              <TBODY>
                                <tr>
                                  <TD align=right width=20>
                                    <P style="MARGIN-BOTTOM: 1px">
									<font color="#FFFFFF"><IMG 
                        src="indexpic/left_fold1.gif"></font></P></TD>
                                  <TD width=20><font color="#FFFFFF"><IMG 
                      src="indexpic/left_fold6.gif"></font></TD>
                                  <TD width=94>
                                    <P style="MARGIN-TOP: 3px">
									<a target="mz520_main" href="index.asp">
									<font color="#FFFFFF">论坛首页</font></a></P></TD>
                                </TR>
                              </TBODY>
                          </TABLE></TD>
                        </tr>
                        <%
	dim j
	dim tmpmenu
	dim menuname
	dim menurl
for i=0 to n
menuname="board"&i
%>
                        <tr>
                          <td width=100%  onclick="showsubmenu(submenu<%=menuname%>,subimg<%=menuname%>,aimg<%=menuname%>,'left_fol d7.gif','left_fold4.gif')"> <span style="font-size: 12px">
                            <TABLE height=18 cellSpacing=0 cellPadding=0 width="100%" 
                  border=0>
                              <TBODY>
                                <TR>
                                  <TD align=right width=20>
                                    <P style="MARGIN-BOTTOM: 1px">
									<font color="#FFFFFF"><IMG  id=subimg<%=menuname%>
                        alt=展开菜单 src="indexpic/left_fold1.gif" 
                        name=subimg></font></P></TD>
                                  <TD width=20><font color="#FFFFFF"><IMG id=aimg<%=menuname%> alt=展开菜单 
                        src="indexpic/left_fold4.gif" name=aimg></font></TD>
                                  <TD width=94>
                                    <P style="MARGIN-TOP:  3px">
									<font color="#FFFFFF"><%=boardmenu(i,0)%></font></P></TD>
                                </TR>
                              </TBODY>
                            </TABLE>
                          </span> </td>
                        </tr>
                        <tr>
                          <td style="display:none" id='submenu<%=menuname%>'>
                            <table cellpadding=0 cellspacing=0 align=center width="100%">
                              <%
	for j=1 to ubound(boardmenu,2)
	if isempty(boardmenu(i,j)) then exit for
	%>
                              <tr>
                                <TD width=25></TD>
                                <TD width=13><font color="#FFFFFF"><IMG src="indexpic/left_fold5.gif" 
                        border=0></font></TD>
                                <TD align=middle width=15><font color="#FFFFFF"><IMG 
                        src="indexpic/left_fold3.gif"></font></TD>
                                <TD width=81> <span style="font-size:  12px">
								<font color="#FFFFFF"><%=boardmenu(i,j)%></font></span></td>
                              </tr>
                              <%next%>
                          </table></td>
                        </tr>
                        <%next%>
                        <%for i=0 to s
menuname="tool"&i
%>
                        <%next%>
                        <tr>
                          <td width=100% class=tablebody2><font color="#FFFFFF">&nbsp; 
							</font> </TD>
                        </tr>
                    </table></td>
                  </tr>
                </TBODY>
            </TABLE></td>
          </tr>
        </table></td>
      </tr>
    </table>
    <TABLE cellSpacing=0 cellPadding=0 width="89%" border=0>
      <TBODY>
        <TR>
          <TD height=3></TD>
        </TR>
      </TBODY>
    </TABLE>
<TBODY><TR>
    <TD width="96%"><font color="#FFFFFF"><% set conn=nothing %>
</font>
<TABLE width=144 border=0 cellPadding=0 cellSpacing=1>
  <TBODY>
    <TR>
      <TD align=middle 
    bgColor=#708DD1>        <div align="center"><font color="#FFFFFF"><span style="font-size: 12px"><br>
        目前在线:<%=MyBoardOnline.Forum_Online%> 人 <br>
　</span></font></div></TD>  
    </TR>
  </TBODY>
</TABLE>
</body>