Voici un extrait de code vbs,
qui détermine toutes les combinaisons selon un choix de caractères mis à disposition dans un vecteur (abc..ABC..;:/!$..123..)
qui se nomme : vec_caractere()
Dans cette extrait de code, vous constaterez qu'il y a 6 boucle while, donc destiné à créer toutes les combinaisons de mots
d'une longeur de 6 caractères.
J'aimerais savoir comment faire pour optimiser l'écriture de ce code afin qu'il fonctionne pour les longeurs de mot de 1 à 12 caractères.
Car dans l'état actuel si je veux qu'il fonctionne de 1 à 12, je devrais copier/coller ce code l'un à la suite de l'autre
et soit enlever une ou plusieurs boucles while et/ou ajouter une ou plusieurs boucles while...
voici par exemple pour un mot de longeur 6 :
indice(1)=0
while (indice(1) <= limite_sup) and (resultat=false)
indice(2)=0
while (indice(2) <= limite_sup) and (resultat=false)
indice(3)=0
while (indice(3) <= limite_sup) and (resultat=false)
indice(4)=0
while (indice(4) <= limite_sup) and (resultat=false)
indice(5)=0
while (indice(5) <= limite_sup) and (resultat=false)
indice(6)=0
while (indice(6) <= limite_sup) and (resultat=false
combi =""
for l = 1 to longeur_actuel
combi = combi & vec_caractere(indice(l))
next
'msgbox combi
cpt(6) = cpt(6) + 1
totCpt = totCpt +1
resultat = isPassword(combi)
indice(6) = indice(6) + 1
wend '6
indice(5) = indice(5) + 1
wend '5
indice(4) = indice(4) + 1
wend '4
indice(3) = indice(3) + 1
wend '3
indice(2) = indice(2) + 1
wend '2
indice(1) = indice(1) + 1
wend '1
Partager