[VB6] Gestire errori di chiave sui controlli ADO

[PaoloNA]

Salve.

Ho un'applicazione in Vb 6.0, che si collega ad un DB creato con access 2003.
Ho questo problema: su un form sono costretto a tenere una textbox collegata ad un campo chiave di una tabella. Facendo le prove, se ovviamente l'utente inserisce un valore già esistente nel DB, quando si salva (quindi si da il comando Update al recordset) compare il messaggio di errore di chiave duplicata e termina l'applicazione.
L'errore è: errore di runtime '-2147467259 (80004005)'.
Esiste un metodo per gestire l'errore? Ho provato con On Error Goto... tuttavia, inserendolo in una riga successiva all'Update, l'errore da questo genarato non consente l'esecuzione di On Error Goto...

Come potrei fare?

[Johnny_Depp]

per discussioni legate al VB c'è l'apposito subforum... sposto là

[yyzyyz]

On Error Goto CodiceErrore
..
..
exit sub
CodiceErrore:
If Err.Number = 2147467259 Then 
     msgbox ("campo doppio")
end if

oppure

On Error Goto CodiceErrore
..
..
exit sub
CodiceErrore:
Select Case Err.Number
        Case 1
            ..
        Case 2
            ..
        Case Else
            Err.Clear
    End Select