第四次发这个下级菜单的请求了...好像每次都没人看懂我的是什么问题...整整一个星期还没找出解决方法.....花了2个小时把这个弄了出来....因为不懂如何循环所有把所有的都列出来的...请耐心人士帮我简化一下..这里面太多一样的了.....附上全部文件....
-------------------------------------------------下面是代码---------------------------------------------
<!--#include file="conn.asp"-->
<%
Set rs1=server.CreateObject("adodb.recordset")
Sql1="Select * From Connect1 Order By ConID"
rs1.open Sql1,conn,1,1
rscount=rs1.recordcount
n=1
%>
<%
Set rs2=server.CreateObject("adodb.recordset")
Sql2="Select * From Connect1 Where ConID=1"
rs2.open Sql2,conn,1,1
%>
<%
Set rs3=server.CreateObject("adodb.recordset")
Sql3="Select * From Connect1 Where ConID=2"
rs3.open Sql3,conn,1,1
%>
<%
Set rs4=server.CreateObject("adodb.recordset")
Sql4="Select * From Connect1 Where ConID=3"
rs4.open Sql4,conn,1,1
%>
<%
Set rs5=server.CreateObject("adodb.recordset")
Sql5="Select * From Connect1 Where ConID=4"
rs5.open Sql5,conn,1,1
%>
<%
Set rs6=server.CreateObject("adodb.recordset")
Sql6="Select * From Connect1 Where ConID=5"
rs6.open Sql6,conn,1,1
%>
<%
Set rs7=server.CreateObject("adodb.recordset")
Sql7="Select * From Connect1 Where ConID=6"
rs7.open Sql7,conn,1,1
%>
<%
Set rs8=server.CreateObject("adodb.recordset")
Sql8="Select * From Connect1 Where ConID=7"
rs8.open Sql8,conn,1,1
%>
<%
Set rs9=server.CreateObject("adodb.recordset")
Sql9="Select * From Connect1 Where ConID=8"
rs9.open Sql9,conn,1,1
%>
<%
Set Trs1=server.CreateObject("adodb.recordset")
TSql1="Select * From T_Connect Where ConID=1"
Trs1.open TSql1,conn,1,1
%>
<%
Set Trs2=server.CreateObject("adodb.recordset")
TSql2="Select * From T_Connect Where ConID=2"
Trs2.open TSql2,conn,1,1
%>
<%
Set Trs3=server.CreateObject("adodb.recordset")
TSql3="Select * From T_Connect Where ConID=3"
Trs3.open TSql3,conn,1,1
%>
<%
Set Trs4=server.CreateObject("adodb.recordset")
TSql4="Select * From T_Connect Where ConID=4"
Trs4.open TSql4,conn,1,1
%>
<%
Set Trs5=server.CreateObject("adodb.recordset")
TSql5="Select * From T_Connect Where ConID=5"
Trs5.open TSql5,conn,1,1
%>
<%
Set Trs6=server.CreateObject("adodb.recordset")
TSql6="Select * From T_Connect Where ConID=6"
Trs6.open TSql6,conn,1,1
%>
<%
Set Trs7=server.CreateObject("adodb.recordset")
TSql7="Select * From T_Connect Where ConID=7"
Trs7.open TSql7,conn,1,1
%>
<%
Set Trs8=server.CreateObject("adodb.recordset")
TSql8="Select * From T_Connect Where ConID=8"
Trs8.open TSql8,conn,1,1
%>
<html>
<head>
<title></title>
<SCRIPT language=javascript><!--
<% do while not rs1.eof%>
function out<%=rs1("ConID")%>()
{
if(window.event.toElement.id!="menu<%=rs1("ConID")%>" && window.event.toElement.id!="link")
menu<%=rs1("ConID")%>.style.visibility="hidden";
}
<%
rs1.movenext
Loop
%>
//-->
</SCRIPT>
</head>
<body>
<div id="back" onMouseOut="out1()" onMouseOver="menu1.style.visibility='visible'" style="position:absolute;top:15;left:<%=800/rscount%>;width:<%=800/rscount%>;height:40;z-index:1;visibility:visible;">
<table>
<tr>
<td width="<%=800/rscount%>"><%=rs2("ConName")%></td>
</tr>
</table>
<div border=1 id="menu1" style="position:absolute;top:15;left:0;width:<%=800/rscount%>;height:10;z-index:2;visibility:hidden;">
<table>
<tr>
<% do while not Trs1.eof%>
<td width="<%=800/rscount%>"><%=Trs1("T_ConName")%></td>
</tr>
<%
Trs1.movenext
Loop
%>
</table>
</div>
</div>
<div id="back" onMouseOut="out2()" onMouseOver="menu2.style.visibility='visible'" style="position:absolute;top:15;left:<%=2*800/rscount%>;width:<%=800/rscount%>;height:40;z-index:3;visibility:visible;">
<table>
<tr>
<td width="<%=800/rscount%>"><%=rs3("ConName")%></td>
</tr>
</table>
<div border=1 id="menu2" style="position:absolute;top:15;left:0;width:<%=800/rscount%>;height:10;z-index:4;visibility:hidden;">
<table>
<tr>
<% do while not Trs2.eof%>
<td width="<%=800/rscount%>"><%=Trs2("T_ConName")%></td>
</tr>
<%
Trs2.movenext
Loop
%>
</table>
</div>
</div>
<div id="back" onMouseOut="out3()" onMouseOver="menu3.style.visibility='visible'" style="position:absolute;top:15;left:<%=3*800/rscount%>;width:<%=800/rscount%>;height:40;z-index:5;visibility:visible;">
<table>
<tr>
<td width="<%=800/rscount%>"><%=rs4("ConName")%></td>
</tr>
</table>
<div border=1 id="menu3" style="position:absolute;top:15;left:0;width:<%=800/rscount%>;height:10;z-index:6;visibility:hidden;">
<table>
<tr>
<% do while not Trs3.eof%>
<td width="<%=800/rscount%>"><%=Trs3("T_ConName")%></td>
</tr>
<%
Trs3.movenext
Loop
%>
</table>
</div>
</div>
<div id="back" onMouseOut="out4()" onMouseOver="menu4.style.visibility='visible'" style="position:absolute;top:15;left:<%=4*800/rscount%>;width:<%=800/rscount%>;height:40;z-index:7;visibility:visible;">
<table>
<tr>
<td width="<%=800/rscount%>"><%=rs5("ConName")%></td>
</tr>
</table>
<div border=1 id="menu4" style="position:absolute;top:15;left:0;width:<%=800/rscount%>;height:10;z-index:8;visibility:hidden;">
<table>
<tr>
<% do while not Trs4.eof%>
<td width="<%=800/rscount%>"><%=Trs4("T_ConName")%></td>
</tr>
<%
Trs4.movenext
Loop
%>
</table>
</div>
</div>
<div id="back" onMouseOut="out5()" onMouseOver="menu5.style.visibility='visible'" style="position:absolute;top:15;left:<%=5*800/rscount%>;width:<%=800/rscount%>;height:40;z-index:9;visibility:visible;">
<table>
<tr>
<td width="<%=800/rscount%>"><%=rs6("ConName")%></td>
</tr>
</table>
<div border=1 id="menu5" style="position:absolute;top:15;left:0;width:<%=800/rscount%>;height:10;z-index:10;visibility:hidden;">
<table>
<tr>
<% do while not Trs5.eof%>
<td width="<%=800/rscount%>"><%=Trs5("T_ConName")%></td>
</tr>
<%
Trs5.movenext
Loop
%>
</table>
</div>
</div>
<div id="back" onMouseOut="out6()" onMouseOver="menu6.style.visibility='visible'" style="position:absolute;top:15;left:<%=6*800/rscount%>;width:<%=800/rscount%>;height:40;z-index:11;visibility:visible;">
<table>
<tr>
<td width="<%=800/rscount%>"><%=rs7("ConName")%></td>
</tr>
</table>
<div border=1 id="menu6" style="position:absolute;top:15;left:0;width:<%=800/rscount%>;height:10;z-index:12;visibility:hidden;">
<table>
<tr>
<% do while not Trs6.eof%>
<td width="<%=800/rscount%>"><%=Trs6("T_ConName")%></td>
</tr>
<%
Trs6.movenext
Loop
%>
</table>
</div>
</div>
<div id="back" onMouseOut="out7()" onMouseOver="menu7.style.visibility='visible'" style="position:absolute;top:15;left:<%=7*800/rscount%>;width:<%=800/rscount%>;height:40;z-index:13;visibility:visible;">
<table>
<tr>
<td width="<%=800/rscount%>"><%=rs8("ConName")%></td>
</tr>
</table>
<div border=1 id="menu7" style="position:absolute;top:15;left:0;width:<%=800/rscount%>;height:10;z-index:14;visibility:hidden;">
<table>
<tr>
<% do while not Trs7.eof%>
<td width="<%=800/rscount%>"><%=Trs7("T_ConName")%></td>
</tr>
<%
Trs7.movenext
Loop
%>
</table>
</div>
</div>
<div id="back" onMouseOut="out8()" onMouseOver="menu8.style.visibility='visible'" style="position:absolute;top:15;left:<%=8*800/rscount%>;width:<%=800/rscount%>;height:40;z-index:15;visibility:visible;">
<table>
<tr>
<td width="<%=800/rscount%>"><%=rs9("ConName")%></td>
</tr>
</table>
<div border=1 id="menu8" style="position:absolute;top:15;left:0;width:<%=800/rscount%>;height:10;z-index:16;visibility:hidden;">
<table>
<tr>
<% do while not Trs8.eof%>
<td width="<%=800/rscount%>"><%=Trs8("T_ConName")%></td>
</tr>
<%
Trs8.movenext
Loop
%>
</table>
</div>
</div>
</body>
</html>
q36Nnu8e.rar
