Visual Basic - Error -2447217887(80040e21)

Hola, tengo una aplicación en VB que trabaja sobre una B.D. Access. Al querer actualizar un dato en una tabla cualquiera, si el dato está duplicado se me produce el error -247217887(80040e21)...¿Cómo puedo capturar ese error en VB para que se me muestre un ´mensajillo´ cada vez que introduzco en la B.D. un dato duplicado? Gracias. Mary.

Hola Mary!

He montado un pequeño ejemplo de como lo podrias hacer, te explico en un formulario vacio he insertado un control ADODC1 para ir mas rápido y no tener que declarar las conexiones,recordsets,etc.., bien pues tambien he añadido un Datagrid enlazado al ADODC1, un CommandButton y un TextBox, bien, el ADODC1 apunta a una base de datos ACCESS abriendo una tabla de Clientes con la siguiente instruccion "Select * from Clientes", ahora en el evento Click del Command mete este código, que intenta añadir el contenido del Text1.Text en el indice de la tabla y como ya existe va directo a la Etiqueta ERRORES de esta forma controlas este error.

´// ------------------------------------
Private Sub Command1_Click()
On Error GoTo Errores
With Adodc1
.Recordset.AddNew
Adodc1.Recordset.Fields(0) = Text1.Text
Adodc1.Recordset.Update
End With
Errores:
MsgBox Err.Description
Adodc1.Recordset.CancelBatch
Exit Sub
End Sub
´// -----------------------------------

Un saludo
lucKas

¡Jo! y yo volviéndome loca ;-) ... Esto de aprender a marchas forzadas...Te lo agradezco un montón. Mary