mensaje de error cuando se repita un indice

marco campos
08 de Junio del 2004
al ingresar un dato ,ejemplo:codigo "1007",y queda guardado en la base de datos, luego lo ingreso nuevamente este me arroje un mensaje que diga "este dato ya existe".
por favor ayudenme gracias

Santi
08 de Junio del 2004
Comprueba que no tienes puesto en la base de datos o en el dataset que es un campo clave.

Es lo primero que se me ocurre.

yuval
08 de Junio del 2004
Bueno lo que podrias hacer es recorrer la tabla en busca del codigo que vas a introducir si esiste que te salga mensaje que no esiste lo grabas simplemente tienes que hacer un

rs.movefirsht
for i=1 to rs.recourcont
if text1.text=rs.fields("codigo")
control=1
end if
rs.movenext
next

if control=1 then
mensaje....
else
grabas-.....
end if

Suerte!!!!!!

Este ejemplo usa conexion ado ala base de datos.

Bartolom
08 de Junio del 2004
Para eso debes configurar tu base de datos, en la cual, en el campo que quieras hacer eso, debes seleccionarlo sin duplicados. Luego, en tu código de visual basic, cuando ejecutes el update debes incluirle una rutina de error para que intercepte ese error y no guarde el registro. Sería algo así:

On Error Goto ErrHandler

'acá va tu código donde haces el update

ErrHandler:

If Err.Number = Acá va tu número de error, debes averiguar cuál es, aparece en el msgbox que indica error
then
msgbox "Ha intentado agregar un registro que ya existe"
end if

Saludos!
Bartolom
Chile

Santi
08 de Junio del 2004
Perdon, había entendido que eso era un problema, no lo que querías!!

Estoy de acuerdo con Bartolom.