调试易

功能： 
下拉菜单     产品1类   （产品1类）                    ’如产品“手机系列” 
下拉菜单     产品2类   （产品1类下的直属类2）         ’如产品   “手机”中的“手机电池” 
下拉菜单     产品3类   （直属类2下的直属类3）         ’如产品   “手机”中的“手机电池”中“XX型号系列” 问题： 
下拉菜单     产品3类   （直属类3）   不能显示 
================================================================ 
=========================以下为   无问题代码======================== 
<script   language="JavaScript"> 
<% 
set   rs=server.createobject("adodb.recordset") 
sql   =   "select   *   from   nsmallarea   "                             ’电池表 
rs.open   sql,conn,1,1 
%> 
        var   onecount; 
        onecount=0; 
        subcat   =   new   Array(); 
                <%count   =   0 
                do   while   not   rs.eof   %> 
        subcat[ <%=count%> ]   =   new   Array(" <%=   trim(rs("nsmallarea"))%> "," <%=cstr(rs("nbigarea"))%> "," <%=cstr(rs("id"))%> "); <%count   =   count   +   1 
                rs.movenext 
                loop 
                rs.close 
                %> 
        onecount= <%=count%> ; function   changelocation(locationid) 
        { 
        document.dataform.xiaolei.length   =   0;   
        var   locationid=locationid; 
        var   i; 
        document.dataform.xiaolei.options[document.dataform.xiaolei.length]   =   new   Option('直属大类',0); 
        for   (i=0;i   <   onecount;   i++) 
                { 
                        if   (subcat[i][1]   ==   locationid) 
                        {   
                                document.dataform.xiaolei.options[document.dataform.xiaolei.length]   =   new   Option(subcat[i][0],   subcat[i][2]); 
                        }       
} 
if(document.dataform.xiaolei.length   ==   0) 
{ 
document.dataform.xiaolei.options[document.dataform.xiaolei.length]   =   new   Option("没有相关小类",   "0"); 
} 
} 
//   end   JavaScript   --> 
</script> 
==================================无问题代码over================================== 
==========================以下为有问题代码   自己照上面改的=========================== 
<!--3类JS   begin--> 
<script   language="JavaScript"> 
<% 
set   rs=server.createobject("adodb.recordset") 
sql   =   "select   *   from   n3area   " 
rs.open   sql,conn,1,1 
%> 
        var   onecount1; 
        onecount1=0; 
        subcat1   =   new   Array(); 
                <%count   =   0 
                do   while   not   rs.eof   %> 
        subcat1[ <%=count%> ]   =   new   Array(" <%=   trim(rs("n3area"))%> "," <%=cstr(rs("nsmallarea"))%> "," <%=cstr(rs("id"))%> "); <%count1   =   count1   +   1 
                rs.movenext 
                loop 
                rs.close 
                %> 
        onecount1= <%=count%> ; function   changelocation1(locationid) 
        { 
        document.dataform.sanlei.length   =   0;           var   locationid=locationid; 
        var   j; 
        document.dataform.sanlei.options[document.dataform.sanlei.length]   =   new   Option('直属大类',0); 
        for   (j=0;j   <   onecount1;   j++) 
                { 
                        if   (subcat1[j][1]   ==   locationid) 
                        {   
                                document.dataform.sanlei.options[document.dataform.sanlei.length]   =   new   Option(subcat1[j][0],   subcat1[j][2]); 
                        }       
} 
if(document.dataform.sanlei.length   ==   0) 
{ 
document.dataform.sanlei.options[document.dataform.sanlei.length]   =   new   Option("没有相关小类",   "0"); 
} 
          } 
//   end   JavaScript   --> 
</script> <!--   3类   end   JavaScript   --> 
================以下为表单============== 
<form   method="POST"   name="dataform"   action="pud_add.asp?action=save"> 
产品1类 
<select   name="dalei"   id="dalei"   onChange="changelocation(document.dataform.dalei.options[document.dataform.dalei.selectedIndex].value)"   > 
<option   value=""> 选择一类 </option> <%set   rs1=server.CreateObject("adodb.recordset") 
sql1="Select   *   from   nbigarea   order   by   num"   
rs1.open   sql1,conn,1,1 
if   rs1.eof   and   rs1.bof   then 
response.write   "没有大类" 
else 
do   while   not   rs1.eof   
%> 
<option   value=" <%=rs1("id")%> "> <%=rs1("nbigarea")%> </option> 
<% 
rs1.movenext 
loop 
end   if 
rs1.close 
set   rs1=nothing 
%> 
</select> 产品2类 
<select   name="xiaolei"   id="xiaolei"   onChange="changelocation1(document.dataform.xiaolei.options[document.dataform.xiaolei.selectedIndex].value)"> 
                                    <option   selected> 选择二类 </option>                         ’这里不知道改的对不对？ 
</select> 产品3类 <select   name="sanlei"   id="sanlei"> 
                                    <option   selected> 选择三类 </option> 
</select> ============下面内容省============= ==============================补充   3类   是不是得要用   3维数组啊？================== 
希望高手帮我改下   谢谢