|
Rijndael algorithme de chiffrement est écrit en C. Il est conçu pour remplacer l'algorithme DES vieillissement et il est un chiffrement par bloc . Il crypte des blocs de 128 bits. L'algorithme utilise une clé et un vecteur d'initialisation . La clé est fondamentalement le mot de passe utilisé pour chiffrer les données . Le IV est utilisée pour crypter la première partie des données . Vous devez créer la clé et IV pour crypter un fichier en VB6 . Choses que vous devez
VB6
Voir Plus Instructions
1 Cliquez sur " Démarrer", " Tous les programmes " et " Visual Basic " pour ouvrir Visual Basic. Cliquez sur "Nouveau " et " projet " pour créer un nouveau projet. Entrez un nom pour le projet. Spécifiez un emplacement pour elle .
2 Cliquez sur " Form1.vb " sur l' Explorateur de solutions. Double- cliquez sur le formulaire pour passer à l' interface de code. Inclure les importations suivantes : Importations SystemImports System.IOImports System.SecurityImports System.Security.Cryptography
3 créer une clé via le code suivant: Private Function CreateKey ( ByVal strPassword As String ) As Byte () bytKey As Byte () As Byte bytSalt () = System.Text.Encoding.ASCII.GetBytes ( «sel» ) Dim pdb As New PasswordDeriveBytes ( strPassword , bytSalt ) bytKey = pdb.GetBytes (32 ) Retour Fonction bytKeyEnd
4 Créer IV via la fonction : Private Function CreateIV ( ByVal strPassword As String) As Byte () bytIV As Byte () As Byte bytSalt () = System.Text.Encoding.ASCII.GetBytes ( «sel» ) Dim pdb As New PasswordDeriveBytes ( strPassword , bytSalt ) bytIV = pdb.GetBytes (16 ) Retour bytIVEnd Fonction
5 Crypter vos fichiers via déclarer votre CryptoServiceProvider et la mise en place CryptoStream : Dim csCryptoStream comme CryptoStreamDim cspRijndael As New System.Security.Cryptography.RijndaelManagedcsCryptoStream = New CryptoStream ( fsOutput , _cspRijndael.CreateEncryptor ( bytKey , bytIV ) , _CryptoStreamMode.Write )
|
