<table width="98%" border="2" align="center" cellpadding="1" cellspacing="1" bordercolor="#FFFFFF" bgcolor="#CCCCCC">
          <tr>
            <td width="17%" align="right" background="images/topbg.gif" bgcolor="#f4f4f4"><strong>选择分类：</strong></td>
            <td bgcolor="#FFFFFF">
<select name="categoryid">  
<%
sort(0)
dim ii
ii=0
sub sort(selec)
    sql="select * from category where ParentID = "&selec&" order by categoryorder"
    Set Rs1=Conn.Execute(sql)
    do while not rs1.eof
if selec=0 then
%>
<option value="<%=int(rs1("categoryid"))%>" <% if int(rs1("categoryid"))=rsedit("categoryid") Then Response.write("Selected") %>><%=rs1("category")%></option>
<%
else
%>
<option value="<%=int(rs1("categoryid"))%>" <% if int(rs1("categoryid"))=rsedit("categoryid") Then Response.write("Selected") %>><%=string(ii*2,"　")%><%=rs1("category")%></option>
<%
end if
ii=ii+1
    sort rs1("categoryid")
ii=ii-1
    rs1.movenext
    loop
rs1.close
Set Rs1 = Nothing
end sub

%>
        </select>            </td>
 
求助! 以上怎么修改才能实现二级联动?



现在大类和二类全在里面,只能选一个 .想实现先选大类,再选二类

跪求各位大侠详细指点!!!

[ 本帖最后由 liqinyu 于 2011-12-21 16:21 编辑 ]