OVH Cloud OVH Cloud

cryptage

2 réponses
Avatar
patrickrgn
Bnnjour,
je souhaite crypter une chaine de caractère mais je ne sais pas comment faire.
Avez-vous des conseils à me donner?

Merci

Patrick


--
http://www.atelierprog.net : Portail sur les langages de programmation web

2 réponses

Avatar
Mathieu Francesch
Bonsoir Patrick,

Il existe de nombreuses façon de crypter une chaine alors arbitrairement je
vais vous en présenter une, celle de Vincent Rijmen :

Utilisation des espaces de noms :
Imports System.Security.Cryptography
Imports System.Text
Imports System.IO


Dim Cryptage As Rijndael = Rijndael.Create
Dim Fichier As FileStream = File.Open("c:test.txt", _
FileMode.OpenOrCreate)
Dim CryptStream As New CryptoStream(Fichier, _
Cryptage.CreateEncryptor(Cryptage.Key,
Cryptage.IV), _
CryptoStreamMode.Write)

Dim sWriter As New StreamWriter(CryptStream)

sWriter.WriteLine(TextBox1.Text)
sWriter.Close()
CryptStream.Close()
Fichier.Close()

Pour le décryptage c'est la même chose sauf qu'au lieu d'utiliser
CreateEncryptor nous utilisons CreateDecryptor, ensuite nous utilisons la
méthode read de CryptoStreamMode et pour finir un streamreader.

Pour plus d'information, je vous invite à lire ceci
http://msdn.microsoft.com/library/fre/default.asp?url=/library/FRE/cpref/html/frlrfSystemSecurityCryptography.asp

Bonne lecture et bon test !

--
Cordialement,

Mathieu Francesch
http://adonet.conceptforum.net



"patrickrgn" wrote:

Bnnjour,
je souhaite crypter une chaine de caractère mais je ne sais pas comment faire.
Avez-vous des conseils à me donner?

Merci

Patrick


--
http://www.atelierprog.net : Portail sur les langages de programmation web


Avatar
patrickrgn
Le problème est que le chifrage est illisible. Je voudrais pouvoir faire la
meme chose que la fonction MD5 en php. Je sais qu'elle existe en vb mais je
sais pas coment m'en servir.

--
http://www.atelierprog.net : Portail sur les langages de programmation web


"Mathieu Francesch" a écrit :

Bonsoir Patrick,

Il existe de nombreuses façon de crypter une chaine alors arbitrairement je
vais vous en présenter une, celle de Vincent Rijmen :

Utilisation des espaces de noms :
Imports System.Security.Cryptography
Imports System.Text
Imports System.IO


Dim Cryptage As Rijndael = Rijndael.Create
Dim Fichier As FileStream = File.Open("c:test.txt", _
FileMode.OpenOrCreate)
Dim CryptStream As New CryptoStream(Fichier, _
Cryptage.CreateEncryptor(Cryptage.Key,
Cryptage.IV), _
CryptoStreamMode.Write)

Dim sWriter As New StreamWriter(CryptStream)

sWriter.WriteLine(TextBox1.Text)
sWriter.Close()
CryptStream.Close()
Fichier.Close()

Pour le décryptage c'est la même chose sauf qu'au lieu d'utiliser
CreateEncryptor nous utilisons CreateDecryptor, ensuite nous utilisons la
méthode read de CryptoStreamMode et pour finir un streamreader.

Pour plus d'information, je vous invite à lire ceci
http://msdn.microsoft.com/library/fre/default.asp?url=/library/FRE/cpref/html/frlrfSystemSecurityCryptography.asp

Bonne lecture et bon test !

--
Cordialement,

Mathieu Francesch
http://adonet.conceptforum.net



"patrickrgn" wrote:

> Bnnjour,
> je souhaite crypter une chaine de caractère mais je ne sais pas comment faire.
> Avez-vous des conseils à me donner?
>
> Merci
>
> Patrick
>
>
> --
> http://www.atelierprog.net : Portail sur les langages de programmation web