Discussion :

[hacker59]

Bonjour,

j'ai un petit probléme pour retrouver le mot de passe(par rapport un liste) par rapport fichier winrar(protéger par un mot de passe).
utilise SharpCompress comme dll : http://sharpcompress.codeplex.com/

voici une partie de mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
If TextBox2.Text <> "" Then
            For i = 0 To ListBox1.Items.Count - 1
                If ListRAR(TextBox1.Text, ListBox1.Items(i)) Then
                    Me.success = "Success"
                    Me.cracker = ListBox1.Items(i)
                End If
            Next i

le code listrar:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Function ListRAR(rarName As String, password As String) As Boolean
        Dim rarFile As RarArchive
        rarFile = RarArchive.Open(rarName)
        Using fs As FileStream = File.OpenRead(rarName)
            Using reader = RarReader.Open(fs, password)
                Try
                    While reader.MoveToNextEntry
                    End While
                Catch ex As Exception
                    Return False
                End Try
            End Using
        End Using
        Return True
    End Function

dans la listbox1 c'est afficher la liste tous les mot de passe par rapport un fichier txt, le but c'est retrouver le mot de passe par rapport d'un fichier winrar.
avez-vous une solution pour retrouver le mot de passe(listbox1) par rapport d'un fichier winrar?
cordialement,

[mactwist69]

Les hackers ne sont plus ce qu'ils étaient, lol.