Al querer asignar los valores de los campos de un datarow (de una fila nueva) me tira error el acceptchanges.
Código PHP:
Dim oDTMedico As DataTable = objDsDatos.Tables("Medicos")
Dim oDTMedicoLog As DataTable = objDsDatos.Tables("MedicosLog")
Dim oRowMed As DataRow = oDTMedico.Rows(0)
Dim oRowMedLog As DataRow = oDTMedicoLog.NewRow
oRowMedLog("MedicoID") = oRowMed("MedicoID")
oRowMedLog("EmpresaID") = MyBase.Contexto.EmpresaId
oRowMedLog("CodMedico") = oRowMed("CodMedico")
oRowMedLog("ApeyNom") = oRowMed("ApeyNom")
oRowMedLog("ProveedorID") = oRowMed("ProveedorID")
oRowMedLog("Matricula") = oRowMed("Matricula")
oRowMedLog("TipoDocID") = oRowMed("TipoDocID")
oRowMedLog("NroDocumento") = oRowMed("NroDocumento")
oRowMedLog("EspecialidadID") = oRowMed("EspecialidadID")
oRowMedLog("Telefono") = oRowMed("Telefono")
oRowMedLog("Direccion") = oRowMed("Direccion")
oRowMedLog("Localidad") = oRowMed("Localidad")
oRowMedLog("ProvinciaID") = oRowMed("ProvinciaID")
oRowMedLog("DireccionProf") = oRowMed("DireccionProf")
oRowMedLog("LocalidadProf") = oRowMed("LocalidadProf")
oRowMedLog("ProvinciaProf") = oRowMed("ProvinciaProf")
oRowMedLog("email") = oRowMed("email")
oRowMedLog("JefeZonaID") = oRowMed("JefeZonaID")
oRowMedLog("ClasificacionMedicoID") = oRowMed("ClasificacionMedicoID")
oRowMedLog("FechaModif") = oRowMed("FechaModif")
oRowMedLog("LogUsuario") = MyBase.Contexto.UsuarioId
oDTMedicoLog.Rows.Add(oRowMedLog)
oRowMedLog.AcceptChanges()
oRowMedLog.SetAdded()
oDTMedicoLog.Rows.Add(oRowMedLog)
Cita:
No entiendo x q dice eso..."Esta fila ya pertenece a esta tabla."
Espero que alguien me pueda dar una mano xq es muy importante.
Muchas gracias!