Arbol en foro ASP

[eduvivi]

Gracias venom_plus, el error no salto mas pero del arbol nada

Esto es lo que tengo:
Primero un Select

sql = "SELECT * FROM discusion WHERE IdCabeza=0 ORDER BY Fecha DESC"

Despues 2 bucles uno dentro del otro el primero busca todos los mensajes con valor cero del IdCabeza y dentro de este otro que pretendo que busque los que tengan relacion con el mensaje IdCabeza pero con valorees distinto de cero:


<%do while not rs.EOF and cant_registros < mostrar
fecha = RS("Fecha")
sql = "SELECT * FROM discusion WHERE IdCabeza = " & RS("IdMensaje")
do while not rs.EOF
%>
<TR bgcolor="#FFCCFF">
<TD width="73%"><font face="Verdana, Arial, Helvetica, sans-serif" size="1"><IMG SRC="../images/asunto.gif" width="16" height="14">

<A HREF="vermensaje.asp?idmensaje=<%=RS(&quot ;IdMensaje")%>"><B><%=(RS .Fields("Titulo"))%></B></A></font></TD>
<% Response.Write "<TD ALIGN=center> <FONT SIZE=1>"&RS("Respuestas")&am p;" </TD><TD ALIGN=center><FONT SIZE=1>" &Day(fecha)&"/"&Month(fecha)&"/"&Year(fecha)&"</FONT><BR></TD></TR>"
cant_registros = cant_registros +1

RS.MoveNext
Loop
Loop
%>

Solo me busca los mensajes con valor cero y los otros no me los muestra, alguna idea de porque pasa esto?