asp实现无限类分类JS版的方法

menuarr =新的数组（）
menulenarr =新的数组（）
submenuarr =新的数组（）
menuidarr =新的数组（）
menuarr { 1 } = / /洲名| | |…
menuarr { 2 } = / / # # #名字| | |洲名…
menuidarr { 1 } =周
menuidarr { 2 } =作者
menuclass = 2 / / 4级菜单
splitchar1 =| | | ；
splitchar2 =# # # ；
基本menuarr { 1 }和{ 2 }类输出menuarr
Options.add（新的选项（-----
添加（新选项（）文本
由JS生成的值在TOP1的名字，一些身份，一些字，和改性的原则下，结合数据库的可行性选择。

子TOP1

SQL =SELECT * FROM 2型
rs.open sql，Conn，1,1
而not rs.eof
一个RS（成员）
B = RS（p_type2 ）
叫TOP2（一、一）
移到下一项
走
关闭
端子

子top11

SQL =SELECT * FROM 2型
rs.open sql，Conn，1,1
而not rs.eof
response.write（RS（p_type2 ）| | | ）
移到下一项
走
关闭
端子
子TOP2（ID，B）
SQLE =SELECT DISTINCT（作者）从产品，ID2 =ID
设置RSA = server.createobject（ADODB。记录集）
Rsa.open sqle，Conn，1
如果不是，那么
而不是rsa.eof
response.write（B# # # ）
response.write RSA（作者）的| | |
rsa.movenext
走
其他的
response.write（B# # # ）
没有response.write| | |
最后如果
rsa.close
端子

%>