关于一个折叠式菜单的问题！
各位大虾：我做了一个二级菜单，也就是点击主菜单时，主菜单就展开显示下面的字菜单，再
点击主菜单就关闭下面的子菜单，为什么在网页上看只能显示一个子菜单（数据库里面
是有三个的），但是察看浏览器代码显示的也是三个啊，请教是什么问题？
程序代码：
<%
dim cn,rs,tablenum,strMenuID,I,J,strSonMenu,strLoginName
set cn = Server.CreateObject("Adodb.Connection")
cn.open "Provider=SQLOLEDB.1;Password=;Persist Security Info=True;User
ID=sa;Initial Catalog=lctdata;Data Source=localhost"
Set rs = Server.CreateObject("Adodb.Recordset")
Set rs1 = Server.CreateObject("Adodb.Recordset")
'rs.open "select A.*,B.* from Menu_Role A,Menu_Info B where Role_User='"
& strLoginName & "'",cn,1,3
rs.open "select A.*,B.* from Menu_Role A,Menu_Info B where
A.Role_ID=B.Menu_ID and Parent_id=0 and A.Role_User='" & strLoginName &
"'",cn,1,1
%>
<html>
<head>
<title>无标题文档</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language=javascript>
function ShowLayer(index)
{
if(this.Layer(index).style.display=="none")
{
this.Layer(index).style.display="block";
}
else
{
this.Layer(index).style.display="none";
}
}
</script>
</head>
<table border="1" style="border-collapse: collapse" width="60%" id="table1">
<%
Dim divNum
divNum=0
if not rs.eof then
rs.movefirst
Do Until rs.EOF
strSonMenu = rs("menu_id")
i=0
i=i+1
%>
<tr>
<td><a href=# onclick=ShowLayer(<%=divNum%>);><%=rs("menu_name")%>菜单
一</a></td>
</tr>
<%
response.write strSonMenu
if rs1.state=1 then rs1.close
rs1.Open "select * From menu_info Where Parent_id='" & strSonMenu &
"'",cn,1,1
response.write rs1.recordcount
IF Not rs1.EOF Then
Do Until rs1.EOF
%>
<tr>
<td>
<div style=display:none; id=Layer><img
src="child.gif"><%=rs1("menu_name")%></div>
</td>
</tr>
<% rs1.MoveNext
Loop
End IF
IF rs1.State=1 Then rs1.Close
divNum=cstr(divNum)+1
rs.MoveNext
Loop
end if%>
</table>
</html>
浏览器产生的代码：
<html>
<head>
<title>无标题文档</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language=javascript>
function ShowLayer(index)
{
if(this.Layer(index).style.display=="none")
{
this.Layer(index).style.display="block";
}
else
{
this.Layer(index).style.display="none";
}
}
</script>
</head>
<table border="1" style="border-collapse: collapse" width="60%" id="table1">
<tr>
<td><a href=# onclick=ShowLayer(0);>用户管理菜单一</a></td>
</tr>
23
<tr>
<td>
<div style=display:none; id=Layer>货币汇率设置</div>
</td>
</tr>
<tr>
<td>
<div style=display:none; id=Layer>票据类型设置</div>
</td>
</tr>
<tr>
<td>
<div style=display:none; id=Layer>上传图片文件</div>
</td>
</tr>
<tr>
<td><a href=# onclick=ShowLayer(1);>查看单据资料菜单一</a></td>
</tr>
60
</table>
</html>
