各位老大，帮偶看看这样的代码应该怎样写？● ● 急急急……

我想做一个二级菜单树：
－－－default.asp
<HTML>
<HEAD>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<TITLE>树状菜单</TITLE>
</HEAD>
<BODY>
    <script language=javascript>
      var item_num=2;  
      var item_word=new Array();
      for(i=0;i<item_num;i++)
        item_word[i]=new Array();
      item_word[0][0]="大类1－－子类1";      
      item_word[0][1]="大类1－－子类2";
      item_word[0][2]="大类1－－子类3";      item_word[1][0]="大类2－－子类1";
      item_word[1][1]="大类2－－子类2";
  var item_link=new Array();  //菜单的链接
      for(i=0;i<item_num;i++)
        item_link[i]=new Array();
      item_link[0][0]="default.asp?Bid=1&Sid=1";
      item_link[0][1]="default.asp?Bid=1&Sid=2";
      item_link[0][2]="default.asp?Bid=1&Sid=3";      item_link[1][0]="default.asp?Bid=2&Sid=1";
      item_link[1][1]="default.asp?Bid=2&Sid=2";
      var item=new Array();  //菜单的HTML
      for(i=0;i<item_num;i++)
        item[i]="";
      for(i=0;i<item_num;i++)
        for(j=0;j<item_word[i].length;j++)
          item[i]+=" |-● <a class=childlink href="+item_link[i][j]+" onclick=javascript:this.blur();>"+item_word[i][j]+"</a><br>";      //------------定义一个清空各菜单的函数--------------
      function startItem()
      {
        for(i=0;i<item_num;i++)
        document.all.titem.cells[2*i+1].innerHTML="";
      }     //------------定义一个菜单展开的函数----------------
     function openItem(n)
     {
       if(document.all.titem.cells[n*2+1].innerHTML=="")
       {
         startItem();
         document.all.titem.cells[n*2+1].innerHTML=item[n];
       }
       else
         startItem();
     }     //-----------------开始实现菜单-------------------
     document.writeln("<table id=titem>");
     document.writeln("  <tr><td height=20 valign=bottom>● <a class=parentlink href=javascript: onclick=javascript:openItem(0);this.blur();>大类1</a></td></tr>");
     document.writeln("  <tr><td class=childlink valign=middle></td></tr>");
     document.writeln("  <tr><td height=20 valign=bottom>● <a class=parentlink href=javascript: onclick=javascript:openItem(1);this.blur();>大类2</a></td></tr>");
     document.writeln("  <tr><td class=childlink></td></tr>");
     document.writeln("</table>");
   </script><%
Response.Write "大类号："
Response.Write Request("Bid")
Response.write "<br>"
Response.Write "小类号："
Response.Write Request("Sid")
%>
  </BODY>
</HTML>我想当点击“大类1”的时候能传值为default.asp?Bid=1&Sid=0
且二级菜单能展开或关闭
请问大家代码该怎样改？？