versleutelen De Visual Basic programmeertaal , uitgegeven door Microsoft , wordt geleverd met een ingebouwde bibliotheek voor de behandeling van encryptie en cryptografie . Hoewel de encryptie bibliotheek verzorgt de moeilijkste onderdelen van het versleutelen van een bestand , is het niet duidelijk hoe de instrumenten om een bestand te versleutelen . Het belangrijkste begin is , dat u uw bestand te versleutelen , moet u eerst leest het als een array van bytes , geen tekst of andere gegevens . Instructies
1 Maak een nieuw project in Visual Basic door te klikken op " File " en " New Project . " Selecteer de optie " Console Application " . Later kunt u dezelfde code gebruikt in deze tutorial de cryptografie bibliotheek van toepassing op elke Graphical User Interface ( GUI ) applicatie die je beslist om te bouwen .
Import 2 door het plakken van de volgende regel code aan de top van uw aanvraag : Imports System.Security.Cryptography
3
Lees de gegevens uit het bestand dat u wilt coderen als een array van bytes met het volgende commando : < br Dim bytes ( ) = My.Computer.FileSystem.ReadAllBytes > ( " C : \\ bestand.dat " ) op Twitter Vervang " C : \\ bestand.dat " met het pad en de naam van het bestand u wilt coderen .
4 Plak de volgende opdracht om de sleutel en initialisatie vector verklaren voor de encryptie -functie . U vindt deze informatie om het bestand te decoderen nodig : Dim key
( ) als Byte = { 24,23,22,21,20,19,18,17,16,15,14,13 , 12,11,10,9,8,7,6,5,4,3,2,1 } Dim init_vector
( ) als Byte = { 8,7,6,5,4,3 , 2,1 }
natuurlijk moet je alle nummers te vervangen in zowel de sleutel en de initialisatie vector met andere nummers . Wie kent deze nummers kan ontcijferen uw dossier , zodat ze moeilijk te raden . De nummers moeten allemaal geldig bytes : . Tussen 0 en 255
5 Initialiseer de encryptor , een encryptie- stroom en een memory stream naar de versleutelde data vast te houden terwijl u beslissen wat te doen met het. Plak de volgende code : dim tdescsp
= Nieuw TripleDESCryptoServiceProvider ( ) dim encryptor = tdescsp.CreateEncryptor ( key , init_vector ) op Twitter dim memStream = new System.IO.MemoryStream
dim encryptionStream = new CryptoStream
( memStream , encrypterende , CryptoStreamMode.Write )
6 versleutelen de byteserie van bovenaf door de volgende plakken : encryptionStream.Write
( bytes , 0 , bytes.Length ) encryptionStream.FlushFinalBlock
( ) memStream.Position
= 0
7 Lees de versleutelde data terug in uw memStream : Dim encrypted_bytes
( memStream.Length - 1 ) als Byte memStream.Read
( encrypted_bytes , 0 , memStream.Length ) memStream.Close
( ) op < br > 8 Plak volgende om de versleutelde gegevens afdrukken naar de console :
voor elke x in encrypted_bytes Console.Write
( x ) Console.Write
( " " ) volgende Console.ReadKey (
)
9 Druk op de groene pijl om de toepassing uit te voeren .
|
