CHARLIGMA

Commentaire de le5ejumeau le 31/05/2006 01:01:03

je vais te donner quelques conseils pour programmer et pour te faire comprendre des autre programmeurs :
- Indente ton code
au lieu de
If n > nkey Then
nkeyt = n Mod nkey + 1
Else: nkeyt = n
End If

fait

If n > nkey Then
    nkeyt = n Mod nkey + 1
Else
    nkeyt = n
End If

- n'utilise pas les gotos c'est moche  et illisible
- en v6 ça : Dim key, Clair, Crypte As String c'est faux ici juste la variable Crypte  est en string , les 2 autres sont en variant

-Le module ne sert à rien

- pour la longueur d'une chaine on fait len(Chaine)
- Utilise des tableaux pour les correspondances
....
et j'en passe

Il y a un gros Bug (Tappe AZE comme cle et sa plante)

au niveau de la cryptographie fait quelque recherche sur google il y a des méthode de cryptographie facile à "algorithmer" qui sont plus évicace que celle-ci !!!

Voila A+

Commentaire de mafia_cena le 11/06/2006 18:00:43

code de taquilla
stp