[Resolvido]Erro em consulta data SQL em Form não Acoplado

Boa noite amigos!
Primeira vez aqui no Fórum, sou novato neste mundo de access. Estou desenvolvendo um sistema para uma escola e estou com problema em uma pesquisa.

Ao cadastrar um aluno o sistema deve verificar se o aluno já foi cadastrado antes pesquisando pelo nome e data de nascimento, porém, mesmo inserindo os dados iguais aos da tabela, ele não retorna nada.

Estou usando Form não acoplado e todas as operações são via comando SQL.

Código:


Private Sub PesquisarAluno()
    
    Conn 'abre a conexao com o banco
    
    cmd = "SELECT * FROM Aluno WHERE nmAluno = '" & Me.txtNome & "' AND dtNasc = '" & Me.txtData & "'"

    ValidaSelecao

    If rs.RecordCount <> 0 Then

        If MsgBox("Aluno já cadastrado, deseja alterar?", vbYesNo + vbQuestion, "Pesquisa") = vbYes Then
            Me.txtCodigo = rs("cod")
            Me.txtNome = rs("nmAluno")
            Me.txtData = rs("dtNasc")
            Me.txtMae = rs("mae")
            Me.txtPai = rs("pai")

        End If

    End If
    FechaValida
    FechaConexao

End Sub


Se alguém puder me dar uma luz agradeceria muito.

Bom dia Erismar,

Na sub "PesquisarAluno" altere a linha para:

Código:


cmd = "SELECT * FROM Aluno WHERE nmAluno = '" & Trim(Me.txtNome) & "' AND dtNasc = #" & Format(Me.txtData, "MM/DD/YYYY") & "#"



No Access, é necessário formatar a data para "mm/dd/yyyy" para realizar o select.


OBS: Evite usar o nome e a data para verificar dados, pois existe o risco de você ter homônimos cadastrados. Utiliza um campo como chave, tipo "CPF".


Espero ter ajudado.

Boa sorte

Muito obrigado amigo, resolveu perfeitamente meu problema.
quanto a sugestão de pesquisa irei pensar em outro campo como cpf. como nem todos os alunos ainda possuem cpf nao o inclui de iniciio.

Valeu Erismar!!!!
O fórum agradece.