Ir para o conteúdo
  • Revista PROGRAMAR: Já está disponível a edição #60 da revista programar. Faz já o download aqui!

skoll

Erro na Criação de Formulário Login

Mensagens Recomendadas

skoll

bom Dia

Estou a tentar construir um formulario de login para uma bd em access, mas não consigo encontrar o erro no código:

Private Sub Comando8_Click()
'Verifica se introduziram Nome e Password
If IsNull(Me.txtNome) Or Me.txtPassword = "" Then
    MsgBox "Tem de Introduzir os Dados!!!", vbCritical, "Dados Errados!!"
    Me.txtNome.SetFocus
End If
'Verifica se o Nome e a password estao correctos


'*************** Erro aqui *************
If Me.txtPassword.Value = DLookup("Password", "Login", _
            "[Nome]=" & Me.txtNome.Value) Then

            MsgBox Me.txtNome.Value

            

        DoCmd.Close acForm, "Login", acSaveNo
        DoCmd.OpenForm "frmSplash_Screen"

    Else
      MsgBox "Password Errada!!. Por Favor Tente Novamente.", vbOKOnly, _
            "Password Errada!"
        Me.txtPassword.SetFocus
    End If

    'Contar Tentativas Entrada

    intLoginTentativas = intLoginTentativas + 1
    If intLoginTentativas > 3 Then
      MsgBox "Utlizador Sem Acesso a Esta Base dados.Por Favor Contacte o Administrador.", _
               vbCritical, "Acesso Proibido!"
        Application.Quit
    End If

End Sub

Diz me sempre que a password esta errada. A tabela tem o campo Nome e o campo password, será ma utilização do Dlookup?

Obrigado

Skoll

:wallbash:


www.sacaiosbtt.comwww.sacaiosbtt.com/forum

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
colemauro

Uma maneira simples de fazeres isso é através de uma query à propria tabela

Depois se devolver um resultado comparas ao valor inserido na textbox e se não devolvar nada, já sabes que não existe.

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!

Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.

Entrar Agora

×

Aviso Sobre Cookies

Ao usar este site você aceita os nossos Termos de Uso e Política de Privacidade. Este site usa cookies para disponibilizar funcionalidades personalizadas. Para mais informações visite esta página.