Ako používať Rijndael vo VB6

Rijndael Algoritmus kódovania je napísaný v jazyku C. Je navrhnutý tak , aby nahradiť starnúce DES algoritmus , a to je bloková šifra . To zašifruje 128 - bitové bloky . Algoritmus používa kľúč a inicializačný vektor . Kľúčom k úspechu je v podstate heslo slúži na šifrovanie dát . IV sa používa pre zašifrovanie prvú časť dát . Je potrebné vytvoriť ako kľúč a IV na zašifrovanie súboru vo VB6 . Veci , ktoré budete potrebovať klipart VB6
Zobraziť viac Inštrukcie Cestuj 1

Kliknite na tlačidlo " Štart " , " Všetky programy " a " Visual Basic " otvorte Visual Basic . Kliknite na tlačidlo " Nový" a " projekt " pre vytvorenie nového projektu . Zadajte názov projektu . Zadajte umiestnenie pre ňu .
2

Kliknite na " Form1.vb " na aplikáciu Solution Explorer . Dvakrát kliknite na formulár pre prepnutie do kódu rozhrania . Zahrnúť nasledujúce dovoz : Dovoz SystemImports System.IOImports System.SecurityImports System.Security.Cryptography
3

vytvoriť kľúč pomocou kódu : Private Function CreateKey ( ByVal strPassword As String ) Ako Byte ( ) Dim bytKey Ako Byte ( ) Dim bytSalt Ako Byte ( ) = System.Text.Encoding.ASCII.GetBytes ( " soľ " ) Dim pdb As New PasswordDeriveBytes ( strPassword , bytSalt ) bytKey = pdb.GetBytes ( 32 ) Späť bytKeyEnd Funkcia
Stránka 4

Vytvorte IV pomocou funkcie : Private Function CreateIV ( byVal strPassword As String ) Ako Byte ( ) Dim bytIV Ako Byte ( ) Dim bytSalt Ako Byte ( ) = System.Text.Encoding.ASCII.GetBytes ( " soľ " ) Dim pdb ako nové PasswordDeriveBytes ( strPassword , bytSalt ) bytIV = pdb.GetBytes ( 16 ) Späť bytIVEnd funkcie
5

Šifrovanie súborov pomocou deklarovaní svojho CryptoServiceProvider a nastavenie CryptoStream : Dim csCryptoStream ako CryptoStreamDim cspRijndael ako nový System.Security.Cryptography.RijndaelManagedcsCryptoStream = Nové CryptoStream ( fsOutput , _cspRijndael.CreateEncryptor ( bytKey , bytIV ) , _CryptoStreamMode.Write )

• Predchádzajúca strana: Aké sú výhody IP CCTV 
• Ďalšia strana: Popis elektronických podpisov