MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


4 participantes

    [Resolvido]como proteger o banco de dados

    avatar
    soltecitu
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 88
    Registrado : 30/09/2014

    [Resolvido]como proteger o banco de dados Empty [Resolvido]como proteger o banco de dados

    Mensagem  soltecitu 13/1/2015, 18:26

    olá pessoal como posso proteger meu banco de dados para que ninguém possa abrir e ver os dados dele. no caso o seguinte o programa ficou com uma parte aberta para todos mas para outro formulário coloquei senha, mas se for aberto com a tecla shift pressionada é possível acetar a tabela e ver as informações como posso impedir isso?
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5120
    Registrado : 20/04/2011

    [Resolvido]como proteger o banco de dados Empty Re: [Resolvido]como proteger o banco de dados

    Mensagem  Silvio 13/1/2015, 19:54

    Boa tarde.

    Usando o nosso sistema de busca, disponível aqui no fórum temos e encontramos alguns tópicos:

    Esse ou este .

    Bons estudos.


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    avatar
    soltecitu
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 88
    Registrado : 30/09/2014

    [Resolvido]como proteger o banco de dados Empty Re: [Resolvido]como proteger o banco de dados

    Mensagem  soltecitu 13/1/2015, 22:44

    olá, silvio

    então verifiquei projetos, só que não vi consegui que funcionasse nenhum que achei.
    não sei se estão com falhas pois todos mesmo ativando continua a funcionar a techa shift.


    mas vamos lá... pelo que vi tem que colocar essa função em cada tecla.

    Private Sub cmdAtiva_Click()
    AlterarPropriedade "AllowBypassKey", dbBoolean, True
    MsgBox ("Ativado")
    End Sub

    Private Sub cmdDesativa_Click()
    AlterarPropriedade "AllowBypassKey", dbBoolean, False
    MsgBox ("Desativado")
    End Sub

    mas infelizmente não funcionou.
    é necessário fazer alguma macro ou outra coisa?
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5120
    Registrado : 20/04/2011

    [Resolvido]como proteger o banco de dados Empty Re: [Resolvido]como proteger o banco de dados

    Mensagem  Silvio 14/1/2015, 02:16

    Eu tenho ele aqui e funfa legal...

    Veja se você não se esquece de algo,principalmente um módulo chamado BasShift que tem que estar no teu sistema.


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3900
    Registrado : 04/04/2010

    [Resolvido]como proteger o banco de dados Empty Re: [Resolvido]como proteger o banco de dados

    Mensagem  Avelino Sampaio 14/1/2015, 11:40

    Olá!

    veja se este meu artigo ajuda:

    http://www.usandoaccess.com.br/dicas/armazenar-valores-lista-propriedades.asp?id=1&idlista=87#inicio

    Aguardamos


    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    avatar
    soltecitu
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 88
    Registrado : 30/09/2014

    [Resolvido]como proteger o banco de dados Empty Re: [Resolvido]como proteger o banco de dados

    Mensagem  soltecitu 14/1/2015, 11:53

    então amigo acho que seria isso mesmo , "módulo chamado BasShift" não sei como fazer esses módulo ainda.
    clalves
    clalves
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 28
    Registrado : 30/06/2011

    [Resolvido]como proteger o banco de dados Empty Bloqueio tecla "Shift"

    Mensagem  clalves 14/1/2015, 13:14

    Dê uma olhada nesta função colocada em outro forúm pelo companheiro Célio Rodrigues:

    1) Primeiramente eu coloquei esta função em um modulo meu.

    Function DestravaSHIFT(strPropName As String, varPropType As Variant, varPropValue As Variant) As Integer
    '* Objetivo - Bloquear ou liberar o uso da tecla SHIFT
    '* Parametros - strPropName : AllowBypassKey (nome da Propriedade SHIFT no Access)
    '* varPropType : Tipo da propriedade AllowBypassKey (dbBoolean)
    '* varPropValue: Valor da propriedade AllowBypassKey (True ou False)
    '* Retorna - TRUE : Desbloqueia a tecla SHIFT
    '* FALSE: Bloqueia o uso

    Dim dbs As Database, prp As Property
    Const conPropNotFoundError = 3270
    Set dbs = CurrentDb
    On Error GoTo Change_Err
    dbs.Properties(strPropName) = varPropValue
    DestravaSHIFT = True

    Change_Bye:
    Exit Function

    Change_Err:
    If Err = conPropNotFoundError Then ' Propriedade não localizada.
    Set prp = dbs.CreateProperty(strPropName, varPropType, varPropValue)
    dbs.Properties.Append prp
    Resume Next
    Else
    ' Erro desconhecido.
    DestravaSHIFT = False
    Resume Change_Bye
    End If
    End Function

    2) Na minha primeira tela do meu projeto tem uma logo da empresa (objeto do tipo imagem), no evento click deste logotipo eu coloco o coloquei o codigo abaixo:

    If MsgBox("Trava tecla SHIFT?", vbYesNo + vbQuestion, "Confirmação") = vbYes Then
    'Bloqueia a tecla shift
    DestravaSHIFT "AllowBypassKey", dbBoolean, False
    Else
    'Libera a tecla shift
    DestravaSHIFT "AllowBypassKey", dbBoolean, True
    End If

    3) Se o meu projeto estiver protegido contra a tecla SHIFT bastar apenas eu clicar neste logotipo e responder que eu nao quero travar a tecla SHIFT, sai do sistema normalmente e entro novamente com a tecla shift pressionada, ai o sistema entra em modo de estrutura.

    4) O legal é que o comando fica escondido e so voce fica sabendo.


    Não testei ainda, mas acredito que possa dar certo, retorne se funcionar ok?
    avatar
    soltecitu
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 88
    Registrado : 30/09/2014

    [Resolvido]como proteger o banco de dados Empty Re: [Resolvido]como proteger o banco de dados

    Mensagem  soltecitu 14/1/2015, 13:55

    Amigo, clalves
    NO caso vc colocou esses comando em que lugar?
    Foi em algum botão?
    clalves
    clalves
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 28
    Registrado : 30/06/2011

    [Resolvido]como proteger o banco de dados Empty Re: [Resolvido]como proteger o banco de dados

    Mensagem  clalves 15/1/2015, 11:40

    Pode ser também amigão, mas isso permitirá a outras pessoas acessarem a área de bloqueio da tecla shift! O ideal é você criar um campo que só você tem acesso ou saberá onde fica para colocar a segunda parte da função. O passo a passo seria:

    1-Crie um módulo e cole a função numero 1 salve com um nome que o identifica tipo "Shift" mesmo.

    2-Em um formulário qualquer crie um campo, podendo ser um botão, uma imagem etc... que só você sabe onde está e no evento "Clicar" de sua propriedade, você cole a parte 2 da função.

    Entendido? Você também pode criar para a parte 2 um formulário próprio com os botões de liberação e bloqueio e escondê-lo em seu banco de dados, mas daí demanda um pouco mais de trabalho para você ocultá-lo, ok?
    Qualquer dúvida, chama novamente.
    avatar
    soltecitu
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 88
    Registrado : 30/09/2014

    [Resolvido]como proteger o banco de dados Empty Re: [Resolvido]como proteger o banco de dados

    Mensagem  soltecitu 16/1/2015, 01:15

    Amigo,
    deu certo, funcionou.

    Muito obrigado.
    clalves
    clalves
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 28
    Registrado : 30/06/2011

    [Resolvido]como proteger o banco de dados Empty Re: [Resolvido]como proteger o banco de dados

    Mensagem  clalves 16/1/2015, 17:27

    Valeu por responder companheiro!

    Abraços!
    avatar
    soltecitu
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 88
    Registrado : 30/09/2014

    [Resolvido]como proteger o banco de dados Empty Re: [Resolvido]como proteger o banco de dados

    Mensagem  soltecitu 30/1/2015, 19:56

    amigo, clalves


    O comando estava legal agora começou apresentar o seguinte erro quando ativo ou desativo a tecla shift

    Erro de compilação:
    O tipo definido pelo usuário não foi definido

    Pode me ajudar?
    clalves
    clalves
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 28
    Registrado : 30/06/2011

    [Resolvido]como proteger o banco de dados Empty Re: [Resolvido]como proteger o banco de dados

    Mensagem  clalves 8/2/2015, 20:34

    O amigão, estive fora e só hoje estou tendo acesso ao fórum, seguinte, este erro de compilação pode ser alguma variável que não foi digitada da forma correta ou não faz parte da biblioteca de dados etc...
    Tem como você postar todos os comandos da forma que você criou? Ou então enviar seu BD ou parte dele para que eu possa analisar aqui e te retornar corrigido, ok?
    Abraços!

    Conteúdo patrocinado


    [Resolvido]como proteger o banco de dados Empty Re: [Resolvido]como proteger o banco de dados

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 7/11/2024, 23:30