Ver Mensaje Individual
  #2 (permalink)  
Antiguo 25/02/2010, 15:06
igonfil
 
Fecha de Ingreso: junio-2008
Mensajes: 250
Antigüedad: 18 años, 3 meses
Puntos: 1
Respuesta: Radio Button dinámico

Bueno e introducido en mi código el radiobutton pero lo que me sucede que no me los muestra ¿Cuál es mi error? Muchas gracias
Código PHP:
For Each FilaC In filaR.GetChildRows(relacion)

                
radiobutton1.Visible = True
                radiobutton1
.Attributes.Add("onmouseover", "this.style.backgroundColor = 'red'")


            
Next 
Entonces mi código quería de la siguiente manera
Código PHP:
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim respuesta 
As Integer = "4"

        
Dim rs1 As New SqlDataAdapter
        rs1 
= Me.conexion.consulta2("select * from T_preguntas")
        
Dim rs2 As New SqlDataAdapter
        rs2 
= Me.conexion.consulta2("select * from T_respuestas")


        
Me.lblsesion.Text = Session("alumno")

        
Dim objDs As New Data.DataSet
        rs1
.Fill(objDs, "Preguntas")
        
rs2.Fill(objDs, "Respuestas")
        
Dim relacion As Data.DataRelation = objDs.Relations.Add("Examen", objDs.Tables("Preguntas").Columns("c_idpregunta"), objDs.Tables("Respuestas").Columns("c_Pregunta"))
        
Dim filaR, filaT, FilaC As Data.DataRow

        Dim radiobutton1 
As New RadioButton
        
For Each filaR In objDs.Tables("Preguntas").Rows
            Response
.Write("<br>" & filaR("c_Pregunta").ToString)
            For 
Each FilaC In filaR.GetChildRows(relacion)

                
radiobutton1.Visible = True
                radiobutton1
.Attributes.Add("onmouseover", "this.style.backgroundColor = 'red'")


            
Next
            
For Each filaT In filaR.GetChildRows(relacion)
                
Response.Write("<br>" & filaT("c_Respuestas").ToString)
            
Next
        Next

        


    End Sub