tengo este codigo en el repeater y en el boton de enviar tengo que recorrer el repeater y dejar los resultados en una variable para luego ir insertandola en la tabla.aver si alguien me puede ayudar a programar ese boton,me esta dando bastantes problemas
gracias por anticipado
Private Sub repeater1_ItemDataBound(ByVal sender As Object, ByVal e As RepeaterItemEventArgs) Handles repeater1.ItemDataBound
If Not DataBinder.Eval(e.Item.DataItem, "pre_id") Is Nothing Then
Dim fila As TableRow = New TableRow()
Dim celda As TableCell = New TableCell()
celda.Text = DataBinder.Eval(e.Item.DataItem, "pre_descrip")
fila.Cells.Add(celda)
repeater1.Controls.Add(fila)
fila = New TableRow()
celda = New TableCell()
Dim radio As RadioButtonList = New RadioButtonList()
'Dim txt As TextBox
If DataBinder.Eval(e.Item.DataItem, "pre_tipo") = 1 Then
radio.Items.Add("Muy alto")
radio.Items.Add("Alto")
radio.Items.Add("Medio")
radio.Items.Add("Bajo")
radio.Items.Add("Muy bajo")
ElseIf DataBinder.Eval(e.Item.DataItem, "pre_tipo") = 2 Then
radio.Items.Add("si")
radio.Items.Add("no")
ElseIf DataBinder.Eval(e.Item.DataItem, "pre_tipo") = 3 Then
celda = New TableCell()
Dim tex As TextBox = New TextBox()
celda.Controls.Add(tex)
End If
celda.Controls.Add(radio)
fila.Cells.Add(celda)
repeater1.Controls.Add(fila)
End If
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Dim i As Integer = 0
Dim res As String
While i < repeater1.Controls.Count
If CType(repeater1.Controls(i).Controls(1), RadioButtonList).SelectedIndex > -1 Then
res = CType(repeater1.Controls(i).Controls(1), RadioButtonList).SelectedItem.Text
End If
i += 1
End While
End Sub
