ASP實作可顯示且隱藏的樹型選單

以下是引用片段：
<腳本語言=“javascript”>
函數隱藏全部（）{
for(i=0;i<odiv.length;i++) {
odiv[i].style.display="無";
}
}
函數 showObj(num)
{

if (odiv[num].style.display=="無")
{
隱藏全部（）；
odiv[num].style.display="內聯";
}
別的 {
odiv[num].style.display="無";
}
}
</腳本>
<樣式類型=“文字/css”>
<!--
.divctrl{
遊標：手；高度：20px；
}
-->
</風格>
<div onClick="showObj(0)" class="divctrl"><a href="#">div</a></div>
<div id="odiv" style="display:inline">
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
</div>
<div onClick="showObj(1)" class="divctrl"><a href="#">div</a></div>
<div id="odiv" style="display:inline">
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
</div>
<div onClick="showObj(2)" class="divctrl"><a href="#">div</a></div>
<div id="odiv" style="display:inline">
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
</div>
<div onClick="showObj(3)" class="divctrl"><a href="#">div</a></div>
<div id="odiv" style="display:inline">
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
</div>
<div onClick="showObj(4)" class="divctrl"><a href="#">div</a></div>
<div id="odiv" style="display:inline">
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
</div>
ASP
<%
if request("showobj")<>"" then response.Cookies("showobj")=request("showobj")
如果 isnull(response.Cookies("showobj")) 那麼 response.Cookies("showobj")=0
%>
<腳本語言=“javascript”>
函數隱藏全部（）{
for(i=0;i<odiv.length;i++) {
odiv[i].style.display="無";
}
}

函數 showObj(num)
{

if (odiv[num].style.display=="無")
{
隱藏全部（）；
odiv[num].style.display="內聯";
}
別的 {
odiv[num].style.display="無";
}

}
</腳本>
<樣式類型=“文字/css”>
<!--
.divctrl{
遊標：手；高度：20px；
}
-->
</style>

<div onClick="showObj(0)" class="divctrl"><a href="?showobj=0">div</a></div>
<div id="odiv" style="display:<%if request.Cookies("showobj")=0 then: response.Write "inline" :else response.Write "none":end if %>">
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
</div>
<div onClick="showObj(1)" class="divctrl"><a href="?showobj=1">div</a></div>
<div id="odiv" style="display:<%if request.Cookies("showobj")=1 then: response.Write "inline" :else response.Write "none":end if %>">
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
</div>
<div onClick="showObj(2)" class="divctrl"><a href="?showobj=2">div</a></div>
<div id="odiv" style="display:<%if request.Cookies("showobj")=2 then: response.Write "inline" :else response.Write "none":end if %>">
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
</div>
<div onClick="showObj(3)" class="divctrl"><a href="?showobj=3">div</a></div>
<div id="odiv" style="display:<%if request.Cookies("showobj")=3 then: response.Write "inline" :else response.Write "none":end if %>">
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
</div>
<div onClick="showObj(4)" class="divctrl"><a href="?showobj=4">div</a></div>
<div id="odiv" style="display:<%if request.Cookies("showobj")=4 then: response.Write "inline" :else response.Write "none":end if %>">
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
<li><a href="#">div</a></li>
</div>