asp实现三级联动表单

< ! -- #include file = " conn.asp " -->
  < %sqlstr = " select * from prolei "
  set  rs = conn.execute(sqlstr)
  set  rs1 = server.CreateObject( " adodb.recordset " )
    sqlstr1  =   " select * from seclei order by prolei_id desc "
     set  rs1  =  conn.execute(sqlstr1)
set  rs2 = conn.execute( " select * from endlei order by seclei_id desc " )
% >
< script language  =   " JavaScript " >
var onecount;
onecount = 0 ;
subcat  =   new   Array ();
     < %
        CountLinkAction  =   0
     do   while   not  rs1.eof 
% >
    subcat[ < % = CountLinkAction% > ]  =   new   Array ( " <%= trim(rs1( " seclei " ))%> " , " <%= trim(rs1( " prolei_id " ))%> " , " <%=trim(rs1( " id " ))%> " );
//     subcat[ < % = CountLinkAction% > ]  =   new   Array ( " <%= trim(rs1( " seclei " ))%> " , " <%= trim(rs1(