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

    [Resolvido]Vinculo de tabelas

    Compartilhe
    avatar
    Oliveira89
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 162
    Registrado : 07/09/2016

    [Resolvido]Vinculo de tabelas

    Mensagem  Oliveira89 em 3/11/2016, 15:07

    Boa tarde pessoal

    É o seguinte vinculei já a minha base de dados correctamente, contudo queria impedir um cliente de ver um campo de uma tabela, neste caso seria o campo password. tenho uma tabela com o campo password e queria impedir um cliente de aceder a essa tabela e ver.
    fiz o front e o back end incriptado, mas ainda tem acesso a ver essa tabela. o que poderei fazer?


    .................................................................................
    Muito Obrigado
    Com os melhores Cumprimentos
    此致
    Oliveira
    avatar
    Jair Martins
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 78
    Registrado : 23/03/2016

    Re: [Resolvido]Vinculo de tabelas

    Mensagem  Jair Martins em 3/11/2016, 17:49

    Olá, Oliveira89.

    O front end é um accde?

    Se for, aconselho a ter esta tabela no front end mesmo. Como você gera o accde a partir de um accdb, poderá usar um código para impedir todo e qualquer acesso ao modo estrutura do aplicativo, inclusive tabelas vinculadas, e disparar este código antes de instalar o accde. O código é:

    AlterarPropriedade "AllowBypassKey", dbBoolean, False


    Abs.
    avatar
    Oliveira89
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 162
    Registrado : 07/09/2016

    Re: [Resolvido]Vinculo de tabelas

    Mensagem  Oliveira89 em 4/11/2016, 09:02

    Bom dia

    já tinha criado a extenção accde, contudo a vista de estrutura das tabelas continua operacional.
    Vc disse para criar uma tabela com esse codigo, mas como faço isso?


    .................................................................................
    Muito Obrigado
    Com os melhores Cumprimentos
    此致
    Oliveira
    avatar
    Jair Martins
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 78
    Registrado : 23/03/2016

    Re: [Resolvido]Vinculo de tabelas

    Mensagem  Jair Martins em 4/11/2016, 12:31

    Oliveira,


    Recomendo a seguinte estratégia, que é a que eu uso aqui. Observe que esta técnica não permite a exibição da lista de objetos. Nem tabelas, nem forms, nem consultas, nem nada. É um procedimento bastante radical.

    Então, antes de fazer, certifique-se que o seu aplicativo está completo e que todos os objetos de interface serão abertos somente a partir de códigos.

    1 - Vá nas Opções do Aplicativo e desabilite o uso das Teclas Especiais do Access e
    a exibição do Painel de Navegação.

    2 - Cole num módulo existente ou crie um novo módulo com a função abaixo:

    Function AlterarPropriedade(strPropName As String, varPropType As Variant, varPropValue As Variant) As Integer

       Dim dbs As Database, prp As Property
       Const conPropNotFoundError = 3270

       Set dbs = CurrentDb
       On Error GoTo Change_err
       dbs.Properties(strPropName) = varPropValue
       AlterarPropriedade = 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.
           AlterarPropriedade = False
           Resume Change_bye
       End If
       
    End Function


    3 - Crie um form com um comando que acione o código:
    AlterarPropriedade "AllowBypassKey", dbBoolean, False

    4 - Antes de instalar o accde, abra (no accde) este form e acione o comando.
    Está feito. Não há jeito nenhum de abrir qualquer objeto através do Painel de Navegação. Enquanto não for acionado o comando, você poderá abrir tanto o accde quanto o accdb utilizando a combinação Shift + F11.
    Nunca utilize o comando no accdb, a não ser que você tenha uma cópia de segurança.

    Qualquer dúvida, estou à disposição.

    Abs.
    avatar
    Oliveira89
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 162
    Registrado : 07/09/2016

    Re: [Resolvido]Vinculo de tabelas

    Mensagem  Oliveira89 em 4/11/2016, 15:34

    Boa Wink muito obrigado


    .................................................................................
    Muito Obrigado
    Com os melhores Cumprimentos
    此致
    Oliveira

      Data/hora atual: 21/10/2018, 11:42