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


3 participantes

    Extensão ACCDE não bloqueia tecla SHIFT

    avatar
    mcsanches
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

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

    Extensão ACCDE não bloqueia tecla SHIFT Empty Extensão ACCDE não bloqueia tecla SHIFT

    Mensagem  mcsanches 26/6/2018, 12:45

    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
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

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

    Mensagem  JPaulo 26/6/2018, 12:53

    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.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    Extensão ACCDE não bloqueia tecla SHIFT Folder_announce_new Utilize o Sistema de Busca do Fórum...
    Extensão ACCDE não bloqueia tecla SHIFT Folder_announce_new 102 Códigos VBA Gratuitos...
    Extensão ACCDE não bloqueia tecla SHIFT Folder_announce_new Instruções SQL como utilizar...
    avatar
    mcsanches
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

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

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

    Mensagem  mcsanches 26/6/2018, 18:19

    Mestre JPaulo , muito obrigado,

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

    desde já lhe agradeço

    Marcelo
    tauron
    tauron
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

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

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

    Mensagem  tauron 26/6/2018, 19:05

    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.

    Conteúdo patrocinado


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

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 19/4/2024, 17:58