问一个二级菜单的问题,全部只有这些分了

roam831 2003-10-13 03:12:48

分两级，一级为大类，下面有属于它的小类，也就是二级
这个大类和小类都是数据库输出的
怎么做？
像这里的：
http://www.baron.com.cn/javascript/index12.asp
里面的第六个选项，只不过它不是从数据库输出的
有没有办法把它改成数据库输出的呢？

...全文

33 7 打赏收藏转发到动态举报

写回复

用AI写文章

7 条回复

切换为时间正序

请发表友善的回复…

发表回复

roam831 2003-10-14

打赏
举报

晕~`刚装完系统

to debug2003(DEBUG)
我等下加你

to mjwgtm(文仔)
谢谢了，我等下试一下

mjwgtm 2003-10-14

打赏
举报

有些错误，表中有个字段名应该为lx2name

mjwgtm 2003-10-14

打赏
举报

数据库名：mydb 表：lx

结构
lx1name lx2nam2
服饰 .
服饰休闲装
服饰运动装
电脑硬件 .
电脑硬件 cpu
电脑硬件硬盘

<HTML><HEAD>
<SCRIPT language=javascript1.2>
function showsubmenu(sid)
{
whichEl = eval("submenu" + sid);
if (whichEl.style.display == "none")
{
eval("submenu" + sid + ".style.display=\"\";");
}
else
{
eval("submenu" + sid + ".style.display=\"none\";");
}
}
</SCRIPT>
</HEAD>
<BODY>
<%
dim rs,sql,conn,rt
set conn=server.createobject("adodb.connection")
conn.open "DBQ=" + server.mappath("mydb.mdb") + ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set rs=server.createobject("adodb.recordset")
set rt=server.createobject("adodb.recordset")
sql="SELECT * FROM lx ORDER BY lx1Name DESC"
rs.open sql,conn,1,1
rt.open sql,conn,1,1
i=0
while not rs.eof
if rs("lx2name")="." then
pname=rs("lx1name")
rt.movefirst
menu="submenu"+cstr(i)
str="<table cellspacing=0 cellpadding=0 width=158 align=center><tr> <td id=menuTitle1 onmouseover="&"this.style.cursor='hand';"&" onClick=showsubmenu("&i&") height=25><span><b><font color=#000000>"
str1="</font></b></span> </td></tr>"
str2="</tr></table>"
response.write str&rs("lx1name")&str1
%>
<td id=<%=menu%> style="display:none">

<div class=sec_menu style="WIDTH: 158px">
<table cellspacing=0 cellpadding=0 width=135 align=center>
<%
while not rt.eof
if rt("lx1name")=pname and rt("lx2name")<>"." then response.write"<tr><td height=20><b>"&rt("lx2name")&"</b></td></tr>"
rt.movenext
wend
%>
</table>
</div>
</td>
<%
response.write str2
else
end if
rs.movenext
i=i+1
wend
%>
</BODY></HTML>