Campo Nome duplicado

[Edson_csi 0]

Olá!Tenho um formulario de cadastro, onde eu qro q só possa ser inserido apenas um registro com o mesmo nome. Já fui no banco de dados access e alterei o campo para chave primária e coloquei o a propriedade do campo como Duplicação não autorizada.Feito isso quando tento gravar dois registros com o mesmo nome gera o erro, mas grava assim mesmo o nome 2 vezes.

[scorpio 7]

faz uma consulta verificando se o nome que quer cadastrar ja existe, caso nao exista cadastre!flwfica com Deus

[Edson_csi 0]

faz uma consulta verificando se o nome que quer cadastrar ja existe, caso nao exista cadastre!flwfica com Deus

Quando você diz Consultar é procurar mesmo?Não existe um código q faz essa verificação automática se já existe campo duplicado?

[dark_devil 0]

Boas,

 

faz da seguinte maneira:

Private Sub Text5_LostFocus()

 

Dim Registos As ADODB.Recordset

Set Registos = New ADODB.Recordset

 

consulta = "select * from T_contactos where (nome = '" & Text5.Text & "')"

 

Registos.Open consulta, g_str_ConnectionString, adOpenForwardOnly, adLockReadOnly

 

If Registos.EOF Then

 

Else

MsgBox "Já existe um nome igual... ", vbInformation

End If

 

End Sub

 

Quando voce da um click fora da caixa de texto nome ele automaticamente faz uma procura na base de dados e verifica se ixistem nomes iguais. se existir apresenta uma msgbox. Voce tambem pode aplicar este codigo bo botao em que guarda os dados, mas tem que ser antes do codigo guardar.

 

Espero ter ajudado,