如何显示动态下拉菜单

[xiaofanfan]

我的代码是这样的
<script language="javascript">
//more javascript from http://www.webjx.com
var disappeardelay=250 //menu disappear speed onMouseout (in miliseconds)
var enableanchorlink=0 //Enable or disable the anchor link when clicked on? (1=e, 0=d)
var hidemenu_onclick=1 //hide menu when user clicks within menu? (1=yes, 0=no)

/////No further editting needed

var ie5=document.all
var ns6=document.getElementById&&!document.all

function getposOffset(what, offsettype){
var totaloffset=(offsettype=="left")? what.offsetLeft : what.offsetTop;
var parentEl=what.offsetParent;
while (parentEl!=null){
totaloffset=(offsettype=="left")? totaloffset+parentEl.offsetLeft : totaloffset+parentEl.offsetTop;
parentEl=parentEl.offsetParent;
}
return totaloffset;
}

function showhide(obj, e, visible, hidden){
if (ie5||ns6)
dropmenuobj.style.left=dropmenuobj.style.top=-500
if (e.type=="click" && obj.visibility==hidden || e.type=="mouseover")
obj.visibility=visible
else if (e.type=="click")
obj.visibility=hidden
}

function iecompattest(){
return (document.compatMode && document.compatMode!="BackCompat")? document.documentElement : document.body
}

function clearbrowseredge(obj, whichedge){
var edgeoffset=0
if (whichedge=="rightedge"){
var windowedge=ie5 && !window.opera? iecompattest().scrollLeft+iecompattest().clientWidth-15 : window.pageXOffset+window.innerWidth-15
dropmenuobj.contentmeasure=dropmenuobj.offsetWidth
if (windowedge-dropmenuobj.x < dropmenuobj.contentmeasure)
edgeoffset=dropmenuobj.contentmeasure-obj.offsetWidth
}
else{
var windowedge=ie5 && !window.opera? iecompattest().scrollTop+iecompattest().clientHeight-15 : window.pageYOffset+window.innerHeight-18
dropmenuobj.contentmeasure=dropmenuobj.offsetHeight
if (windowedge-dropmenuobj.y < dropmenuobj.contentmeasure)
edgeoffset=dropmenuobj.contentmeasure+obj.offsetHeight
}
return edgeoffset
}

function dropdownmenu(obj, e, dropmenuID){
if (window.event) event.cancelBubble=true
else if (e.stopPropagation) e.stopPropagation()
if (typeof dropmenuobj!="undefined") //hide previous menu
dropmenuobj.style.visibility="hidden"
clearhidemenu()
if (ie5||ns6){
obj.onmouseout=delayhidemenu
dropmenuobj=document.getElementById(dropmenuID)
if (hidemenu_onclick) dropmenuobj.onclick=function(){dropmenuobj.style.visibility='hidden'}
dropmenuobj.onmouseover=clearhidemenu
dropmenuobj.onmouseout=ie5? function(){ dynamichide(event)} : function(event){ dynamichide(event)}
showhide(dropmenuobj.style, e, "visible", "hidden")
dropmenuobj.x=getposOffset(obj, "left")
dropmenuobj.y=getposOffset(obj, "top")
dropmenuobj.style.left=dropmenuobj.x-clearbrowseredge(obj, "rightedge")+"px"
dropmenuobj.style.top=dropmenuobj.y-clearbrowseredge(obj, "bottomedge")+obj.offsetHeight+"px"
}
return clickreturnvalue()
}

function clickreturnvalue(){
if ((ie5||ns6) && !enableanchorlink) return false
else return true
}

function contains_ns6(a, b) {
while (b.parentNode)
if ((b = b.parentNode) == a)
return true;
return false;
}

function dynamichide(e){
if (ie5&&!dropmenuobj.contains(e.toElement))
delayhidemenu()
else if (ns6&&e.currentTarget!= e.relatedTarget&& !contains_ns6(e.currentTarget, e.relatedTarget))
delayhidemenu()
}

function delayhidemenu(){
delayhide=setTimeout("dropmenuobj.style.visibility='hidden'",disappeardelay)
}

function clearhidemenu(){
if (typeof delayhide!="undefined")
clearTimeout(delayhide)
}
</script>

<%do while not rsBigMenu.eof
%>


<a href="#.asp?BigMenuID=<%=rsBigMenu("BigMenuID")%>" class="NavFont" onClick="return clickreturnvalue()" onMouseover="dropdownmenu(this, event, 'anylinkmenu1')"><%=rsBigMenu("BigMenuName")%></a> |
<div id="anylinkmenu1" class="anylinkcss"><%
set rsSmallMenu=server.CreateObject("adodb.recordset")
rsSmallMenu.open "Select * From SmallMenu Where BigMenuName='" & rsBigMenu("BigMenuName") & "'",conn,1,3
%><%if not(rsSmallMenu.bof and rsSmallMenu.eof) then
do while not rsSmallMenu.eof
%><a href="#.asp?BigMenuID=<%=rsBigMenu("BigMenuID")%>"><%=rsSmallMenu("SmallMenuName")%></a>
<%
rsSmallMenu.movenext
loop
end if
%></div>
<%rsSmallMenu.close
set rsSmallMenu=nothing

rsBigMenu.movenext
loop
%>

现在显示的有问题
关于我们 产品展示 解决方案
公司简介 公司简介 公司简介
总裁致辞 总裁致辞 总裁致辞

应该显示为
关于我们 产品展示 解决方案
公司简介 网络产品 医院解决方案
总裁致辞 布线产品 社保解决方案

对于上述代码如何解决？

[xiaofanfan]

怎么没有理？？？

[邦迪代驾]

你的代码太长了,你现在说说你想要实现什么效果就可以了

[xiaofanfan]

我想实现的效果是：
一级栏目：关于我们 产品展示 解决方案
二级栏目：公司简介 网络产品 医院解决方案
总裁致辞 布线产品 社保解决方案

栏目都是动态添加的，上面的<% ...%>里的是动态显示栏目的代码，我用的上面<% ...%>的代码显示的二级栏目有问题，显示为如下
一级栏目：关于我们 产品展示 解决方案
二级栏目：公司简介 公司简介 公司简介
总裁致辞 总裁致辞 总裁致辞

[xiaofanfan]

请高手指点一下好吗？谢谢了！

[xiaofanfan]

高手们都好忙呀？？！！没人理我？

[bino]

关于我们 产品展示 解决方案
公司简介 公司简介 公司简介
总裁致辞 总裁致辞 总裁致辞

这几个都始终没有出现过，你不说详细些，谁能解啊。。

[dsppcn]

表述有点问题!

[wymwan]

我 帮你定,我也不是很会这个,我就想用数据库做成,不用JS