Форум АНТИЧАТ

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)
-   С/С++, C#, Delphi, .NET, Asm (https://forum.antichat.xyz/forumdisplay.php?f=24)
-   -   Класс AES для vb (https://forum.antichat.xyz/showthread.php?t=163667)

_>SubDeviL<_ 15.12.2009 08:53

Класс AES для vb
 
Утро доброе, есть ли у кого нибудь такое, либо любая софтина, сурц чтобы дешифровать файл AES ?

.ATK 15.12.2009 09:03

Rijndael
у тебя есть ключ?

Цитата:

//sourceFile - путь до файла с открытым тестом
//destinationFile - путь до файла с зашифрованной инфой
public void decryptData(string sourceFile, string destinationFile, string key)
{
RijndaelManaged TDes = new RijndaelManaged(); //создаем //провайдер
// TDes.KeySize = key.Length;
TDes.Key = ASCIIEncoding.ASCII.GetBytes(key);


TDes.IV = ASCIIEncoding.ASCII.GetBytes(key); //в твоём случае его генерировать не надо вродь как...

FileStream SText = new FileStream(destinationFile, FileMode.Open, FileAccess.Read);

ICryptoTransform decrypt = TDes.CreateDecryptor();

CryptoStream DecryptionStream = new CryptoStream(SText, decrypt, CryptoStreamMode.Read); //создаем шифровальщик

StreamWriter OpenT = new StreamWriter(sourceFile,false,Encoding.Default);
OpenT.Write(new StreamReader(DecryptionStream, Encoding.Default, false).ReadToEnd());
OpenT.Flush();
OpenT.Close();


}
зы. шарп, но под vb переделать не проблем вродь как

_>SubDeviL<_ 15.12.2009 09:31

да, ессесно ключик есть ) пасибки, посмотрю что можно придумать.
только незадача, я в вб плохо понимаю )


Время: 11:38