Bonjour,
Je souhaite utiliser le cryptage proposé par les fonctions Windev CrypteStandard et DecrypteStandard() mais je coince sur un point...
Je vous explique :
Dans l'exemple de PcSoft on peux lire ceci
L'info affiché retourne bien la chaine cryptée du départ !
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 // Cryptage dune chaîne de caractères en utilisant lalgorithme AES sMessage est un Buffer = "Message à crypter" bufCle est un Buffer = HashChaîne(HA_MD5_128, "mot de passe") bufCrypte est un Buffer = CrypteStandard(sMesssage, bufCle, crypteAES128) // Décryptage sRésultat est un Buffer = DécrypteStandard(bufCrypte, bufCle, crypteAES128) Info(sRésultat)
Maintenant je souhaite stocker temporairement la chaine cryptée dans un fichier texte afin de la relire plus tard ! Voici mon code :
Là mon info n'affiche rien ! Et en débogage je n'arrive pas non plus à relire la chaine !!!!
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17 // Code pour écrire dans le fichier cFichierChiffrement est une chaîne = "C:\Chiffrement.txt" bufChaineACrypter est un Buffer = "Hahahaha" bufCleChiffrement est un Buffer = HashChaîne(HA_MD5_128, "mot de passe") bufChaineCryptée est un Buffer SI fFichierExiste(cFichierChiffrement) = Faux ALORS fCrée(cFichierChiffrement) bufChaineCryptée = CrypteStandard(bufChaineACrypter,bufCleChiffrement,crypteAES128) fSauveBuffer(cFichierChiffrement,bufChaineCryptée) // Code pour lire le fichier bufChaineCryptée = fChargeBuffer(cFichierChiffrement) bufChaineDécryptée = DécrypteStandard(bufChaineCryptée,bufCleChiffrement,crypteAES128) Info(bufChaineDécryptée)
Par contre la comparaison des deux fonctionne !
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 SI bufChaineDécryptée = bufChaineACrypter alors info("Vrai") FIN
Ma question serait comment lire un texte dans une variable de type buffer ?
Merci d'avance
Partager