Problemas desde dos pantallas

14/07/2005 - 13:56 por Tecnicos Aydai | Informe spam
Hola a todos!!!
Vereis, tengo el siguiente problema trabajando desde dos pantallas contra el
mismo registro, si desde una pantalla lo elimino, y desde la otra lo
modifico, no me da ningun error la base de datos, y me gustaria que si que
me saliese ese error. Estoy trabajando contra una base de datos en MSDE, y
el codigo que uso para modificar el registro es el siguiente.

Public Function Modificar(ByVal mcc7_codigo As String, ByVal mcc7_nombre As
String, ByVal mcc7_estado As String, ByVal mcc7_usuario As Integer, ByVal
mcc7_acceso As Integer, ByVal mcc7_fegraba As Date, ByVal mcc7_ttyno As
String) As Integer

Dim comando_modificar As New SqlCommand

Dim result As Integer

Dim cadena As String

Dim ex As SqlException

result = 0

comando_modificar.CommandText = "UPDATE PP0F7MCC SET mcc7_nombre = '" &
mcc7_nombre & "', mcc7_estado = '" & mcc7_estado & "', mcc7_usuario = '" &
mcc7_usuario & "', mcc7_acceso = '" & mcc7_acceso & "', mcc7_fegraba = '" &
mcc7_fegraba & "', mcc7_ttyno = '" & mcc7_ttyno & "' WHERE ( mcc7_codigo =
'" & mcc7_codigo & "' )"

comando_modificar.Connection = Pp0f7mccConnexion

Try

comando_modificar.Connection.Open()

comando_modificar.ExecuteNonQuery()

Catch ex

Dim i As Integer

For i = 0 To ex.Errors.Count - 1

MessageBox.Show("Índice nº " + i.ToString() + ControlChars.Cr _

+ "Mensaje: " + ex.Errors(i).Message)

Next i

End Try

comando_modificar.Connection.Close()

Return result

End Function



Si se os ocurre algo ya me comentais. Un saludo y gracias por todo.
 

Leer las respuestas

#1 Eduardo A. Morcillo [MS MVP VB]
14/07/2005 - 16:08 | Informe spam
La sentencia UPDATE de SQL no genera error si no se encontro un registro
para modificar y por eso no se propaga ningun error al codigo. Pero puedes
saber si se ha modificado algun registro chequeando el resultado de
ExecuteNonQuery. ExecuteNonQuery te devuelve el numero de registros
afectados por el comando y si devuelve 0 entonces significa que no se
actualizo ningun registro.

Eduardo A. Morcillo [MS MVP VB]
http://www.mvps.org/emorcillo

Preguntas similares