Busqueda de registros en Ms Acces

[mak74]

Mete este código en un botón para verificar que no tienes ese registro ya introducido...

Dim Numregistros as recordset
Dim sql as string
Dim num as integer

Ahora construimos la sql

sql="Select * from nombretabla where condiciones......"

Numregistros=Currentdb.execute(sql)

Num=Numregistros.recordcount

Si Num es mayor k 0 es k ya esta ese registro introducido...

Salu2..