Não Duplicação De Dados

[mario_world]

Boa tarde pessoal!!!

Eu tenho uma agenda telefonica e gostaria de passá-la computadorizada, então escolhi o access pra me ajudar...

Só que o meu problema é o seguinte: Se eu adicionar um telefone que já foi cadastrado, o acess me avise que este telefone já está cadastrado.

Para que o access não deixasse o telefone se repetir utilizei no campo do telefone a opção Indexado: Sim (Duplicação não autorizada), mas gostaria de colocar uma mensagem designando que o numero telefonico já existe.

Aguardo respostas,

obrigado desde já

obs: se houver outra forma de se fazer isso agradeço tambem.

[MrMALJ]

bom você pode criar uma consulta pra fazer a verificação e retornar se foi encontrado, algo mais ou menos assim

dim tstFone,msg as variant

tstFone=dlookup("[seuCampoDaTabelaTelefone]","suaTabelaTelefone","[seuCampoDaTabelaTelefone]="&me.seuCampoTelefoneDoFom)

if tstFone<>null or tstFone<>"" then

msg=msgbox("sua mensagem",vbokonly)

end if

bom acredito que era isso ai! se der certo confirme pra nós.