Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Visual Basic 6 - Decriptazione
Forum - Visual Basic 6 - Decriptazione

Avatar
c.ronaldo (Normal User)
Expert


Messaggi: 577
Iscritto: 01/02/2007

Segnala al moderatore
Postato alle 16:07
Sabato, 21/04/2007
Salve a tutti...

Ho fatto un prog in vb, che cripta un testo....

Ma non riesco(s che una cosa di logica) a decriptarla!!

Come posso fare:-?:-|

Vi posto il codice :

Codice sorgente - presumibilmente VB.NET

  1. Dim str, punt, chiave
  2.  
  3. Private Sub Command1_Click()
  4. str = "AEB1CG7FH9I28NL4MO056RSP3QTZUV"
  5. punt = Len(Text1.Text) * 2
  6. chiave = Mid(str, punt, 6)
  7. Text2.Text = chiave
  8. End Sub



Aiutatemi!

PM Quote
Avatar
P4p3r0g4 (Member)
Guru


Messaggi: 1319
Iscritto: 29/12/2006

Segnala al moderatore
Postato alle 19:14
Sabato, 21/04/2007
Testo quotato

Postato originariamente da c.ronaldo:
Dim str, punt, chiave

Private Sub Command1_Click()
str = "AEB1CG7FH9I28NL4MO056RSP3QTZUV"
punt = Len(Text1.Text) * 2
chiave = Mid(str, punt, 6)
Text2.Text = chiave
End Sub



Questo non un sistema di criptazione.
non fa che darti 6 lettere della stringa partendo dal doppio della lunghezza del testo.
cio se scirvo "banana" o "sapone" da lo stesso risultato.
inoltre se metto un valore sopra al 12 (se non erro) la chiave non neanche completa.
a 15 la lettera iniziale e addirittura fuori stringa!

PM Quote
Avatar
c.ronaldo (Normal User)
Expert


Messaggi: 577
Iscritto: 01/02/2007

Segnala al moderatore
Postato alle 19:17
Sabato, 21/04/2007
Vabb dopo lo miglioro,ma come posso fare allora per fare l'inverso:-?:k:

PM Quote
Avatar
P4p3r0g4 (Member)
Guru


Messaggi: 1319
Iscritto: 29/12/2006

Segnala al moderatore
Postato alle 20:59
Sabato, 21/04/2007
non puoi!
non si pu invertire un processo del genere!!

PM Quote
Avatar
motoboy (Ex-Member)
Pro


Messaggi: 152
Iscritto: 05/04/2007

Segnala al moderatore
Postato alle 0:47
Domenica, 22/04/2007
Testo quotato

Postato originariamente da c.ronaldo:

Salve a tutti...

Ho fatto un prog in vb, che cripta un testo....

Ma non riesco(s che una cosa di logica) a decriptarla!!

Come posso fare:-?:-|

Vi posto il codice :

Codice sorgente - presumibilmente VB.NET

  1. Dim str, punt, chiave
  2.  
  3. Private Sub Command1_Click()
  4. str = "AEB1CG7FH9I28NL4MO056RSP3QTZUV"
  5. punt = Len(Text1.Text) * 2
  6. chiave = Mid(str, punt, 6)
  7. Text2.Text = chiave
  8. End Sub



Aiutatemi!



:-?:-?:-?

Descriptare :-? :-| ...

PM Quote
Avatar
Hacker (Member)
Guru


Messaggi: 1014
Iscritto: 06/06/2006

Segnala al moderatore
Postato alle 9:12
Domenica, 22/04/2007
non si pu.

PM Quote
Avatar
c.ronaldo (Normal User)
Expert


Messaggi: 577
Iscritto: 01/02/2007

Segnala al moderatore
Postato alle 10:35
Domenica, 22/04/2007
ok...

Ho implementato un altro algortmo!


Grazie lo stesso:k:;)

PM Quote