CRYPT / DECRYPT / KEYGEN : UN MODULE CLAIR ET EXTRENEMENT UTILE !
cs_Willi
Messages postés
2375
Date d'inscription
jeudi 12 juillet 2001
Statut
Modérateur
Dernière intervention
15 décembre 2018
-
22 juin 2002 à 11:48
CerberusPau Messages postés 377 Date d'inscription lundi 3 avril 2006 Statut Membre Dernière intervention 22 août 2018 - 7 mai 2011 à 23:33
CerberusPau Messages postés 377 Date d'inscription lundi 3 avril 2006 Statut Membre Dernière intervention 22 août 2018 - 7 mai 2011 à 23:33
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/3723-crypt-decrypt-keygen-un-module-clair-et-extrenement-utile
https://codes-sources.commentcamarche.net/source/3723-crypt-decrypt-keygen-un-module-clair-et-extrenement-utile
7 mai 2011 à 23:33
J'ai un soucis avec la syntaxe
Dans mon exemple :
Clef = "D:\Test\Clef.ini"
Source= "D:\Test\Source.ini"
Destination="D:\Test\Destination.ini"
1°) La sub ci-dessous marche
Sub CréerClé()
KeyGen ("D:\Test\Clef.ini")
End Sub
Le fichier Clef.ini est bien créé
2°) La sub ci-dessous n'est pas valide pour appeler ta sub Crypt :
Sub Crypter()
Clef = "D:\Test\Clef.ini"
Source = "D:\Test\Source.ini"
Destination = "D:\Test\Destination.ini"
Crypt(Clef, Source, Destination)
End Sub
La dernière ligne passe en rouge avec le message:
"erreur de compilation, attendu: ="
J'ai donc une erreur de syntaxe...
3°) Même chose pour appeler ta sub Decrypt,
Comment appeler les sub Crypt et Decrypt correctement?
J'ai essayé de les passer en "Function", mais sans plus de succès...
ça doit être tout bête, mais je tourne en rond...
Merci beaucoup
15 déc. 2009 à 01:37
Merci d'avance.
19 avril 2004 à 17:35
Pour générer une clef : KeyGen("emplacement_cible")
Pour crypter un fichier : Crypt("emplacement_de_la_clef", "fichier_a_crypter", "fichier_crypte")
Pour décrypter un fichier : Decrypt("emplacement_de_la_clef", "fichier_crypte", "fichier_decrypte")
C'est tout ^^
9 avril 2004 à 18:26
22 juin 2002 à 11:48
----------------------------------------------------
PerfectVB2k2 / Programmes VB
http://www.perfectvb2k2.fr.st