我做的是点击菜单时就打开已收缩的部份,再次点击又收缩,现在问题是有部份菜单可正常,有的没反应!
不知道这原因出在哪?请朋友指点,本人将不胜感激!以下是页面全部代码<!-- #include file="conn.asp" -->
<!-- #include file="../yhqx.asp" -->
<!--#include file="../Base64.asp"-->
<%
 flbh = request.querystring("flbh")
 set rs_2 = server.createobject("adodb.recordset")
 if flbh = "" then
 sql_2 ="select * from wd_ml order by wdbh"
 else
 sql_2 ="select * from wd_ml where flbh='"&flbh&"' order by wdbh"
 end if
 rs_2.open sql_2,conn,1,1
 %>      <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
 <style type="text/css">                                                                                                                                                                                                                 
 td        { font-size: 9pt; line-height: 15pt}                                                                                                                                                                                         
 a:link    {color: #0080FF; text-decoration: none }                                                                                                                                                                                      
 a:visited {color: #0080FF; text-decoration: none }                                                                                                                                                                                      
 a:hover   {color: #ee9c00; text-decoration: underline }                                                                                                                                                                                 
 </style>
</head>
<body>
<script language="JavaScript">
function show_div(menu)
{
var Imgname;
if (document.all.item(menu).style.display == "none")
{document.all.item(menu).style.display = "block";
}
else
{document.all.item(menu).style.display = "none";
}
}
</script>
 <div style="width:100%;;border:0px solid #000000">
 <%
  do while not rs_2.eof
  i=i+1
 %>
 <table width="100%" border="0" cellpadding="0" cellspacing="0" bordercolor="#111111" style="border:none;border-bottom:1px  solid #999999:"  bgcolor="#ffffff" onMouseOver="this.bgColor='#ececec'" onMouseOut="this.bgColor='#ffffff'">
  <tr>
  <td width="80%" style="border:none;border-bottom:1px  solid #999999"><A HREF="#" onClick="show_div('menu&<%=i%>')"><span class="l"><%=rs_2("wdbh")%>&nbsp;</b></span></A><a href="#" onClick="show_div('menu&<%=i%>')"><span class="l"><b><%=rs_2("wd_name")%></span></a></td>
          <td width="20%" align="left" valign="bottom" style="border:none;border-bottom:1px  solid #999999" type="text"word-break="break-all"><font size="-4"><A HREF="#" onClick="window.open('wd_yj_up.asp?flbh=<%=rs_2("flbh")%>&fl_name=<%=rs_2("fl_name")%>&wdbh=<%=rs_2("wdbh")%>&wd_name=<%=rs_2("wd_name")%>','_self');"> 扫描件</a>|<%if rs_2("wd_dzd")<>"" then  response.write "<a href=""../data/wdxt/upload/" & Server.URLEncode(rs_2("wd_dzd")) & """>下载附件</a>" else response.write "<a href=""#"" onclick=""window.open('wd_fj_up.asp?wdbh=" & Server.URLEncode(rs_2("wdbh")) & "&wd_name=" & Server.URLEncode(rs_2("wd_name")) & "','_self');"">上传附件</a>" end if %></font></td>
      </tr>
  <tr><td colspan="2">
 <%
 wdbh = rs_2("wdbh")
 set rs_3 = server.createobject("adodb.recordset")
 sql_3 ="select * from wd_yj where wdbh='"&wdbh&"'"
 rs_3.open sql_3,conn,1,1
 %>
             <table width="100%" ID="menu&<%=i%>" style="display:none" cellspacing="0">
       <%
                   do while not rs_3.eof
img_name=rs_2("fl_name")&"/"&rs_3("img_name")
%>
  <tr>
                    <td width="5%"  bgcolor="#ffffff" ></td>
                    <td width="95%" style="border:none;border-bottom:1px  solid #999999"><a href="wd_ck.asp?img_name=<%=enCode_base64(img_name)%>" target="_blank"><%=rs_3("img_name_1")%></a></td>
          </tr>
                   <%
                    rs_3.movenext
                    loop
                    %>
          </table>
  </td></tr>
 </table>
 <%
 rs_2.movenext
 loop
 %>
 </div>
</body>
<%
conn.close
set conn = nothing
%>
</html>