编写一个包含两个级别目录的源代码（javaｓｃｒｉｐｔ）

**********************（1）打开记录集，创建一个数组，记录集分配给数组的值。
<
模糊数
集= server.createobject（ADODB。记录集）
SQL =选择*从bookboard classid属性命令
rs.open sql，CN，1,1 %>

无功onecount；
onecount = 0；
subcat =新的数组（）；
<计数= 0
Do while not Rs.eof% >
subcat { } =新的数组（
<计数=计数+ 1
移到下一项
环
Rs.close % >
onecount =；
功能变化的位置（LocationID）
{ document.form1.boardid.length = 0；
VaR LocationID = LocationID；
var i；
为（i = 0；i < onecount；i++）
{如果（subcat {我} { 1 } = LocationID）
{文件。1。boardid。选择{文件。1。boardid。长度} =新的选项（subcat {我} { 0 }，{我subcat } { 2 }）；


**********************（2）显示组和列表框的onchange事件的制备。
< %集= server.createobject（ADODB。记录集）
SQL =SELECT * FROM bookclass顺序classid desc
rs.open sql，CN，1,1
如果Rs.eof和Rs.bof
response.write 请加普通班第一。
response.end
别的%>

请选择类= =

>
<%移到下一项
环
最后如果
rs.close
设置RS = 0 % >

请选择一个小类=