Visual Basic - Validar una clave si exiete en una base de datos

Life is soft - evento anual de software empresarial
 
Vista:

Validar una clave si exiete en una base de datos

Publicado por reynaldo herrera (34 intervenciones) el 07/09/2000 00:00:00
tengo una forma donde capturo clave y nombre, como puedo evitar que se dupliquen claves,

indexe la base de datos por el campo clave, al hacer

recordset.add
leer datos
recordset.update

me genera un error de que la llave ya existe

lo que quiero hacer es al hacer click en el boton NUEVO habilitar los cuadros de texto donde voy a captuarar informacion y despues de capturar la clave si existe me lo indique y cancele la operacion recordset.add

ojala alguien me pueda ayudar.
gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Validar una clave si exiete en una base de dato

Publicado por edu (448 intervenciones) el 07/09/2000 00:00:00
Si indexas la tabla por CLAVE y el indice lo confugiras como UNICO y PRINCIPAL cuando almacenes una clave repetida VISUAL BASIC te lanza un error. Puedes capturar ese error para anular la INSERCION

Espero que te sirva..
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

como capturo el error

Publicado por Reynaldo Herrera (34 intervenciones) el 07/09/2000 00:00:00
asi la tengo indexada, pero no se como capturar el error.
me podrias decir como lo hago, por favor.
gracias.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:como capturo el error

Publicado por Gusys (25 intervenciones) el 07/09/2000 00:00:00
Hola, asi puedes capturar un error en visual basic

private sub procedimiento()
codigo...
on error goto Etiqueta
codigo...
exit sub
Etiqueta:
msgbox err.description
end sub
cuando te da el error salta a Etiqueta ahi puedes mostrar en msgbox la decripción del error o simplemente lo puedes validar tu sabeindo claro el numero del error mas o menos asi.

if err.number = numero then
msgbox "lkjkljkl"
end if

ojala te sirva chau
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:como capturo el error

Publicado por DANIEL RAMIREZ (1 intervención) el 07/09/2000 00:00:00
PRIMERO QUE NADA SALUDOS

OK LO QUE DEBES HACER PRIMERO ES FIJARTE EL NUMERO DE ERROR QUE TE ARROJA VISUAL, ME IMAGINO QUE ES UN RUN TIME POR LOGICA

AHORA

EN TU SUBRUTINA TU LO QUE TIENES ES ALGO POR EL ESTILO

RUTINA()

ON ERROR GOTO MANEJADOR_DE_ERRORES ´ES LA ETIQUETA
CODIGO DE RUTINA....
.....
......

EXIT SUB ´ OJO CON ESTO

MANEJADOR_DE_ERRORES:
IF ERR.NUMBER = NUMERO_QUE TE ARROJA VISUAL (ES CONSTANTE)
THEN
MSGBOX "YA EXISTE LA CLAVE"

END IF

END SUB
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Validar una clave si exiete en una base de dato

Publicado por Alex (11 intervenciones) el 13/09/2000 00:00:00
NECESITAS UTILIZAR LA INSTRUCCION SEEK DENTRO DE CODIGO DE COMPRACION..
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar