Ver Mensaje Individual
  #6 (permalink)  
Antiguo 29/01/2010, 11:53
igonfil
 
Fecha de Ingreso: junio-2008
Mensajes: 250
Antigüedad: 16 años, 9 meses
Puntos: 1
Respuesta: Problema con la tabla dinámica

Que tal. Voy a explicar mejor lo que quiero hacer y no consigo Si alguien me puede echar una manita se lo agradecería mucho
Tengo dos tablas:

Cita:
Esta es la tabla T_Preguntas

c_idpregunta.............. c_pregunta

.........1....................¿Cuanto es 2x2?
.........2....................¿Cuanto es 4x4?
Cita:
Esta es la tabla T_Respuestas

c_idrespuesta........................c_idpregunta. .......................c_respuestas

.........1........................................ ....1............................................4
.........2........................................ ....1............................................5
.........3........................................ ....1............................................6
.........4........................................ ....2............................................7
.........5........................................ ....2............................................1 6
.........6........................................ ....2............................................9
El código que tengo es:
Código PHP:
rs1 Me.conexion.consultar("select * from T_Preguntas Inner Join T_Respuestas on T_Preguntas.c_idpregunta=T_Respuestas.c_Pregunta "
Dim filas As New TableRow 
        Dim celdas 
As New TableCell 
         
        
Do While rs1.Read 
            filas 
= New TableRow 'Iniciamos el objeto fila 
            celdas = New TableCell '
Iniciamos el objeto columna 
            filas
.Cells.Add(celdas'Agragamos celda a la fila 
            celdas.Text = rs1("c_pregunta")    '
Texto para la celda 
            Me
.tblEjemplo.Rows.Add(filas'Agragamos la fila a la tabla 
            filas = New TableRow '
Iniciamos el objeto fila 
            celdas 
= New TableCell 'Iniciamos el objeto columna 
            filas.Cells.Add(celdas) '
Agragamos celda a la fila 
            celdas
.Text rs1("c_Respuestas")    'Texto para la celda 
            Me.tblEjemplo.Rows.Add(filas) '
Agragamos la fila a la tabla 
         Loop 
Cita:
El resultado que consigo con este código es:

1. ¿Cuanto es 2x2?
a. 4
1. ¿Cuanto es 2x2?
b. 5
1. ¿Cuanto es 2x2?
c. 6
2. ¿Cuanto es 4x4?
a. 7
2. ¿Cuanto es 4x4?
b. 16
2. ¿Cuanto es 4x4?
c. 9
Cita:
El resultado que deseo es:
1. ¿Cuanto es 2x2?
a. 4
b. 5
c. 6
2. ¿Cuanto es 4x4?
a. 7
b. 16
c. 9