Tengo problemas con recorset

[dobled]

tengo tres recordset en tres tablas uno tras otro pero el primero lo muestra bien y los dos sgtes naaa solo me muestra el primer registro que puede ser!!!

[hugorei]

pone el codigo a ver si podemos ayudarte

[dobled]

Código PHP:

  <!--#include file="biblioteca/conexion.asp" -->
<%
 
id_matriz = "1"
NxSQL ="SELECT * FROM tpm_nivelesmatriz WHERE id_matriz = '"&id_matriz&"'  and nivel = '0' "
Set RS = Server.CreateObject("ADODB.Recordset")
RS.Open NxSQL, oConn,3,1
 
id_matriz = "1"
NxSQL ="SELECT * FROM tpm_nivelesmatriz WHERE id_matriz = '"&id_matriz&"'  and nivel = '1' "
Set RSx1 = Server.CreateObject("ADODB.Recordset")
RSx1.Open NxSQL, oConn,3,1
 
 
id_matriz = "1"
NxSQL ="SELECT * FROM tpm_nivelesmatriz WHERE id_matriz = '"&id_matriz&"'  and nivel = '2' "
Set RSx2 = Server.CreateObject("ADODB.Recordset")
RSx2.Open NxSQL, oConn,3,1
 
%>
<table width="300" border="0" cellpadding="0" cellspacing="1" bgcolor="#000000">
  <tr bgcolor="#FFFFFF"> 
    <td width="50"> 
      <div align="center" class="Titulo">NIVEL 0</div></td>
    <td width="250"> 
      <table width="250" border="0" cellpadding="0" cellspacing="1" bgcolor="#CCCCCC">
        <tr> 
          <%do while not Rs.eof%>
          <td height="20" bgcolor="#FFFFFF"> <%
codigo_curso = Rs("cod_curso")
NxSQL ="SELECT * FROM tpm_cursos WHERE codigo_curso = '"&codigo_curso&"' "
Set Rsx = Server.CreateObject("ADODB.Recordset")
Rsx.Open NxSQL, oConn,3,1
%> <%=Rsx("descripcion")%></td>
        </tr>
        <%
Rs.MoveNext
loop
%>
      </table></td>
  </tr>
</table>
<table width="300" border="0" cellpadding="0" cellspacing="1" bgcolor="#000000">
  <tr bgcolor="#FFFFFF"> 
    <td width="50"> 
      <div align="center" class="Titulo">NIVEL 1</div></td>
    <td width="250"> 
      <table width="250" border="0" cellpadding="0" cellspacing="1" bgcolor="#CCCCCC">
        <tr> 
          <%do while not Rsx1.eof%>
          <td height="20" bgcolor="#FFFFFF"> <%
codigo_curso = Rsx1("cod_curso")
NxSQL ="SELECT * FROM tpm_cursos WHERE codigo_curso = '"&codigo_curso&"' "
Set Rsx1 = Server.CreateObject("ADODB.Recordset")
Rsx1.Open NxSQL, oConn,3,1
%> <%=Rsx1("descripcion")%></td>
        </tr>
        <%
Rsx1.MoveNext
loop
%>
      </table></td>
  </tr>
</table>
<table width="300" border="0" cellpadding="0" cellspacing="1" bgcolor="#000000">
  <tr bgcolor="#FFFFFF"> 
    <td width="50"> 
      <div align="center" class="Titulo">NIVEL 2</div></td>
    <td width="250"> 
      <table width="250" border="0" cellpadding="0" cellspacing="1" bgcolor="#CCCCCC">
        <tr> 
          <%do while not Rsx2.eof%>
          <td height="20" bgcolor="#FFFFFF"> <%
codigo_curso = Rsx2("cod_curso")
NxSQL ="SELECT * FROM tpm_cursos WHERE codigo_curso = '"&codigo_curso&"' "
Set Rsx2 = Server.CreateObject("ADODB.Recordset")
Rsx2.Open NxSQL, oConn,3,1
%> <%=Rsx2("descripcion")%></td>
        </tr>
<%
Rsx2.MoveNext
loop
%>
      </table></td>
  </tr>
</table> 
   

[malpika]

antes de nada asegurate de los campos de las tablas ke son numericos y los que son texto, los de texto van entre comillas simples y los numericos no llevan nada

[Teklili]

Yo tuve el mismo problema hace 2 meses. En este mismo foro publiqué como lo solucioné (por supuesto con la invalorable colaboración de algunos miembros de este club) y además doy algunas sugerencias para que no te pase lo mismo que a mi.

El título es " Urgente... problemas con recordset" si no lo encuentras te paso la dirección de la página del mensaje publicado para que veas al final las sugerencias.


http://www.forosdelweb.com/showthrea...+con+recordset

Espero que tengas suerte.