Я получаю файл с двумя зашифрованными полями по алгоритму SHA1, необходимо их дешифровать. Подскажите пожалуйста пример

есть пример
ole_Crypt.CryptAlgorithm = "aes" //Алгоритм шифровавния
ole_Crypt.CipherMode = "cbc" //Режим шифрования
ole_Crypt.KeyLength = 256 //Длина ключа
ole_Crypt.PaddingScheme = 0
ole_Crypt.EncodingMode = 'Base64' //Режим кодирования
ole_Crypt.SetEncodedIV("...","hex") //Установим вектор инициализации
ole_Crypt.SetEncodedKey("...","hex") //Секретный ключ
str_decrypt = iole_Crypt.DecryptStringENC(str_decoded) //Дешифровка
ole_Crypt.disconnectobject( )

как его можно переделать под sha1 подскажите пожалуйста

Спасибо большое