[Resolvido]Login com PIN (apenas números)

Olá

Gostaria de uma ajuda no desenvolvimento de um login apenas digita-se o número e loga a pessoa, em vez de procurar o nome Etc seria so digitar o numero.
Deixo imagem do form... Obrigado

Um bem hajam !

Olá Marco,

Parece simples, a sua explicação é que é vaga.
Vai existir uma pabela de códigos (PINs) ou é um apenas?

Se for em tabela pode usar o DLookup.
Se não conseguir , partilhe o seu projeto de deixe mais detalhes.

Abraço

Olá

Teixeira vamos ter, sim uma tabela de pins !!!

IDUtilizador
Utilizador
PIN

Olá

Segue parte da App . . .
Se me poder ajudar, agradecia.
O objectivo é digitar o PIN e entrar no menu principal . . .
Obrigado

Olá Marco,

Para o que pretende, pode ser com o seguinte código:

Código:

Private Sub btnEnter_Click()
    If Nz(DCount("PIN", "tblUtilizadores", "[PIN]='" & Me.txtPIN & "'"), 0) > 0 Then
        DoCmd.Close
        DoCmd.OpenForm "frmMenu"
    Else
        MsgBox "PIN errado, verifique.", vbInformation, "Acesso"
        Me.txtPIN = ""
    End If
End Sub

Também foi necessário ajustar o código para cada numero, veja como ficou no número 1:

Código:

Private Sub btn1_Click()
    Me.txtPIN = Me.txtPIN & "1"
End Sub

Segue o exemplo:
cld.pt/dl/download/611fea83-0c55-402f-a8ef-84389401ce88/ExemploPIN_rev.zip

Nota, ajustei o título do tópico para futuras pesqueisas de outros membros.

Abraço

Obrigado.

Ficou ótimo. Irei adaptar a App e sim o nome do tópico também ficou mais ajustado.

Um bem hajam !

Complemento o tópico, orientando a desativação do campo onde o PIN é inserido, assim evitando digitação que permita o uso da técnica mostrada no tópico do link abaixo
https://www.maximoaccess.com/t37666-cuidado-com-sql-injection-como-nao-validar-um-login

Olá a todos,

Damasceno, sempre atento a todos os detalhes, bem visto.

Marco, Fico feliz por ter ajudado, obrigado pelo feedback.

Abraço a todos