Ver Mensaje Individual
  #6 (permalink)  
Antiguo 23/03/2009, 17:05
Avatar de Myakire
Myakire
Colaborador
 
Fecha de Ingreso: enero-2002
Ubicación: Centro de la república
Mensajes: 8.849
Antigüedad: 23 años, 2 meses
Puntos: 146
Respuesta: Por favor ayuda para terminar de codificar un CICLO ANIDADO utilizando 2 t

ups!

Bueno, la verdad es que solo tomé tu primer código y lo empecé a modificar en el mismo cuadro de respuesta rápida, ese fue un error mio al colocar por inercia algo referente a un RecordSet.

En tu caso, lo más sencillo (quizá no es lo mejor pero si lo más sencillo) seria colocar en lugar de esa linea algo como esto:

Código ASP:
Ver original
  1. Set rshijos_cmd = Server.CreateObject ("ADODB.Command")
  2. rshijos_cmd.ActiveConnection = MM_conn_PMR2009_STRING
  3. rshijos_cmd.CommandText = "SELECT Tra_ID, Tra_NoModalidad as cveSec, Tra_HomoclaveGeneral as clave, Tra_HomoclaveModalidad, " &_
  4.                     "       Tra_Nombre, Tra_NombreModalidad FROM dbo.Tramite t WHERE t.Tra_NoModalidadTmp > 0 AND Dep_ID =100 " &_
  5.                             "       AND Tra_ID = " & rsPadre.Fields.Item("Tra_ID").Value
  6. rshijos_cmd.Prepared = true
  7. Set rsPadre = rsPadre_cmd.Execute

y en lugar de rshijos.Close poner
Código ASP:
Ver original
  1. rshijos.Close()
  2. Set rshijos = Nothing

La idea era de que vieras y analizaras como se puede imprimir un Maestro-Detalle de una forma simple y rápida. Ahorita así como te puse que lo hicieras creas y destruyes por cada registro padre un objeto Command, esto te puede hacer un poco lento el proceso, ¿qué tanto? depende de registros maestro que tengas, hay otras formas de hacerlo pero esta es la más parecida a lo que ya tienes y no te implica conocer nada nuevo

Saludos