显示隐藏层实现的下拉菜单

将下拉菜单的代码放入一个单元格中，如下：（显示隐藏层的js脚本没有写，可以从dw中生成）

<td height="26" align="left" valign="middle" class="unnamed1" onmouseover="this.className='unnamed2';MM_showHideLayers('Layer1','','show');" onmouseout="this.className='unnamed1';MM_showHideLayers('Layer1','','hide');">
<div id="Layer1" style="position:absolute; width:78px; height:86px; z-index:1; background-color: #003D58; layer-background-color: #CCCCCC; border: 1px none #000000; clip: rect(23 auto auto auto); visibility: hidden;">
                      <table width="100%" border="0" cellpadding="0" cellspacing="1">
                        <!--DWLayoutTable-->
                        <tr>
                          <td width="76" height="22"></td>
                        </tr>
       <%set rsz=Server.CreateObject("ADODB.Recordset")
        sql="SELECT class.classid, class.class FROM class ORDER BY class.sx"
        rsz.open sql,conn,1,1
   do while not rsz.eof%>

                        <tr>
                        <td width="96" height="28" align="center" valign="middle" bgcolor="#FFFFFF" class="unnamed2"><a href="cpzs.asp?id=<%=rsz(0)%>"><%=rsz(1)%></a></td>
                        </tr>

   <%rsz.movenext
    loop
   rsz.close
   set rsz=nothing
%>
                      </table>
                    </div><div align="center"><a href="#">产品展示</a></div></td>