我使用了这个代码，功能有部分实现：
<SCRIPT language=javascript>
<!--
var obj = null;
function left_menu(meval)
{
var left_n=document.getElementById(meval);
if (obj != null && obj != left_n) obj.style.display = "none";
if (left_n.style.display=="none") left_n.style.display='block';
else left_n.style.display='none';
obj = left_n;
}
-->
</SCRIPT>
然后在相应表格属性加上onClick="javascript:left_menu('left_0');"来调用
在需要显示/隐藏的表格属性加上id=left_0 style="display:none"原来的代码就是以上这些了。原来这样的效果就是点击显示，，再点击关闭。。
我使用了这段代码后，没有达到需要的效果。
因为上一行与下一行均是动态的，当点击所有上一行后，总是第一个下一行显示出来，没有达到同步的效果！！！
请高手帮忙！这个功能不错，但就是没有达到我要的效果！实现的效果：1111111111111111111111111
aaaaaaaaaaaaaaaaaaaaa22222222222222222222222
bbbbbbbbbbbbbbb..........................
...........如上所示。显示的内容为 1111111111111111111111111
2222222222222222222222222点击显示隐藏的为： aaaaaaaaaaaaaaaaaaaaa
bbbbbbbbbbbbb
并且这些数据全是从后台数据库中得到的，全随着数据库的变化而增多或减少。
<SCRIPT language=javascript>
<!--
var obj = null;
function left_menu(meval)
{
var left_n=document.getElementById(meval);
if (obj != null && obj != left_n) obj.style.display = "none";
if (left_n.style.display=="none") left_n.style.display='block';
else left_n.style.display='none';
obj = left_n;
}
-->
</SCRIPT>
然后在相应表格属性加上onClick="javascript:left_menu('left_0');"来调用
在需要显示/隐藏的表格属性加上id=left_0 style="display:none"原来的代码就是以上这些了。原来这样的效果就是点击显示，，再点击关闭。。
我使用了这段代码后，没有达到需要的效果。
因为上一行与下一行均是动态的，当点击所有上一行后，总是第一个下一行显示出来，没有达到同步的效果！！！
请高手帮忙！这个功能不错，但就是没有达到我要的效果！实现的效果：1111111111111111111111111
aaaaaaaaaaaaaaaaaaaaa22222222222222222222222
bbbbbbbbbbbbbbb..........................
...........如上所示。显示的内容为 1111111111111111111111111
2222222222222222222222222点击显示隐藏的为： aaaaaaaaaaaaaaaaaaaaa
bbbbbbbbbbbbb
并且这些数据全是从后台数据库中得到的，全随着数据库的变化而增多或减少。
<!--#include file="config.asp" -->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html><head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>图书列表</title>
<SCRIPT language=javascript>
<!--
var obj = null;
function left_menu(meval)
{
var left_n=document.getElementById(meval);
if (obj != null && obj != left_n) obj.style.display = "none";
if (left_n.style.display=="none") left_n.style.display='block';
else left_n.style.display='none';
obj = left_n;
}
-->
</SCRIPT><!--#include file="css.css" -->
<style type="text/css">
<!--
body {
margin-left: 0px;
margin-top: 0px;
margin-right: 0px;
margin-bottom: 0px;
}
-->
</style></head>
<%listid=Cint(Request.QueryString("listid"))
pageno=Cint(Request.QueryString("pageno"))%>
<body background="images/index_bg.gif" link="#000000">
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" class="tabletblg">
<tr>
<td><!--#include file="top.asp" -->
</td>
</tr>
</table>
<table width="997" border="0" align="center" cellpadding="0" cellspacing="0" class="tablelrb">
<tr>
<td height="28" background="images/top-d.gif"><div align="center" class="fontsize12wubai"><font color="#FFFFFF"><a href="<%=homepage%>" class="fontsize12wubai">首页</a><!--#include file="menu_top.asp" --></font></div></td>
</tr>
</table>
<%if sswz="上" then '搜索位置上%>
<!--#include file="seach_tb.asp" -->
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" class="tablelrb">
<tr>
<td class="fontsize04"> </td>
</tr>
</table>
<%end if '搜索位置上结束%>
<table width="997" border="0" align="center" cellpadding="0" cellspacing="0" class="tablelrb">
<tr>
<td width="180" rowspan="2" valign="top" background="images/bocolor03.gif"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td valign="top"><table width="179" border="0" align="center" cellpadding="0" cellspacing="0">
<%str="select id,栏目名称 from 栏目 where 上级id="&listid&""
set rs0=conn.execute(str)
if not rs0.eof then%>
<tr>
<td height="25" colspan="2" bgcolor="#6392D4"><div align="center" class="fontsize14">栏
目 列 表</div></td>
</tr>
<%
do while not rs0.eof
%>
<tr>
<td height="20" colspan="2" class="fontsize12h20"> ☆ <a href=list.asp?listid=<%=rs0("id")%> class="fontsize12h20wu"><%=rs0("栏目名称")%></a></td>
</tr>
<tr>
<%nextid=rs0("id")
str="select id,栏目名称 from 栏目 where 上级ID="&nextid&""
set rs1=conn.execute(str)
if not rs1.eof then
m=0
do while not rs1.eof%>
<td width="50%" height="20" class="fontsize12h20"><div align="center"><a href=list.asp?listid=<%=rs1("id")%> class="fontsize12h20wu"><%=rs1("栏目名称")%></a></div></td>
<%
rs1.movenext
m=m+1
if m mod 2=0 and not rs1.eof then response.write "</tr><tr>"
loop
if m=1 then response.write "<td></td>"
end if
rs1.close%>
</tr>
<%rs0.movenext
loop
end if
rs0.close%>
</table></td>
</tr>
</table>
<%if blzx="1" then '本栏最新%>
<table width="179" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="25" bgcolor="#6392D4"><div align="center" class="fontsize12">本
栏 最 新</div></td>
</tr>
<%str="select top "&blzxs&" id,标题 from message where 栏目ID="&listid&" order by id desc"
set rs=conn.execute(str)
if not rs.eof then
do while not rs.eof%>
<tr>
<td height="20" class="fontsize12h20"> <img src="images/006.gif"> <a href=disp.asp?dispid=<%=rs("id")%> class="fontsize12h20wu"><%=left(rs("标题"),12)%></a></td>
</tr>
<%rs.movenext
loop
end if
rs.close%>
<tr>
<td class="fontsize08"> </td>
</tr>
</table>
<%end if%>
<%if blrd="1" then '本栏热点%>
<table width="179" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="25" bgcolor="#6392D4">
<div align="center" class="fontsize12">本 栏 热 点</div></td>
</tr>
<%str="select top "&blrds&" id,标题 from message where 栏目ID="&listid&" order by 点击 desc"
rs.open str,conn,3,2
if not rs.eof then
for m=1 to blrds%>
<tr>
<td height="20" class="fontsize12h20"> <img src="images/006.gif"> <a href=disp.asp?dispid=<%=rs("id")%> class="fontsize12h20wu"><%=left(rs("标题"),12)%></a></td>
</tr>
<%rs.movenext
if rs.eof then exit for
next
end if
rs.close%>
<tr>
<td class="fontsize08"> </td>
</tr>
</table>
<%end if%>
</td>
<%str="select id,栏目导航 from 栏目 where id="&listid&""
set rs=conn.execute(str)
lmdh=rs("栏目导航")
lmdh_a=lmdh
lmdh=mid(lmdh,2)
rs.close%>
<%str="select id,标题,添加日期,附件数量,图片数量,栏目id from message where 栏目导航='"&lmdh_a&"' order by 置顶 desc,id desc"
rs.open str,conn,3,2
rs.pagesize=lmbts%>
<td valign="top"><table width="805" border="0" align="right" cellpadding="0" cellspacing="0">
<tr>
<td colspan="2"> <table width="805" border="0" align="center" cellpadding="0" cellspacing="0">
<tr bgcolor="#6392D4">
<td height="28" class="fontsize12"> 栏目导航 <%=lmmcc%></td>
</tr>
<%if not rs.eof then%>
<%
if pageno=0 or pageno="" then pageno=1 end if
if pageno<0 then pageno=1 end if
if pageno>rs.pagecount then pageno=rs.pagecount end if
if not rs.eof then
rs.absolutepage=pageno
for n=1 to rs.pagesize%>
<tr class="fontsize12wu">
<td valign="top"> <div align="center">
<table width="20" border="0" cellspacing="0" cellpadding="0">
<tr>
<td class="fontsize02"> </td>
</tr>
</table>
</div></td>
<%str="select id,栏目名称 from 栏目 where id="&rs("栏目id")&""
set rs1=conn.execute(str)%>
<%rs1.close%>
</tr>
<%rs.movenext
if rs.eof then exit for
next
end if%>
<tr>
<td height="30"> <div align="center" class="fontsize12h20wu">
<table width="805" align="right">
<tr>
<td><%
str="SELECT * FROM message where 栏目id in(select 栏目id from message where 栏目导航='"&lmdh_a&"' order by 置顶 desc,id desc)order by [id] desc"
set rs9=conn.execute(str)%>
<table width = "800" border = "0" cellpadding="2" cellspacing="1" bordercolor="#003399" class="fontsize12">
<tr bgcolor="#6392D4">
<th width="60">公共信息</th>
<th width="240">书名</th>
<th width="60">版别</th>
<th width="60">开本</th>
<th width="60">印张</th>
<th width="60">版本</th>
<th width="60">估价</th>
<th width="200">出版日期</th>
<% While Not rs9.EOF%>
<tr bgcolor="#CCCCCC">
<td width="60"><div align="center"></div></td>
<td width="240"><div align="center"><span class="style2"><a href=disp.asp?dispid=<%=rs9("id")%> class="fontsize12h20wu"><% = rs9("标题") %></a></span></div></td>
<td width="60"><div align="center"><span class="style2"><% = rs9("版别") %></span></div></td>
<td width="60"><div align="center"><span class="style2"><% = rs9("开本") %></span></div></td>
<td width="60"><div align="center"><span class="style2"><% = rs9("印张") %></span></div></td>
<td width="60"><div align="center"><span class="style2"><% = rs9("版本") %></span></div></td>
<td width="60"><div align="center"><span class="style2"><% = rs9("估价") %></span></div></td>
<td colspan="6"><div align="center"><span class="style2"><% = rs9("出版日期") %></span></div></td>
</tr>
<%
rs9.MoveNext
Wend
%>
</table>
<p>
<%
str="SELECT * FROM message where 栏目id in(select 栏目id from message where 栏目导航='"&lmdh_a&"' order by 置顶 desc,id desc)order by [id] desc"
set rs9=conn.execute(str)%>
</p>
<table width = "800" border = "0" cellpadding="2" cellspacing="1" bordercolor="#003399" class="fontsize12">
<tr bgcolor="#6392D4">
<th width="60">印刷信息</th>
<th width="240">书名</th>
<th width="70"> 封面用纸 </th>
<th width="70"> 封面印刷 </th>
<th width="70"> 覆膜 </th>
<th width="70"> 成品尺寸 </th>
<th width="70"> 内文用纸 </th>
<th width="70"> 内文印刷 </th>
<th width="80"> 装订方式 </th>
<% While Not rs9.EOF %>
<tr bgcolor="#CCCCCC">
<td width="60"><div align="center"></div></td>
<td width="240"><div align="center"><span class="style2"><a href=disp.asp?dispid=<%=rs9("id")%> class="fontsize12h20wu"><% = rs9("标题") %></a>
</span></div></td>
<td width="70"><div align="center"><span class="style2"><% = rs9("封面用纸") %></span></div></td>
<td width="70"><div align="center"><span class="style2"><% = rs9("封面印刷") %></span></div></td>
<td width="70"><div align="center"><span class="style2"><% = rs9("覆膜") %></span></div></td>
<td width="70"><div align="center"><span class="style2"><% = rs9("成品尺寸") %></span></div></td>
<td width="70"><div align="center"><span class="style2"><% = rs9("内文用纸") %></span></div></td>
<td width="70"><div align="center"><span class="style2"><% = rs9("内文印刷") %></span></div></td>
<td colspan="6"><div align="center"><span class="style2"><% = rs9("装订方式") %></span></div></td>
</tr>
<%
rs9.MoveNext
Wend
%>
<p>
<%
str="SELECT * FROM message where 栏目id in(select 栏目id from message where 栏目导航='"&lmdh_a&"' order by 置顶 desc,id desc)order by [id] desc"
set rs9=conn.execute(str)%>
</p>
<table width = "800" border = "0" cellpadding="2" cellspacing="1" bordercolor="#003399" class="fontsize12">
<tr bgcolor="#6392D4">
<th width="60">物流信息</th>
<th width="240">书名</th>
<th width="150"> 教材改动 </th>
<th width="150">编写状态</th>
<th width="200"> 库存处理</th>
<% While Not rs9.EOF %>
<tr bgcolor="#CCCCCC">
<td width="60"><div align="center"></div></td>
<td width="240"><div align="center"><span class="style2"><a href=disp.asp?dispid=<%=rs9("id")%> class="fontsize12h20wu"><% = rs9("标题") %></a></span></div></td>
<td width="150"><div align="center"><span class="style2"><% = rs9("教材改动") %></span></div></td>
<td width="150"><div align="center"><span class="style2"><% = rs9("编写状态") %></span></div></td>
<td width="200"><div align="center"><span class="style2"><% = rs9("库存处理") %></span></div></td>
</tr>
<%
rs9.MoveNext
Wend
%>
</table>
<p>
<%
str="SELECT * FROM message where 栏目id in(select 栏目id from message where 栏目导航='"&lmdh_a&"' order by 置顶 desc,id desc)order by [id] desc"
set rs9=conn.execute(str)%>
</p>
<table width = "800" border = "0" cellpadding="2" cellspacing="1" bordercolor="#003399" class="fontsize12">
<tr bgcolor="#6392D4">
<th width="60">业务信息</th>
<th width="240">书名</th>
<th width="50">作者</th>
<th width="50">负责人</th>
<th width="57">来稿日</th>
<th width="57">一校</th>
<th width="57">二校</th>
<th width="57">三校</th>
<th width="57">质检日</th>
<th width="57">下厂日</th>
<th width="58">胶片</th>
<% While Not rs9.EOF %>
<tr bgcolor="#CCCCCC">
<td width="60"><div align="center"></div></td>
<td width="240"><div align="center"><span class="style2"><a href=disp.asp?dispid=<%=rs9("id")%> class="fontsize12h20wu"><% = rs9("标题") %></a></span></div></td>
<td width="50"><div align="center"><span class="style2"><% = rs9("作者") %></span></div></td>
<td width="50"><div align="center"><span class="style2"><% = rs9("负责人") %></span></div></td>
<td width="57"><div align="center"><span class="style2"><% = rs9("来稿日期") %></span></div></td>
<td width="57"><div align="center"><span class="style2"><% = rs9("一校日期") %></span></div></td>
<td width="57"><div align="center"><span class="style2"><% = rs9("二校日期") %></span></div></td>
<td width="57"><div align="center"><span class="style2"><% = rs9("三校日期") %></span></div></td>
<td width="57"><div align="center"><span class="style2"><% = rs9("质检日期") %></span></div></td>
<td width="57"><div align="center"><span class="style2"><% = rs9("下厂日期") %></span></div></td>
<td colspan="6"><div align="center"><span class="style2"><% = rs9("胶片") %></span></div></td>
</tr>
<%
rs9.MoveNext
Wend
%>
</table>
</td>
</tr>
</table>
</div></td>
</tr>
<%end if%>
<%rs.close%>
</table></td>
</tr>
<%str="select id,栏目名称,栏目导航 from 栏目 where 上级ID="&listid&" order by 栏目序号"
set rs0=conn.execute(str)
if not rs0.eof then
do while not rs0.eof
flid=rs0("id")%>
<tr>
<td colspan="2" class="fontsize08"> </td>
</tr>
<tr bgcolor="#6392D4" onClick="javascript:left_menu('left_0');">
<td height="28" colspan="2" class="fontsize12"> <img src="images/ico.gif" width="10" height="10"> <a href=list.asp?listid=<%=rs0("id")%> class="fontsize12wu"><%=rs0("栏目名称")%></a></td>
</tr>
<%str="select top "&flbts&" id,标题,图片数量,附件数量,添加日期,栏目id from message where 栏目导航 like '%"&rs0("栏目导航")&"%' order by 置顶 desc,id desc"
set rs1=conn.execute(str)
if not rs1.eof then
do while not rs1.eof%>
<tr class="fontsize12" id=left_0 style="display:none">
<td width="825">
<div align="left">
<%str="select id,栏目名称 from 栏目 where id="&rs1("栏目id")&""
set rs2=conn.execute(str)%>
<font color="#FF3300">★</font> <a href=list.asp?listid=<%=rs2("id")%> class="fontsize12h20wu">[<%=rs2("栏目名称")%>]</a> <a href=disp.asp?dispid=<%=rs1("id")%> class="fontsize12h20wu"><%=rs1("标题")%></a> <span class="fontsize12">
<%if rs1("图片数量")>0 then%>
[图]
<%end if%>
<%if rs1("附件数量")>0 then%>
[附件]
<%end if%>
[<%=rs1("添加日期")%>]</span></div>
</td>
</tr><%rs2.close%>
<% rs1.movenext
loop
end if
rs1.close%>
<tr class="fontsize12">
<td height="20" colspan="2"><div align="right"><a href=list.asp?listid=<%=rs0("id")%>><img src="images/more.gif" width="40" height="11" border="0"></a></div></td>
</tr>
<% rs0.movenext
loop
end if
rs0.close%>
</table>
<p> </p>
</td>
</tr>
<tr>
<td valign="top"> </td>
</tr>
</table>
<%if sswz="下" then '搜索位置下%>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" class="tablelrb">
<tr>
<td class="fontsize04"> </td>
</tr>
</table>
<!--#include file="seach_tb.asp" -->
<%end if '搜索位置下结束%>
<table width="997" border="0" align="center" cellpadding="0" cellspacing="0" class="tablelr">
<tr>
<td class="fontsize04"> </td>
</tr>
</table>
<table width="997" border="0" align="center" cellpadding="0" cellspacing="0" background="images/bocolor02.gif" class="tabletblg">
<tr>
<td><!--#include file="bottom.asp" --></td>
</tr>
</table>
</body>
</html>
<!--
var obj = null;
var left_menu = function (meval){ var left_n = document.getElementById(meval);
if (obj != null && obj != left_n)
{
obj.style.display = "none";
}
if (left_n.style.display == "none")
{
left_n.style.display = '';
}
else
{
left_n.style.display = 'none';
} obj = left_n;
}
-->
</SCRIPT>