求一个二级下拉菜单(如鼠标移至本论坛的导航栏时下面弹出来的东西)的方案!
我想做一个用ASP自动输出定义在导航栏里的内容...如果里面有下级菜单也会自动输出...大家有没有好的建议...
现在只做出了这个样子...还差一些关于下拉菜单的层的设置
<!--#include file="conn.asp"-->
<%
Set rs1=server.CreateObject("adodb.recordset")
Sql1="Select * From Connect1"
rs1.open Sql1,conn,1,1
rscount=rs1.recordcount
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title></title>
</head>
<body>
<table border=1 align=center id=t width=800 cellpadding=0 cellspacing=0 style="border-collapse:collapse;">
<tr>
<% do while not rs1.eof %>
<%ConnectID=Clng(rs1("ConID"))%>
<%dim n,z
n=n+1
z=z+1
%>
<td width="<%=800/rscount%>">
<a href="../<%=rs1("Address")%>" target="_blank">
<%=rs1("ConName")%></a>
<div> 这里不会弄.....请大家帮忙
<table width="100" border="1" cellpadding="0" cellspacing="0" style="border-collapse:collapse;" >
<%
Set rs2=server.CreateObject("adodb.recordset")
Sql2="Select * From T_Connect Where ConID="&ConnectID&""
rs2.open sql2,conn,1,1
%>
<% do while not rs2.eof %>
<tr>
<td>
<a href="../<%=rs2("T_Address")%>">
<%=rs2("T_ConName")%>
</a>
<br>
</td>
<%
rs2.Movenext
Loop
%>
</tr>
</table>
</div>
</td>
<%
rs1.Movenext
Loop
%>
</tr>
</table>
</body>
</html>
