Problema para actualizar BD's SQL (Esta fila ya pertenece a esta tabla)

[iwanapapu]

Problema para actualizar BD's SQL

[diegolo]

Iniciado por iwanapapu

Hola!! Es la primera vez q recurro al foro para solucionar un problema, espero q me ayuden.

El Problema:

No ACTUALIZA los registros en una de mi Tb_General, me sale el siguiente mensaje 'Esta fila ya pertenece a esta tabla'

Public Function ModificarRegistros(ByVal codgeneral As String, ByVal v1 As String,...,v40 As String) As Boolean

Dim cmd As New SqlCommand
Dim vexito As Boolean
vsql = "Update Tb_General set cod_pais=@v1,...nab=@v40 where cod_general=@codgeneral"
cmd.Connection = cnx
cmd.CommandType = CommandType.Text
cmd.CommandText = vsql

'Agregamos parametros para la instruccion SQL
Try
cmd.Parameters.Add(New SqlParameter("@codgeneral", SqlDbType.NVarChar, 4))
cmd.Parameters("@codgeneral").Value = codgeneral

cmd.Parameters.Add(New SqlParameter("@v1", SqlDbType.Int, 4))
cmd.Parameters("@v1").Value = v1
......
cmd.Parameters.Add(New SqlParameter("@v40", SqlDbType.Char, 15))
cmd.Parameters("@v40").Value = v40

cnx.Open()
cmd.ExecuteNonQuery()
vexito = True
Catch x As SqlException
MsgBox(x.Message())
vexito = False
Finally
cnx.Close()
End Try
Return vexito
End Function

Esta funcion va dentro del metodo Sub Modificar(), donde recibe los 40 parámetros

Dentro de este Sub Modificar() al final declaro:

'Aqui coloque un punto de interrupción y todas las variables son correctas y no hay null

ModificarRegistros(codgeneral, v1, v2, ...,v40)

MsgBox("Datos modificados", MsgBoxStyle.Information)
Catch ex As Exception
MsgBox(ex.Message) 'Esta fila ya pertenece a esta tabla

End Try
End Sub


No sé q tanto puede ayudar el código q he colocado aqui, pero espero q sea lo necesario para q me puedan ayudar.

Ciao

Despues del try le estas otra vez grabando el codigo y se supone que el codigo ya no se graba cuado estas modificando un registro, igual al inicio despues del update no se modifica nunca el codigo quitale de ahi y ya no tesale ese error
Y¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡TARAN TODO RESUELTO!!!!!!!!!!!! AVISAME CUALQUIER COSA PARA VER QUE PASA LISTO?

[iwanapapu]

Problema para actualizar BD's SQL

[Peterpay]

Trata de mandar los parametros en el mismo orden en el q estna definidos en tu command, sql server suele ser muy especial.

[iwanapapu]

Problema para actualizar BD's SQL

[Peterpay]

puedes poner todo tu codigo de nuevo?

[iwanapapu]

Problema para actualizar BD's SQL

[Peterpay]

Ok estas haciendo el update atravez de tu dataadapter o haciendolo manual. veo q tienes el update de forma manual y depsues itenes un update de tu dataadapter ahi teines el conflicto o uno u otro.

actualizas en modo desconectado y haces update pero me imagino q el error va pro ahi.

poq no haces solo un adap.Fill(); en vez de un update si los updates los estas haciendo manuales. pero lo idoneo seria q hicieras o modo desconectado o conectado pero no una mezcla tan rara.

[iwanapapu]

Problema para actualizar BD's SQL

[Peterpay]

el problema creo q esta aqui.

If vaccion = "A" Then 'Nuevo
AgregaRegistro() // modo conectado
Else
ModificaRegistro() // Modo conectado
End If
adap.Update(ds1, "igeneral") // y todavia le pides q actualice

por en modificar registros simplemente le dices a tu dataset.Rows(n)=tunuevo row;
y depsues solo el adapter

[iwanapapu]

Problema para actualizar BD's SQL

[Peterpay]

lo q me intriga es esto Tienes ModificarRegistro y lo q haces es tomar la fila y actualizarla y despues le dices al dataset q si acepte los cambios hasta ahi bien despues Ejecutas lo mismo via query y ahi es donde chocan.

O trabajas en modo conectado o en desconectado o ambos siempre y cuando no seas sobre la misma tabla si no se fastidia todo.

[iwanapapu]

Problema para actualizar BD's SQL

[iwanapapu]

Problema para actualizar BD's SQL