Ver Mensaje Individual
  #4 (permalink)  
Antiguo 22/12/2011, 13:44
Avatar de edbc92
edbc92
 
Fecha de Ingreso: octubre-2010
Ubicación: Lima - Los Olivos
Mensajes: 93
Antigüedad: 14 años, 2 meses
Puntos: 5
Respuesta: Evitar duplicado pero con execpciones

Claro si lo he hecho con consultas a la bd...En fin gracias a ambos por su ayuda...De todas maneras encontré la solución...Inicialmente este era mi código que me valida si existe alguno en la bd a la hora de insertar un nuevo registro:


Código vb:
Ver original
  1. sql = "select desc_ciclo from ciclos where desc_ciclo=@desc"
  2.                     cmd = New SqlCommand(sql, cn)
  3.                     cmd.Parameters.AddWithValue("@desc", txt_desc.Text)
  4.                     If cmd.ExecuteScalar <> "" Then
  5.                               MsgBox("duplicado", MsgBoxStyle.Exclamation, "Error")
  6.                         Exit Sub
  7.                     End If


Y este código es el que yo quería usar para editar algun registro pero que me permita editarlo siendo el mismo registro y solo cambiar algunas cosas del registro:

Código vb:
Ver original
  1. sql = "select count(*) from ciclos where desc_ciclo=@desc and cod_ciclo<>@cod"
  2.                     cmd = New SqlCommand(sql, cn)
  3.                     cmd.Parameters.AddWithValue("@desc", txt_desc.Text)
  4.                     cmd.Parameters.AddWithValue("@cod", lblcod.Text)
  5.                     If cmd.ExecuteScalar > 0 Then
  6.                                MsgBox("duplicado", MsgBoxStyle.Exclamation, "Error")
  7.                         Exit Sub
  8.                     End If

Quizás esto ayude a alguien que tenga un problema parecido...Hablamos
__________________
"Por medio de la perseverancia el caracol llegó al arca."
CHARLES SPURGEON