[Resolvido]Descobrir Password de Formulário

Boa noite Amigos

Quem descobre a password para abrir o formulário desta BD ?

Aguardo

Assis,

Muito bom esse esquema de proteção.

Cleverson

Bom dia Cleverson

Descobriu ?

Nem eu sei onde a senha fica guardada, e não é da minha autoria.

Aguardo + feras do Forum.

Não.

Disse pois não em MDE e temos acesso aos códigos.

Abraços.

Olá Amigos

A senha está criptografada e guardada nas propriedades do aplicativo.

O autor criou a propriedade "AllowForm":

CurrentDb.Properties("AllowForm").Value

O valor da senha guardada e criptografada é: -35246

Para descobrir a senha, teremos que descriptografar.

Para isso teremos que reverter a criptografia da função

existente em VBA.

Quem tiver tempo, divirta-se

Eu criei em meus aplicativos uma propriedade onde fica guardado o caminho do BE.

[ ]'s

Noob

A senha é " forum60 " .
Mas para mim tem um defeito.
Depois de abrir o imputbox para inserir a senha, se não digitar nada e clickar no x para fechar ou cancelar, o formulário abre, e não deveria abrir.
Tem como corrigir ?
Obrigado

Boa Noob,

Uma dúvida de aluno?

Essa descriptografia só foi possível nesse caso com o acesso ao modo estrutura do form bem como dos códigos ?

Abraços

Cleverson

Exato!

Ou se tiver muita sorte!

Ou o Assis já sabia a senha, ou ele conseguiu fazer engenharia reversa na função de criptografia.

Dá pra ver o conhecimento do autor, portanto, ele apenas não "tirou as arestas", para deixar como

exemplo, isso é notório!

Assim como ele criptografou a senha, teria que descriptografar, mas ele foi esperto nisso também,

salvou o resultado da criptografia na propriedade para fazer a comparação, assim ele não

digita a senha no código VBA.

Assis

Como disse, é para fins didáticos, por isso que encontrou "defeitos"

Não gosto de inputbox() como pode ver não é algo apresentável, colocaria um formulário, com janela restrita.

Mas para fazer isso, teria que estudar o código para ver onde a coisa tá pegando.

Se me permite, Assis, vou deixar um link de um tópico.

maximoaccess.com/t29102-erro-de-bloqueio-em-campos-multivalor

Na mensagem nº 11, o autor do tópico disponibilizou o aplicativo.

Como vocês, são muito interessados em aprender, gostaria que baixasse o

aplicativo para analisar as combobox.

E me digam como foi feita aquela "bruxaria", nem o autor sabe.

Como disse, não tive tempo, formatei meu pc e estou adicionando os programas que uso.


[ ]'s

Noob

No exemplo que tenho é assim.

Na primeira abertura do formulário, é detectado que não tem senha, e assim abre a imputBox para escolher a Senha.

Como fui o primeiro a abrir o dito formulário fui eu que escolhi que a senha fosse "forum60"

No mesmo exemplo que tenho, também tem como eliminar a senha que o formulário tiver, assim como para a alterar.

Depois eu posto o BD completo, só queria agora era evitar que o dito formulário abra ao clikar no X de fechar o formulário e no cancel da imputbox

Obrigado

Assis

Na propriedade Ao Abrir do formulário, é verificado o valor da inputbox(),  em 2 momentos.

Quando é a primeira vez que se coloca a senha

Quando já tem a senha cadastrada.

Coloque o comando em azul nas duas verificações.


If gstrPasswd1 = "" Or gstrPasswd1 = Empty Then
                   
                    DoCmd.Quit
               
                       Exit Sub
End If


Coloquei para sair do aplicativo, porque se fechar o formulário, não da para se fazer nada, já que o Access está invisível.

[ ]'s

Obrigado Noob

Bom fim de semana


PS Link mensagem nº 1 actualizado

Obrigado !

Pra você também !!

Boa sorte!

Noob,

Obrigado pela resposta, vou verificar a sua dica!!!!

Abraços,