Класс AES для vb

[_>SubDeviL<_]

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

[.ATK]

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<_]

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