Télécharger le zip
C'est choutte comme prog ... Mais avec un progressbar, et en écrivant ceci :PF = FreeFile()Open Text1.Text For Binary As #PFFileBuffer = Space(LOF(PF))Get #PF, 1, FileBufferça pourrais te permettre d'ouvrir des fichiers plus importants non ?
Super! Simple et efficace!
bon code et simple. Quand je crypt 2 fois de suite et je decrypt ensuite il apparait des caractères supplementaire.
"je test"c'est normal car il manque juste "-3" dans la fonction de cryptage. C'est lui qui rajoute 3 caractere à chaque cryptage. d'ou vien le - 3.sinon code super comme on dit simple et efficace!
Se souvenir du profil
Mot de passe oublié ? / Activation de compteCréer un compte
1 874 997 membres 208 nouveaux aujourd'hui 16 153 membres club