asp实现树型结构

<script>
<!--
function turnit(ss,ii)
{
 if (ss.style.display=="none")
  {ss.style.display="";
   ii.src="img/tree1.gif";
}
 else
  {ss.style.display="none";
   ii.src="img/tree0.gif";}
}
//-->
</script>

<%
i=1
set rs=server.createobject("adodb.recordset")
sql="SELECT * from href where lei=0"
rs.open sql,conn,1,3
do while not rs.eof
session("temp_lei") =trim(rs("lei5"))
i=i+1
%>

<TABLE width="100%" border=0 cellPadding=0 cellSpacing=0 bgcolor="#7292E1">
 <TR>
  <TD height="25" background="img/bj_tree0.gif" id=01 style="CURSOR: hand" οnmοuseup=turnit(Content<%=i%>,Img<%=i%>); language=JScript>
   <table width="80%"  border="0" align="center" cellspacing="0">
    <tr>
     <td>
<div align="center"><strong><img src="imgs/jia.jpg" width="13" height="11" id=Img<%=i%>></strong><%=rs("lname")%></div>   

     </td>
    </tr>
   </table>
  </TD>
 </TR>
       
 <TR>
  <TD bgcolor="#4FA5FB" id=Content<%=i%> style="DISPLAY: none">                           
   <table width="100%"  border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#4FA5FB">
    <tr>
     <td bgcolor="#7496E2"><table width="100%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#7292E1">

      <tr>
                         <td colspan="2" valign="top" bgcolor="#D6DFF7">
        <table width="80%"  border="0" align="center" cellspacing="1">
                              <tr>
                                   <td width="15"><div align="center"><strong><img src="imgs/jia.jpg" width="13" height="11" id=Img<%=i%>></strong></div></td>
                                     <td>
          
<%

If session("temp_lei")<>"" then
 set rs1=server.createobject("adodb.recordset")
   sql="SELECT  * from lei where lei1="&session("temp_lei")
      rs1.open sql,conn,1,3
   do while not rs1.eof
temp_lllei =trim(rs1("lllei"))
Response.Write(temp_lllei)
Response.Write("<br>")
rs1.movenext
loop
rs1.close
set rs1=nothing
Else
Response.Write("暂时没有栏目")
End if
%>