[Resolvido]Extrair senha de tabela

Possuo um BD no qual tenho acesso a todos os seus objetos, sei q devido a isso posso alterá-lo,no entanto não vou.

Quero disponibilizar para outros usuarios do jeito que está, no entanto nesse BD há uma tabela:usuario que possui além de outros um campo:senha cujo conteúdo está definido como tal, ou seja, *********.

Já tentei de várias formas extrair a codificação dessa senha, mas não consegui.

Como descobrir?

Basta alterar o formato desse campo na tabela, de Senha para Texto.

Não deu certo!

Abaixo descrevo detalhes no modo design da tabela:usuario

Campo > senha
Tipo de dados > texto

Aba Geral: ( alguns itens que julgo importante )

Tamanho - 16
Máscara de entrada - Senha ( já tentei alterar esse campo mas não funciona )
Valor padrão - "123"

Aba Pesquisa:

Exibir Controles - Texto

Veja se existe algum modulo de codificar texto, provavelmente o autor codificou para não existir mexidas.

JPaulo!!!

Passo disponibilizar para você o arquivo ?

Eu não consigo postar pelo site, e nem há um tutorial de como anexar corretamente arquivos mto embora pareça simples, tentei localizar mas não achei, e se me permitem dizer, percebo que em outros tópicos, que outros colegas também não conseguem nem mesmo postar um link.

Grato

Coloque ele aqui e passe o link;

http://www.speedyshare.com/

Ok JPaulo.

Link do arquivo

Nome do arquivo: BD com senha

Grato

Au ja o havia avisado que este que esta enviando está corrompido.. não da acesso as tabelas...

Porfavor envie um aplicativo valido e sem erros..

Cumprimentos.

Confirmado, banco corrompido!!!

Tentando novamente,..
Novo link do BD


NOME: Arquivo BD - SENHA

apaguei apenas ulguns itens do projeto ok, todas as tabelas estão presentes

Amigão, foi só tirar a máscara SENHA e pronto:

Código:

EW3d<Z6gDc6Z6g

Sucesso!

Oh amigo,...

eu tentei esses digitos, porque os encontrei fazendo o mesmo que vc, mas não deu certo, pois dava "senha inválida"!

Ainda aguardo +ajuda

Com licença dos amigos...
A um evento após atualizar do campo "SENHAENTRA" que está causando seus problemas. REtirei esse evento e usando a senha que o Avelino passou no tópico anterior entrou direitinho. Aqui está o seu bd sem essa função. Teste aí para ver.

Clique aqui e baixe

Dá senha invalida porque você não adaptou um DLookup para validação na tabela:

If Me.SENHAENTRA.Value = DLookup("SENHA", "USUARIOS", "USUARIO='" & Me.LOGIN.Column(0) & "'") Then

Veja;
http://dl.dropbox.com/u/771097/ArquivoBDSENHA.rar

E claro que tem de tirar a criptografia.

Testei com a senha que esta no campo, retirando a mascara como o Avelino Sugeriu.. Funcionou...

Agora se quer descriptografar para saber os numeros.. tem que fazer o processo inverso, observando os codigos Asc inseridos na tabela.. Esses codigos estao descritos no Módulo rotina.. ele pega o valor da telcla (seja numero ou texto) e de acordo com o seu código asc grava na tabela dois caracteres equivalentes...

Aqui esta toda solução que necessita...

Abra o form Descripto

Se digitar uma senha na caixa Criptografar, apos atualizar na caixa texto Resultado aparece ela criptografada..

Na combo se escolher a senha da tabela usuario e clicar em discriptografar ele mosta a senha original como o usuário digita.

Para isso criei uma tabela contendo os códigos asc referente as teclas.. e o código:

Código:

Private Sub Comando22_Click()
  Dim I As Integer
  Dim pos As Integer
  Dim X As Integer
  Dim StrTemp As String
  Dim StrResult As String
  X = 1
  InitCod
  For I = 1 To Len(Me.txtSenha)
    StrTemp = Mid(Me.txtSenha, X, 2)
    StrResult = StrResult & DLookup("cpCarcter", "tblAsc", "Cripto='" & StrTemp & "'")
    X = X + 2
    Me.txtResult = StrResult
  Next I
 
End Sub


http://dl.dropbox.com/u/26441349/UMEI_23_09_11.rar


Cumprimentos

Ja com a solução do colega João paulo.. Basta digitar a senha deascriptografada, uma variável armazena a senha criptografada e faz a validação na tabela usuário
Senha Cripto = EW3dSenha Descripto = Hsc1201

http://dl.dropbox.com/u/26441349/UMEI_23_09_11_1.rar

Cumprimentos.

Bom dia!!

Senha RESOLVIDO!!

Grato pela ajuda Marcelo David, JPaulo, Harysohn e demais,...


VCS SÃO MTO FERA!!!

O Fórum agradece o Retorno.