[Resolvido]Login no programa

Olá pessoal!

Desculpem minha insistência mas é que estou apavorado, meu projeto esta quase acabado, só falta a parte de login, eu axei um exemplo do avelino sampaio, mas me confundi todo pois não sou programador!

Alguém ai pode me ajudar?
Preciso de um login pro meu programa, mas um login simples
Que tenha 2 usuários, um que possa alterar tudo, e outro que não possa alterar os dados só vizualizá-los!
Só preciso de 2 usuários mesmo! Bah eu to apavorado, é o estágio de conclusão de curso!
Eu ja fiz tudo e empaquei nesse login, estou des das 8 da manha aqui e não escrevi uma linha de código :s

Espero que alguem possa me mandar um exemplo ou vários hehe

Abraços

alguem?

Olá amigo

Reconheço que é um pouco complexo essa questão de controle de usuários, para quem tem pouca experiência com programação.

Baixe aqui o exemplo

senha do admin > admin
senho do visitante > 123

Bom estudo

boas malta
avelino pergunto quais as configurações da tabela cboUsuário
para poder adaptar a uma que ando aqui a tentar fazer e esta tem o que preciso ou parte dela
aguardo apoio
mirsofy

Bom dia,

Avelino, vi esse seu exemplo e ele é otimo. Li toda a programação e agora te pergunto em qual parte vc especificou que o admim pode editar dados e o visitante não? não achei aonde vc criou essa forma de bloqueio.

Cumprimentos,

Muito Obrigado Mestre Avelino!

Obrigado por tirar um pouco do seu tempo para me ajudar, fico muito grato mesmo, este login era a ultima parte do meu projeto! Não sei quem vai ficar mais feliz, eu ou meu patrão hehehee

Só mais uma pergunta, onde eu troco a senha do admin?
Não consegui achá-la no código!

Mais uma vez meu muito obrigado!

Bom dia Marcelo obrigado por me mostrar, poderia me explicar as linhas abaixo?

Não estão sendo claras, obrigado,

Public Function fncPermissões(NomeForm As Form)
On Error Resume Next
NomeForm.AllowEdits = IIf(login.id <> 1, 0, -1)
NomeForm.AllowDeletions = IIf(login.id <> 1, 0, -1)
NomeForm.AllowAdditions = IIf(login.id <> 1, 0, -1)
End Function

Bom dia,

Deve ser isso mesmo pois no combo, em origem da linha os usuarios são separados por id 1 e 2.


1;"Admim";"admin";2;"Visitante";123

Obrigado,

Alguém poderia me esclarecer, onde e como eu poderei trocar a senha do admin?

Abraços

Mil gracias amigo véio!

Abraços

Boa tarde Senhores

Achei muito bom o exemplo, porem não consegui achar um local para cadastrar por exemplo novos usuarios.

Grato

Kleyton

Olá

Este exemplo foi específico para o caso Tiogui ,que não precisou mais do que uma lista de valores na própria combobox.

Veja este tutorial abixo e baixe o exemplo fornecedido.

Controle de Usuário

Bom estudo!

Boa tarde Avelino

Muito obrigado pelo apoio, eu segui o vosso exemplo e criei tudo, mas não consigo desbloquear as forms usuarios e permissões

Testei o exemplo cadastrando um usuario pela tabela e fungou bem, porém não consigo usar a form...

Podes me ajudar?