Brute force, l'algorythme seul, pret à l'utilisation

Soyez le premier à donner votre avis sur cette source.

Vue 70 656 fois - Téléchargée 7 670 fois

Description

Ben voici ma première source !
Il y en à plein comme comme celle-ci certe, mais je n'ai pas trouvé l'algorythme de brute force seul. Celui-ci contient donc QUE le code du brute-force, propre, et sans rien d'autre si ce n'est l'affichage de la chaine testée en cours, et d'un compteur.
Donc (gros) débutants, amusez-vous !

Petite définition du brute force :
Le brute force sert à tester toutes les chaines possibles avec une liste de caractères, et s'arrete lorsqu'il à trouvé la chaine cryptée, un mot de passe...etc (oui, c'est du cracking ^^)

Source / Exemple :


'début de la recherche
Do
LengthDepart = Len(Depart)
   If Right(Depart, 1) <> CaracteresArrayReverse(0) Then 'si le dernier caractere n'est pas le dernier de la liste
     Depart = Left(Depart, LengthDepart - 1) & CaracteresArray(InStr(1, Caracteres, Right(Depart, 1), 0))
   Else 'sinon
     Dim id As Integer
     id = LengthDepart
     Do While Mid(Depart, id, 1) = CaracteresArrayReverse(0)
       Mid(Depart, id, 1) = CaracteresArray(0) 'tous les caracteres étant le dernier de la liste sont remplacés par le premier
       id = id - 1
       If id = 0 Then Exit Do 'si tous les caracteres sont le dernier de la liste (voir 1)
     DoEvents
     Loop
     If id <> 0 Then
     Mid(Depart, id, 1) = CaracteresArray(InStr(1, Caracteres, Mid(Depart, id, 1), 0)) 'sinon, on remplace le précédent par son suivant dans la liste
     Else
     Depart = CaracteresArray(0) & Depart '(1) ajout d'un caracteres à la chaine
     End If
   End If

If Depart = ChampPass.Text Then Exit Do 'test de la chaine généré (utilisez une fonction à la place du ChampPass.Text pour les chaines cryptées, ou hashées, sinon ça sert à rien le brute force ^^), si ok on sort de la boucle do, sinon recommence
NbPsw = NbPsw + 1
PSW = Depart
DoEvents
Loop
'fin de la recherche

Conclusion :


Copie/Colle ou télécharge ;)

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
1
Date d'inscription
lundi 4 avril 2011
Statut
Membre
Dernière intervention
4 avril 2011

salu tout le monde pouver vous meder je ne comprend rien jaimerais trouver un mots de passe de fb ?
Messages postés
1
Date d'inscription
mardi 16 juin 2009
Statut
Membre
Dernière intervention
23 mars 2011

Je suis actuellement entrain d'essayer d'apprendre à programmer, j'utilise Microsoft Visual Basic 2008 Express, mais je ne comprend pas comment faire fonctionner ce code.
-Le code ci-dessus est-il a copier coller intégralement dans Microsoft Visual Basic 2008 Express dans un nouveau projet (les écrits verts compris) ?
-Quel est le fichier du zip qu'il faut lancer pour faire fonctionner ce programme ?
-Faut il d'autre logiciel pour le faire fonctionner ?
-Dans le zip n'y a t'il pas de fichier executable en .exe ?
-Que faut il modifier/remplacer dans ce code pour qu'il fonctionne ?
Ça fait beaucoup de questions je suis désolé, j'espère avoir un peu d'aide merci d'avance.
Messages postés
1
Date d'inscription
mercredi 2 mars 2011
Statut
Membre
Dernière intervention
2 mars 2011

salut

tu dit en haut copier et coller la source mais on colle ou ?
Messages postés
26
Date d'inscription
lundi 12 avril 2010
Statut
Membre
Dernière intervention
3 octobre 2016

salut

J'ai simplifié une source générateur de l'attaque brute force pour les personnes que sa intéresse vous pourrai trouvé a l'adresse suivante "http://www.vbfrance.com/code.aspx?ID=51970" sur vbfrance.

a+
Messages postés
1
Date d'inscription
dimanche 26 juin 2005
Statut
Membre
Dernière intervention
16 février 2010

bonjour, je voudrais savoir comment on fait fonctionner ce prgm, je doit faire quoi pour que ca marche ? pliz
Afficher les 46 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.