Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Vytvoriť premennú , ktorá stanovuje kľúč Blowfish . Kľúčom k úspechu je heslo na dešifrovanie súboru . Nasledujúci kód vytvorí Blowfish premennú a nastaví ho obsahujú " mypass " hesla kľúč :
Dim pwd ako String.pwd = " mypass "
2
Nastavte kľúč pre šifrovanie objekt . Šifrovanie objekt je premenná , ktorá obsahuje všetky informácie , ako je napríklad dešifrovanie hesla . Nasledujúci kód nastaví premennú Blowfish a kľúč pre dešifrovanie :
Dim crypt As New Chilkat.Crypt2 ( ) crypt.SetEncodedKey ( pwd , " ascii " )
3
dešifrovať súbor . Blowfish dešifruje súbor a uloží ho do nezašifrovaný súboru . Nasledujúci kód dešifruje súbor s názvom " encrypted.dat " a uloží ho do súboru s názvom " C.txt " :
kompletné = crypt.CkDecryptFile ( " encrypted.dat " , " encrypted.txt " )
" dokončenie " označuje, že dešifrovanie bol úspech .
4
Poslať správu softvéru užívateľa , ktorý dešifrovanie úspešne dokončená . Nasledujúci kód odošle správu do softvérového užívateľovi :
MsgBox ( " Súbor dešifrovať " )