[DÉBUTANTS] CRYPTAGE, DÉCRYPTAGE FACILE
elguevel
Messages postés
718
Date d'inscription
jeudi 19 décembre 2002
Statut
Membre
Dernière intervention
22 novembre 2016
-
5 nov. 2008 à 22:22
laaraj11 Messages postés 6 Date d'inscription vendredi 1 septembre 2006 Statut Membre Dernière intervention 13 janvier 2013 - 30 juil. 2011 à 19:15
laaraj11 Messages postés 6 Date d'inscription vendredi 1 septembre 2006 Statut Membre Dernière intervention 13 janvier 2013 - 30 juil. 2011 à 19:15
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/47637-debutants-cryptage-decryptage-facile
https://codes-sources.commentcamarche.net/source/47637-debutants-cryptage-decryptage-facile
30 juil. 2011 à 19:15
je me demande si on peut crypter en DES sans utilisé de vecteur d'initialisation ?
5 nov. 2008 à 22:28
5 nov. 2008 à 22:22
Par contre fais gaffe tu ne fermes pas tes flux (stream).
Utilises la methode ".Close" ou alors le mot clé "Using"
ex:
Public Function Encrypt(ByVal value As String) As String
Dim Resultat As String = ""
If (Not value.Equals("")) Then
Dim cryptoProvider As DESCryptoServiceProvider = New DESCryptoServiceProvider()
Using ms As MemoryStream = New MemoryStream()
Using cs As CryptoStream = New CryptoStream(ms, cryptoProvider.CreateEncryptor(KEY_64, IV_64), CryptoStreamMode.Write)
Using sw As StreamWriter = New StreamWriter(cs)
sw.Write(value)
sw.Flush()
cs.FlushFinalBlock()
ms.Flush()
Resultat = Convert.ToBase64String(ms.GetBuffer(), 0, ms.Length)
End Using
End Using
End Using
End If
Return Resultat
End Function