[Resolvido]nao permitir cadastro duplicado

boa noite a todos tenho uma tabela produto e um formulario de cadastro onde eu precizo bloquea o cadstro duplicado ao cadastra o codigo do produto se alguem me der ajuda agradeço obrigado

boa noite amigo Wilson,

colocar no evento antes de atualizar

If (Not IsNull(DLookup("[seucampo]", "suatabela", _
"[seucampo] ='" & Me!seucampo & "'"))) Then
MsgBox "O Produto já está cadastrado no sistema..." & seucampo.Text, _
vbInformation, "Atenção"
Me.Undo 'desfaz a digitação.
Cancel = True 'cancela o evento.
End If







é só adaptar ao seu Bd
abraço Nogaro !

nogaro consegui adaptar fico belesa muinto obrigado mesmo

boa noite amigo Wilson, fico feliz de ter ajudado em seu Bd !

O Fórum agradece o retorno
bons estudos !

abraço Nogaro !