Visual Basic - como hacer para validar si un campo clave ya exist

Life is soft - evento anual de software empresarial
 
Vista:

como hacer para validar si un campo clave ya exist

Publicado por Daniel (23 intervenciones) el 02/03/2004 02:10:09
me gustaria saber como hago para validar que un campo ya existe en la BD, por ejemplo si van a ingresar a un producto cuyo codigo ya existe!!!
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:como hacer para validar si un campo clave ya ex

Publicado por Mario (153 intervenciones) el 02/03/2004 02:21:23
realiza un consulta sql con referencia al campo. ejemplo
sqlcadena="select * from tabla where idcampo=llave"
rs.open sqlcadena
if rs.bof=true and rs.eof=true then
msgbox "la llave no existe"
else
msgbox "la llave existe"
endif
de todas formas si declaras el campo como llave cuando lo insertas el programa te genera un error, tambien por esa opcion la pudieras saber
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 hacer para validar si un campo clave ya ex

Publicado por Daniel (23 intervenciones) el 02/03/2004 02:26:53

ok gracias, la otra opcion es tambien validandolo por el error que genera visual, pero una vez que yo genere el .exe ese error me lo cerraria, como haria para que omitiera ese error pero le mostrara al usuario que el registro ya existe...
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 hacer para validar si un campo clave ya ex

Publicado por pedro luis (878 intervenciones) el 02/03/2004 13:39:59
on error goto errores
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 hacer para validar si un campo clave ya ex

Publicado por Pedro Luis (878 intervenciones) el 02/03/2004 13:40:02
On error goto Errores
....
....
...
exit sub
:Errores
if err.number=(no me acuerdo) then
msgbox ("Codigo duplicado")
codigo.setfocus
exit sub
endif
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