none
Permissões de Usuario por Login do Programa RRS feed

  • Question

  • Boa tarde Pessoal,

    Sou iniciante em vb, Mas adoro programar em tal.

    Estou desenvolvendo um ponto eletronico para controle de Funcionario de uma Lan house.

    Em fim, Criei a tela de login que esta tudo funcionando mas tenho uma duvida,

    Eu criei um Formulario de Administração e um Dos funcionarios comun.

    AI VEM A DUVIDA?

    QUERO QUE QUANDO O ADMINISTRADOR FAÇA LOGIN ABRA O FORMULARIO DE ADMINISTRAÇÃO, E QUANDO A CONTA FOR

    DE FUNCIONARIO COMUN QUE ABRA O FORMULARIO DE CONTROLE.

    Me deem uma luz pessoal, Desde já agradeço.

    Wednesday, November 6, 2013 5:01 PM

Answers

  • Cara, boa tarde.

    Não sou programador VB mas, em C# eu controlo persistindo no banco de dados.

    Ex:

    uma tabela chamada permissões, onde tu vai inserir os campos que tu quer permitir ou não e uma foreign key que receba o id do usuário.

    Tu terás 2 opções:

    Ou teu código seta 2 tipo de usuários estaticamente, onde o usuário administrador terá mais permissões que o usuário normal.

    Ou uma tela onde teu usuário administrador escolha quais os recursos que o usuário normal terá permissão de acessar.

    Depois disso definido, quando o usuário logar no sistema, se faz uma consulta no banco e desabilita no form tudo aquilo que no banco for "false"

    Acho que é isso.

    :)

    Abraço

    Wednesday, November 6, 2013 5:47 PM

All replies

  • Cara, boa tarde.

    Não sou programador VB mas, em C# eu controlo persistindo no banco de dados.

    Ex:

    uma tabela chamada permissões, onde tu vai inserir os campos que tu quer permitir ou não e uma foreign key que receba o id do usuário.

    Tu terás 2 opções:

    Ou teu código seta 2 tipo de usuários estaticamente, onde o usuário administrador terá mais permissões que o usuário normal.

    Ou uma tela onde teu usuário administrador escolha quais os recursos que o usuário normal terá permissão de acessar.

    Depois disso definido, quando o usuário logar no sistema, se faz uma consulta no banco e desabilita no form tudo aquilo que no banco for "false"

    Acho que é isso.

    :)

    Abraço

    Wednesday, November 6, 2013 5:47 PM
  • Eu conseguir fazer no gato, Mas é serviço porco...

    Acho que o metodo que vc disse é valido mas, Como eu ja desenvolvi no caso 2 form( Form Administração, E  form usuario), Ficaria mais trabalhoso fazer isso ja com tudo pronto...

    No meu caso eu criei uma constante q recebe o valor admin, na hora do login ele compara se o usuario logado é igual a admin.

    Segue  codigo para voce entender melhor.

    Esse é meu codigo de login:

    Public Sub acesso()

            'Procedure de Login

            Dim pass As String
            Dim admin As String = "admin"

            'atribuição de valores
            user = frmlogin.tbu.Text
            pass = frmlogin.tbs.Text
            'solicitar conexão
            Call solicitarConexao()
            dadosrecuperado = New DataSet("dadostabela")

            'Verificar se os campos estão em branco
            If frmlogin.tbu.Text = "" Then
                MsgBox("Favor digite o usuario", 16, "Alerta")
            ElseIf frmlogin.tbs.Text = "" Then
                MsgBox("Favor digite a senha", 16, "Alerta")
            Else
                'preenche o DAtaset com os dados da tabela dados
                'mapeia o nome padrão da tabela
                SQL = New OleDbDataAdapter("Select * from login Where Usuario = '" & user & "' and senha='" & pass & "'", conecta)
                SQL.TableMappings.Add("Table", "Dados")
                SQL.Fill(dadosrecuperado)

                If (dadosrecuperado.Tables(0).Rows.Count = 0) Then
                    MsgBox("Usuario ou Senha inválidos, virifique e tente novamente!", MsgBoxStyle.Exclamation, vbOKOnly)
                    frmlogin.tbs.Text = ""
                    frmlogin.tbu.Text = ""
                   
               ElseIf admin = user Then
                    frmlogin.Hide()
                    frmadm.Show()
                    Else
                        frmlogin.Hide()
                        frmmenuprincipal.Show()
                    End If
            End If
        End Sub

    Funciona mas porem o usuario admin é padrão. E se caso for digitado por exemplo em maiusculo alguma letra da errado...

    Sunday, November 17, 2013 1:58 AM