Hola, el problema me imagino que es bastante simple, pero no encuentro la solucion.
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)
El error dice
Cita: "Esta fila ya pertenece a esta tabla."
No entiendo x q dice eso...
Espero que alguien me pueda dar una mano xq es muy importante.
Muchas gracias!