1
« en: Martes 15 de Mayo de 2007, 17:29 »
mi problema es cuando pongo en un arraylist mi clase oTipoTrabajadorBE, cuando depuro me copia la cantidad de clases como tiene en mi base de datos, pero el problema es qeu el ultimo valor es el que se copia a todos los valores de mi arraylist... que debo hacer?
Protected Sub btnGrabar_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnGrabar.Click
Dim oTipoTrabajador As New MDSMPPlanillaBLL.MDSMP.Negocios.ConceptoTipoTrabajadorBLL
Dim oTipoTrabajadorBE As New MDSMPPlanillaBE.MDSMP.BusinessEntity.clsConcepto_TipoTrabajador
Dim arrConceptosSeleccionados As New ArrayList
Dim success As Boolean = False
Dim i, tipo As Integer
Dim chkBox As CheckBox
Dim lblResult As Label
Tipo = Me.RadioButtonList1.SelectedValue
For i = 0 To DataList1.Items.Count - 1
chkBox = DataList1.Items(i).FindControl("chkConcepto")
lblResult = DataList1.Items(i).FindControl("labelid")
oTipoTrabajadorBE.Obligatorio = chkBox.Checked
oTipoTrabajadorBE.ConceptoID = CInt(lblResult.Text)
oTipoTrabajadorBE.TipoTrabajadorID = Tipo
arrConceptosSeleccionados.Add(oTipoTrabajadorBE)
Next
success = oTipoTrabajador.InsertarConceptosxTipo(arrConceptosSeleccionados)
End Sub