OVH Cloud OVH Cloud

Cryptage et Xml

2 réponses
Avatar
AlexC
Bonjour à tous,

Comme dans toutes mes applications j'utilise un fichier Xml comme fichier de
configuration de l'application.
Mais sur ma dernière application j'ai besoin de stocker des mots de passes.
Donc pour eviter une utilisation
non voulue de mes mots de passe, j'ai décidé de les crypter, mais voilà,
lorsque je stocke les mots de passe
cyptés dans le fichier Xml, une erreur est déclenchée :

"La paire de substitution est non valide"

Je pense que cela viens du fait que le cryptage génère des caractères non
reconnus par le Xml.

Auriez vous une solution à me proposer ?

Merci d'avance pour vos réponses.

2 réponses

Avatar
Christophe
La méthode la plus simple est de convertir tous tes caractère en code hexa.

Exemple :
Codage :

Dim i As Integer
Dim res As String

For i = 0 To TEXTE_CRYPTE.Length - 1
res &= Hex(Asc(TEXTE_CRYPTE.Substring(i, 1)))
Next

Décodage :

Dim Sortie As String = ""
Dim i As Integer

For i = 0 To TEXTE_CRYPTE.Length - 1 Step 2
Sortie &= Chr("&H" & TEXTE_CRYPTE.Substring(i, 2))
Next



"AlexC" <(@Anti-Spam)#(@Anti-Spam)#> a écrit
dans le message de news:
Bonjour à tous,

Comme dans toutes mes applications j'utilise un fichier Xml comme fichier


de
configuration de l'application.
Mais sur ma dernière application j'ai besoin de stocker des mots de


passes.
Donc pour eviter une utilisation
non voulue de mes mots de passe, j'ai décidé de les crypter, mais voilà,
lorsque je stocke les mots de passe
cyptés dans le fichier Xml, une erreur est déclenchée :

"La paire de substitution est non valide"

Je pense que cela viens du fait que le cryptage génère des caractères non
reconnus par le Xml.

Auriez vous une solution à me proposer ?

Merci d'avance pour vos réponses.




Avatar
AlexC
C'est exactement ce que j'ai fait mait le cryptage me sors des coractère
unicodes et ca semble planter quand meme :/
Bon je retourne au charbon
"Christophe" a écrit dans le message de news:
d6thqv$pkc$
La méthode la plus simple est de convertir tous tes caractère en code
hexa.

Exemple :
Codage :

Dim i As Integer
Dim res As String

For i = 0 To TEXTE_CRYPTE.Length - 1
res &= Hex(Asc(TEXTE_CRYPTE.Substring(i, 1)))
Next

Décodage :

Dim Sortie As String = ""
Dim i As Integer

For i = 0 To TEXTE_CRYPTE.Length - 1 Step 2
Sortie &= Chr("&H" & TEXTE_CRYPTE.Substring(i, 2))
Next



"AlexC" <(@Anti-Spam)#(@Anti-Spam)#> a écrit
dans le message de news:
Bonjour à tous,

Comme dans toutes mes applications j'utilise un fichier Xml comme fichier


de
configuration de l'application.
Mais sur ma dernière application j'ai besoin de stocker des mots de


passes.
Donc pour eviter une utilisation
non voulue de mes mots de passe, j'ai décidé de les crypter, mais voilà,
lorsque je stocke les mots de passe
cyptés dans le fichier Xml, une erreur est déclenchée :

"La paire de substitution est non valide"

Je pense que cela viens du fait que le cryptage génère des caractères non
reconnus par le Xml.

Auriez vous une solution à me proposer ?

Merci d'avance pour vos réponses.