Yo estaba usando access en una aplicacion y tengo que pasarla a SQL
SERVER2000.
El codigo que venia usando andaba perfecto, cuando cambio los Dataset
(desde origenes de datos) , los agrego uno por uno apuntando a la base
de datos en sql y a la tabla correspondiente.
Usando el mismo codigo que para access cuando quiero agregar registros
anda perfecto, pero cuando quiero modificar registros existentes o
borrar algun registro me aparece " Update requiere que DeleteCommand
sea válido cuando se pasa la colección DataRow con filas eliminadas "
El codigo que uso para borrar es este:
Dim registroborrar As
CargasAutorizadasDataset.Cargas_AutorizadasRow()
registroborrar = Me.CargasAutorizadasDataTable.Select("OCARG " + CStr(id))
Select Case registroborrar.GetUpperBound(0)
Case -1
MsgBox("No hay registros con ese identificador",
CType(MsgBoxStyle.OkOnly + MsgBoxStyle.Critical, MsgBoxStyle),
"Error")
Timer1.Start()
Exit Sub
Case Is > 0
MsgBox("Hay demasiados registros con ese ID",
CType(MsgBoxStyle.OkOnly + MsgBoxStyle.Critical, MsgBoxStyle),
"Error")
Timer1.Start()
Exit Sub
Case 0
If registroborrar(0).ESTADO = "Cargando" Then
Dim respuesta As
Microsoft.VisualBasic.MsgBoxResult
respuesta = MsgBox("Usted está intentando borrar
una orden de carga que se encuentra actualmente cargando. Esto puede
generar errores graves en el programa." + vbCrLf + "Está seguro que
desea hacerlo?", vbYesNo, "Borrado de registros")
If respuesta = MsgBoxResult.No Then
Timer1.Start()
Exit Sub
End If
End If
Loguear("Registro a Borrar Manualmente")
Loguear("OCA OCO REC CANT FECHA
ESTADO")
Loguear(CStr(registroborrar(0).OCARG) + " " +
CStr(registroborrar(0).OCOMP) + " " +
CStr(registroborrar(0).PRODUCTO) + " " +
CStr(registroborrar(0).CANTAUT) + " " +
CStr(registroborrar(0).FECHAAUT) + " " +
CStr(registroborrar(0).ESTADO))
registroborrar(0).Delete()
Cargas_AutorizadasTableAdapter.Update(registroborrar(0))
Loguear("Registro Borrado con exito")
End Select
Estoy bastante complicado, es algo que no lo puedo solucionar desde
hace varios dias, les agradecere con todo el corazon si me dan una mano
Leer las respuestas