E ai Galera descriptografar? alguem tem alguma funcao

11/03/2003

0

Aí galera alguem sabe alguma funcao para descriptografar ?
se souberem me deem uma força ai falow?


Anonymous

Anonymous

Responder

Posts

11/03/2003

Lady

Para desciptografar, voce deve fazer uma criptoanalise.
Vai depender do metodo usado para codificar.


Responder

11/03/2003

Lady

Para desciptografar, voce deve fazer uma criptoanalise.
Vai depender do metodo usado para codificar.


Responder

11/03/2003

Anonymous

Lady vc teria um metodo de criptografar e descriptografar?
Valeu


Responder

11/03/2003

Lady

Entao, é praticamente impossivel descriptografar assim ao acaso.

Quando voce nao sabe como foi criptografado, voce tem que analisar os arquivos e tentar achar um jeito.
Alem disso, atualmente tem aqueles esquemas de chave que uma pessoa dificilmente consegue quebrar.

O que voce pode fazer eh me dizer em que programa o arquivo foi codificado porque pra alguns existe programinhas que descriptografam que ja estao prontos.

Agora, fazer uma funcao, so se voce souber como foi codificado.
Senão, uma criptoanalise de um metodo de criptografia complexo demora muito e nao eh qualquer um que consegue fazer.


Responder

11/03/2003

Marcelo

Aê cara,,, eu tenho o seguinte codigo...

procedure TForm1.Button1Click(Sender: TObject);
var
Text1 : String; //Variável usada para armazenar o texto
Shift : Integer; //número de 02 à 225;
pos : Integer;
begin
//Criptografando...
text1 := Edit1.Text; //Campo onde está o texto que deseja criptografar.
Shift := 12;
For pos := 1 to Length(Text1) do
text1[pos] := Chr(ord(text1[pos]) + shift);
Edit2.Text:=text1; //Edit2.Text é o campo que ira receber o texto criptografado.
// Descriptografando...
text1 := Edit2.Text; //Edit2.Text é o campo onde esta o texto criptografado.
Shift := 12;
For pos := 1 to Length(Text1) do
text1[pos] := Chr(ord(text1[pos]) - shift);
edit3.Text:=text1; //Edit3.Text é o campo que irá receber o texto descriptografado.

/* Ai cara, não sou Landy não, mas se servir...... at+vr cara!
end;


Responder

12/03/2003

Anonymous

É O SEGUINTE POR EXEMPLO EU QUERO LER O REGISTRO DO WINDOWS
E EM ALGUMS VALORES DO REGISTRO ELE TRAZ CODIFICÕES, SÃO ESSAS CODIFICAÇÕES QUE EU PRECISO, MAS VALEU LADY E MARCELO(ESSE CÓDIGO EU JÁ TINHA)
VALEU PESSOAL SORTE PRA VCS...


Responder

12/03/2003

Lady

Lamento informar, mas dependendo de quem pôs os dados no registro, vai ficar muito dificil, pra nao dizer impossivel.


Responder

12/03/2003

Anonymous

Bom, o Windows utiliza, não uma criptografia, mas sim uma inversão de strings (ou arrays) conhecido como mojo crack.

Não tenho nada aqui(pois estou na empresa), mas... procure na net...com certeza vc vai encontrar...

[]´s 8)


Responder

12/03/2003

Henry Lima

Ai esta função é bem simples e útil na área de segurança, não sei se ela vai desincriptar o que vc quer más pode ajudar futuramente.

Function TFrmPrincipal.Encriptar(StrValue : String; Chave: Word) : String;
var
I : Integer;
OutValue : String;

begin

OutValue := ´´;
For I := 1 to Length(StrValue) Do
OutValue := OutValue + char(Not(ord(StrValue[I])-Chave));
Result := OutValue;

end;


Responder

13/03/2003

Anonymous

Ai valeu esquenta nao vou buscar na net aqui beleza...
Aí Lady, qual seu nome? acho que eu te conheço...(sem xaveco)


Responder

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar