<%
db="data/dvbbs7.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
'如果你的服务器采用较老版本Access驱动，请用下面连接方法
'connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(db)
conn.Open connstr

set rs=server.CreateObject("adodb.recordset")
rs.open "select * from Dv_Board where parentid=0 order by boardid asc",conn,1,1



%> 
<style type="text/css">
<!--
BODY {
	SCROLLBAR-FACE-COLOR: #eeeaeb; FONT-SIZE: 12px; SCROLLBAR-HIGHLIGHT-COLOR: #fbfdfc; SCROLLBAR-SHADOW-COLOR: #170708; SCROLLBAR-3DLIGHT-COLOR: #170708; LINE-HEIGHT: 18px; SCROLLBAR-ARROW-COLOR: #000000; SCROLLBAR-DARKSHADOW-COLOR: #ffffff; SCROLLBAR-BASE-COLOR: #170708; BACKGROUND-COLOR: #718bd6
}
table {
	font-size: 12px;
	text-decoration: none;
	line-height: 1.4em;
}
-->
</style>
<SCRIPT>
function initIt1(){
if(this.name == "idbmainlist"){parent.changeColor('007CD0');}
tableColl=document.all.tags("tr");
for(i=0; i<tableColl.length; i++) {
whichEl=tableColl(i);
if(whichEl.className=="child" && whichEl.id !="$Cookies{which}"){whichEl.style.display="none";}
}
}
function expands1(el) {
expireDate=new Date;
expireDate.setYear(expireDate.getYear()+1);
whichEl1=eval(el+"Child");
var wh = (el+"Child");
if (whichEl1.style.display=="none"){
initIt1();
whichEl1.style.display="block";
document.cookie="which="+wh+";expires="+expireDate.toGMTString()+";";
}else{
whichEl1.style.display="none";
document.cookie="which="+";expires="+expireDate.toGMTString()+";";
}
}
onload=initIt1;
</SCRIPT>
<link href="index_left.css" rel="stylesheet" type="text/css">
<body leftmargin="0" topmargin="0">

<table width="145" border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td width="145" height="100%" valign="top" background="skins/left/left_r4_c2.gif"><TABLE cellSpacing=0 cellPadding=0 width=145 align=center 
              border=0>
              <TBODY>
                <TR> 
                  <TD align=middle width=43><IMG height=18 src="skins/left/t_plus.gif" width=32></TD>
                  <TD width=102 height=20><A 
                  href="/bbs" target=win>〖商人论坛首页〗</A> </TD>
                </TR>
                <%do while not rs.eof%>
                <TR> 
                  <TD align=middle width=43><a href="javascript:expands1('h<%=rs("boardid")%>')"><IMG 
                  src="Skins/left/t_plus.gif" width=32 height=16 border="0"></a></TD>
                  <TD width=102 height=20><a href="index.asp?boardid=<%=rs("boardid")%>" target="win"><%=rs("boardtype")%></a></TD>
                </TR>
         
                <TR style="display:none" class=child id=h<%=rs("boardid")%>Child> 
                  <TD height="22" colspan="2" align=middle>
				        <%
			   set sr=server.CreateObject("adodb.recordset")
sr.open "select * from Dv_board where parentid="&rs("boardid")&" order by boardid asc",conn,1,1
			  do while not sr.eof
			   %>
				  <table width="100%" height="20" border="0" cellpadding="0" cellspacing="0">
                      <tr>
                        
                  <td width="35" align="center"><div align="right"><font color="#0066CC">┽</font></div></td>
                        <td width="127"><a href="index.asp?boardid=<%=sr("boardid")%>" target="win"><font color=red><%=sr("boardtype")%></font></a></td>
                      </tr>
                    </table><%sr.movenext:loop%></TD>
                </TR>
				
				 <%rs.movenext:loop%>
                <TR> 
                  <TD align=middle width=43><a href="javascript:expands1('bbs')"></TD>
                  <TD width=102 height=20><a href="javascript:expands1('bbs')">〖论坛资源〗</a></TD>
                </TR>
                <TR  style="display:none" class=child id=bbsChild> 
                  <TD height="22" colspan="2" align=middle>
	  <table width="100%" height="20" border="0" cellpadding="0" cellspacing="0">
                <tr>
                  <td width="18" align="center"><font color="#0066CC">┽</font></td>
                  <td><a href="boardstat.asp?reaction=onlineinfo&amp;boardid=0" target="win"><font color=blue>『当前在线』</font></a></td> 
                </tr>
                  <td width="18" align="center"><font color="#0066CC">┽</font></td>
                  <TD width=110 height=22><A href="query.asp?stype=3&pSearch=0&nSearch=0" target=win><font color=blue>『查看新贴』</font></A></TD>
                </tr>
                <tr>
                  <td width="18" align="center"><font color="#0066CC">┽</font></td>
                  <TD width=110 height=22><A href="query.asp?stype=4&pSearch=0&nSearch=0" target=win><font color=blue>『热门话题』</font></A></TD>
                </tr>
                <tr>
                  <td width="18" align="center"><font color="#0066CC">┽</font></td>
                  <TD width=110 height=22><A href="infolist.asp?t=toplist&orders=1" target=win><font color=blue>『发贴排行』</font></A></TD>
                </tr>
                <tr>
                  <td width="18" align="center"><font color="#0066CC">┽</font></td>
                  <TD width=110 height=22><A href="infolist.asp?t=toplist&orders=7" target=win><font color=blue>『用户列表』</font></A></TD>
                </tr>
                    </table>                 </TD>
                </TR> 
                <TR> 
                  <TD align=middle width=43><IMG height=18 
                  src="skins/left/t_plus.gif" width=17></TD>
                  <TD width=102 height=22><A href="reg.asp" 
                  target=win>〖用户注册〗</A></TD>
                </TR>
                <TR> 
                  <TD align=middle width=43><IMG height=18 
                  src="skins/left/t_plus.gif" width=17></TD>
                  <TD width=102 height=22><A 
                  href="login.asp" 
                target=win>〖登陆社区〗</A></TD>
                </TR>
                <TR> 
                  <TD align=middle width=43><IMG height=18 
                  src="skins/left/t_plus.gif" width=17></TD>
                  <TD width=102 height=22><A 
                  href="logout.asp" 
                target=win>〖安全退出〗</A></TD>
                </TR>
              </TBODY>
    </TABLE></td>
  </tr>
  <tr> 
    <td colspan="2">&nbsp;</td>
  </tr>
  
  <tr valign="top"> 
    <td height="40" colspan="2" background="skins/left/left_r8_c1.gif"><table width="149" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td height="34" align="center">&nbsp;</td>
        </tr>
      </table></td>
  </tr>
</table>
