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ť " )