Como criar login e senha em Banco de Dados no MS-ACCESS

Bom galera ... Muito, muito tempo mesmo sem aparecer por aqui ... Acho que vocês nem me conhecem ou não se lembram de mim . Não vou dar desculpas nem motivos por não ter aparecido: da minha vida cuido eu =P

Mas hoje vim falar de algo que, pra mim, é muito interessante: Microsoft Office ACCESS.

Este poderoso editor de Banco de Dados que faz parte do Pacote Office que, provavelmente, muitos de vocês nem conhecem e nunca tiveram a curiosidade de saber o que é .

Este tutorial é de nível intermediário (a programação aqui é bem simples mesmo). Então sem mais delongas ...

Para você conseguir executar o tutorial, você terá que ter o mínimo de conhecimento em ACCESS. Na verdade isto era pra ser uma vídeo aula mas, por algum motivo, meu meu microfone parou então resolvi escrever mesmo.

O MEU ACCESS É A VERSÃO 2010 . TUTORIAL FUNCIONA EM QUALQUER VERSÃO

Abra seu banco de dados no access e crie uma nova tabela no modo design

Após crie dois campos com os nomes Login e Senha (com maiúsclas e minúsculas)

O Campo "ChavePrimária" não é importante, é apenas uma especificação do ACCESS. Salve e feche sua tabela.

Após o procedimento acima, crie um formulário no modo Design

Clique na parte cinza com o botão inverso e vá em propriedades. Chegando la, navegue até a aba Dados e no campo Fonte de Registro selecione a tabela anteriormente criada.

Abrirá uma janela, selecione os campos Login e Senha  e arraste-os para dentro do campo quadriculado e deixe-os formatados como os campos de login convencionais.
Após isto navegue por sua barra de ferramentas e adicione um botão, quando abrir o assistente de botões é só clicar em cancelar, após isto você reescreverá o que estiver dentro do botão, colocando "Login" (sem as aspas) siga a imagem:

Após isso, clique com o botão inverso do mouse no botão e vá em Construtor de Códigos. Na janela que abrirá será onde  nós iremos programar nosso login então digite isto nesta janela:

If Login = "seu_login" And Senha = "sua_senha" Then
DoCmd.OpenForm ("seu_formulário_principal")
Else
MsgBox ("Login ou senha incorretos, tente novamente"), vbCritical, "Erro"
End If

Entendendo o código

 O código acima é bem simples e se você reparar está escrito em inglês e para compreendermos melhor basta traduzi-lo, mas como nem todo mundo entende vamos a Tradução:

If / Then / Else : é a sintaxe de programação e significa, repectivamente: Se / Então / Caso Contrário

Login = "seu_login" / Senha = "sua_senha": são os campos do formulário que criamos anteriormente, caso tenha colocado outro nome você deve substituir aqui, "Else" sua programação não funcionará

And: é simplesmente uma expressão de ligação

DoCmd.OpenForm: é o comando VBA (linguagem do ACCESS) que serve para abrir um formulário

MsgBox: é outro comando VBA que serve para abrir uma caixa de mensagens

vbCritical, "Erro": é outro comando VBA que serve para dar título à sua MsgBox

End If: é a sintaxe de fechamento da condição If

Os campos que estão em negrito você deve substituir por dados pessoais ou do seu banco de dados.

Bom galera, é isso, isso é muito simples e, consequentemente, fácil de burlar, mas posteriormente (e não me perguntem quando) darei uma série de dicas de como melhorar a segurança, como por este form para ser a primeira coisa a abrir em seu banco de dados, só possibilitando a entrada por quem tiver o login e a senha, etc etc etc ...

Até mais e siga no Twitter -> CassioFabre