Ako šifrovať súbor s VB

Visual Basic programovací jazyk , publikuje spoločnosť Microsoft , prichádza s vstavanou - in knižnica pre manipuláciu šifrovanie a kryptografia . Hoci šifrovanie knižnica stará z najťažších častí šifrovanie súborov , nie je zrejmé , ako používať nástroje dodávané na zašifrovanie súboru . Najdôležitejšie je začiatok , že šifrovať súbor , musíte najprv prečítať ako pole bajtov , nie textový alebo iné dátové typy . Pokyny dovolená 1

Vytvorenie nového projektu v jazyku Visual Basic kliknutím na tlačidlo " Súbor " a " New Project " . Vyberte možnosť " aplikácie Console " . Neskôr , môžete použiť rovnaký kód použitý v tomto tutoriálu na akékoľvek grafické užívateľské rozhranie ( GUI ) , aplikácia sa rozhodnete stavať .
2

Importovať knižnicu Cryptography vložením nasledujúci riadok kódu v hornej časti vašej žiadosti :

Dovoz System.Security.Cryptography
3

čítať dáta zo súboru , ktorý chcete zašifrovať ako pole bajtov pomocou nasledujúceho príkazu :

Dim bajtov ( ) = My.Computer.FileSystem.ReadAllBytes ( " C : \\ file.dat " )

Nahradiť " C : \\ file.dat " s cestu a názov súboru chcete zašifrovať .
4

prilepte nasledujúci príkaz vyhlásiť kľúč a inicializačný vektor pre funkciu šifrovania. Budete potrebovať informácie , aby dešifrovať súbor :

Dim tlačidlo ( ) ako 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 ( ) ako Byte = { 8,7,6,5,4,3 , 2,1 }

Samozrejme , mali by ste vymeniť všetky čísla v oboch kľúče a inicializačný vektor s inými číslami . Každý , kto vie , že tieto čísla môžu dešifrovať súbor , tak aby boli ťažké uhádnuť . Čísla by mali byť všetky platné bajtov : . Medzi 0 a 255
5

inicializovať Encryptor , šifrovanie prúd a pamäťovú prúd držať šifrované dáta , zatiaľ čo sa rozhodnúť , čo s tým robiť . Vložte nasledujúci kód :

dim tdescsp = New TripleDESCryptoServiceProvider ( )

dim šifrátor = tdescsp.CreateEncryptor ( kľúč , init_vector )

dim memStream = new System.IO.MemoryStream

dim encryptionStream = new CryptoStream ( memStream , šifrovacie , CryptoStreamMode.Write )
6

Šifrovanie bajt poľa zhora vložením nasledujúce :

encryptionStream.Write ( bajtov , 0 , bytes.Length )

encryptionStream.FlushFinalBlock ( )

memStream.Position = 0
7

Prečítajte si šifrované dáta späť do svojho memStream :

Dim encrypted_bytes ( memStream.Length - 1 ) ako Byte

memStream.Read ( encrypted_bytes , 0 , memStream.Length )

memStream.Close ( )

8

vložte nasledujúci tlačiť zašifrované dáta do konzoly : klipart

pre každý x v encrypted_bytes

Console.Write ( x )

Console.Write ( " " )

ďalšie

Console.ReadKey ( )
9

Stlačte zelenú šípku pre spustenie aplikácie .

• Predchádzajúca strana: Ako zoradiť dáta v aplikácii Visual Basic 
• Ďalšia strana: Ako napísať Visual Basic Array dát do textového súboru