asp 数据库版二级联动菜单.doc

ASP+数据库版的二级联动菜单
数据表结构：
BigClass
 BigClassID
  int 
 4
 BigClassName
 varchar
 50

SmallClass
 SmallClassID
 int
 4
 SmallClassName
 varchar
 50
 BigClassID
 int
 4
ASP中经常要用到联动菜单，把以前写的一个ASP+数据库版的二级联动的贴这里来，免得以后要用起来再重新去写了。
数据表结构：
BigClass
 BigClassID
  int 
 4
 BigClassName
 varchar
 50

SmallClass
 SmallClassID
 int
 4
 SmallClassName
 varchar
 50
 BigClassID
 int
 4

以下是程序：
< language = "java">
var j;
j=0;
goaler = new Array();
<%set rs=conn.execute("select * from SmallClass order by SmallClassID")
if rs.eof then%>
goaler[0] = new Array("无分类","","");
<%else
i=0
do while not rs.eof%>
goaler[<%=i%>] = new Array("<%=rs("SmallClassName")%>","<%=rs("BigClassID")%>","<%=rs("SmallClassID")%>");
<%rs.movenext
i=i+1
loop
end if
rs.close
%>
j=<%=i%>;
changelocation(locationid)
{
goalerform.SmallClassID.length = 0;
var locationid=locationid;
var i;
for (i=0;i < j; i++)
{
if (goaler[i][1] == locationid)
{
goalerform.SmallClassID.options[goalerform.SmallClassID.length] = new Option(goaler[i][0], goaler[i][2]);
}
}
}

<%set rs=conn.execute("select * from BigClass order by BigClassID")
if rs.eof then%>
无一级分类
<%else%>
请选择一级分类
<%do while not rs.eof%>
"><%=rs("BigClassName")%>
<%rs.movenext
loop
end if%>

未指定一级分类