MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    Extensão ACCDE não bloqueia tecla SHIFT

    Compartilhe

    mcsanches
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 143
    Registrado : 10/06/2012

    Extensão ACCDE não bloqueia tecla SHIFT

    Mensagem  mcsanches em Ter 26 Jun 2018, 7:45 am

    Bom dia pessoa, salvei meu projeto em extensão .ACCDE e verifiquei que o shift continua funcionando para abrir o front end e visualizar os objetos

    Alguem pode me ajudar a bloquear permanentemente?

    desde já agradeço

    Marcelo
    avatar
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 10232
    Registrado : 04/11/2009

    Re: Extensão ACCDE não bloqueia tecla SHIFT

    Mensagem  JPaulo em Ter 26 Jun 2018, 7:53 am

    Ola;

    O .accde não desablita o shift, apenas não permite aceder ao VBA e á estrutura.

    Para desabilitar o shift ou habilitar o shift, terá de usar um banco externo, que lhe envio em anexo;

    Download


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver este link.]

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]

    mcsanches
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 143
    Registrado : 10/06/2012

    Re: Extensão ACCDE não bloqueia tecla SHIFT

    Mensagem  mcsanches em Ter 26 Jun 2018, 1:19 pm

    Mestre JPaulo , muito obrigado,

    mas ainda sim em posse do SecuritMs é possivel implementar senha para habilitar ou desabilitar?

    desde já lhe agradeço

    Marcelo
    avatar
    tauron
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1051
    Registrado : 07/12/2011

    Re: Extensão ACCDE não bloqueia tecla SHIFT

    Mensagem  tauron em Ter 26 Jun 2018, 2:05 pm

    Desculpe a intromissão,

    Tente assim: No seu formulário principal coloque o codigo abaixo:

    Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    Select Case KeyCode
    Case vbKeyF11: ChangeProperty "AllowBypassKey", DB_BOOLEAN, True
    Case vbKeyF12: ChangeProperty "AllowBypassKey", DB_BOOLEAN, False
    End Select
    End Sub

    E determine o evento "visualizar teclas" como "sim".

    Lembrando que o que estiver em vermelho você poderá alterar.

      Data/hora atual: Dom 18 Nov 2018, 10:54 pm