[Resolvido] Rotina para verificar se o registro já existe

[milaaulait 0]

Olá, pessoal \o

Sou nova aqui no fórum e também sou iniciante em vb.net...

Estou fazendo um sistema e me deparei com uma dúvida:

 

No meu form de cadastro de cliente eu preciso colocar uma rotina que verifica se aquele registro já existe no banco, essa rotina deverá fazer essa busca pelo CPF. Pensei em colocar o código no próprio masked, aí quando o foco sair do masked iria aparecer uma iamgem acusando, caso o CPF já estiver cadastrado.

Porém eu não sei como posso fazer isso, não sei se teria que usar uma função ou atraves do select from no masked mesmo.

 

 

obs: estou utilizando o ACCESS 2002-2003

 

 

Desde já, obrigada ^^

[edibertoalves 0]

Olá, pessoal \o

Sou nova aqui no fórum e também sou iniciante em vb.net...

Estou fazendo um sistema e me deparei com uma dúvida:

 

No meu form de cadastro de cliente eu preciso colocar uma rotina que verifica se aquele registro já existe no banco, essa rotina deverá fazer essa busca pelo CPF. Pensei em colocar o código no próprio masked, aí quando o foco sair do masked iria aparecer uma iamgem acusando, caso o CPF já estiver cadastrado.

Porém eu não sei como posso fazer isso, não sei se teria que usar uma função ou atraves do select from no masked mesmo.

 

 

obs: estou utilizando o ACCESS 2002-2003

 

 

Desde já, obrigada ^^

 

Olá!

Talvez esse link possa te ajudar:

 

http://social.msdn.microsoft.com/Forums/pt-BR/vscsharppt/thread/912fa3f3-1fcf-44e2-ab86-84e2899da129

 

[]´s

 

Ediberto

[quintelab 91]

milaaulait, seja bem vinda ao Fórum iMasters, conheça nossas regras: Regras do Fórum

 

Como não conseguiu? Sua dúvida esta em qual processo?

 

Abraços...

[milaaulait 0]

Bom, como eu disse, sou iniciante em vb.net e nunca me deparei com uma rotina desse tipo, então meu problema está no código mesmo....

 

Eu tentei algo como:

Private Sub CPFMaskedTextBox_Leave(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CPFMaskedTextBox.Leave
     
        Me.ClienteBindingSource.Filter = "CPF like '" & CPFMaskedTextBox.Text & "'"
        If Me.ClienteDataGridView.RowCount = 0 Then
            If validaCPF(CPFMaskedTextBox.Text) = false Then
                MsgBox("CPF é inválido, por favor, preencha o CPF novamente", MsgBoxStyle.Critical, "Informação")
                CPFMaskedTextBox.Clear()
                CPFMaskedTextBox.Focus()

            End If
        Else
            MsgBox("CPF já cadastrado")
            CPFMaskedTextBox.Clear()
            CPFMaskedTextBox.Focus()
        End If

        ClienteBindingSource.RemoveFilter()

    End Sub

mas não deu certo, qualquer CPF que eu coloque ele diz que está cadastrado.

[quintelab 91]

A validação que esta fazendo é se sua grid tem mais de 0 linhas.

Se sua grid tiver um registro ja vai dar mensagem no seu cpf: If Me.ClienteDataGridView.RowCount = 0 Then

 

Você deve criar um método que verifica se existe o cpf.

 

Abraços...

[milaaulait 0]

E como posso fazer isso? select count?

[quintelab 91]

Sim, pode ser, passando um where com o cpf digitado.

 

Abraços...

[milaaulait 0]

Ahnn, deixei meu código assim e aparentemente está funcionando:

 

Private Sub CPFMaskedTextBox_Leave(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CPFMaskedTextBox.Leave
        Me.ClienteBindingSource.Filter = "CPF like '" & CPFMaskedTextBox.Text & "'"

        If ClienteBindingSource.Count = 0 Then
            If isCPF(CPFMaskedTextBox.Text) = False Then
                MsgBox("CPF é inválido, por favor, preencha o CPF novamente", MsgBoxStyle.Critical, "Informação")
                CPFMaskedTextBox.Clear()
                CPFMaskedTextBox.Focus()
            End If
        Else
            MsgBox("CPF já cadastrado")
        End If
    End Sub