16.05.2005 19:25:23Расшифровка через CAPICOM Ответов: 2
tiinn
Есть у меня сертификат, созданный с пом. CryptoPro. Шифрую на своей машине, расшифровываю - всё ок. Расшифровка на другой машине не получается - пишет
certificate for recipient(s) specified in the EnvelopedData object cannot be found.

Шифрую так:
Store1.Open CAPICOM_CURRENT_USER_STORE, "My"
Set certs = Store1.Certificates
Set certsfnd = certs.Find(CAPICOM_CERTIFICATE_FIND_SUBJECT_NAME, "MySubject")
If certsfnd.Count <> 0 Then
Set cert = certsfnd.Item(1)
End If
envData.Recipients.Add cert
envData.Content = strFrom
strTo = envData.Encrypt

Записываю strTo в файл.

Расшифровываю так (считав зашифрованную строку в strFrom):
envData.Decrypt (strFrom)
strRes = envData.Content

На другой машине сертификат в store из файла загрузил, последующий поиск этот сертификат там находит... А расшифровать не может!
Извиняюсь, что не силён в теории шифрования/дешифрования, но что я делаю не так?
С уважением, tiinn
 
Ответы:
17.05.2005 10:33:26Василий
Для расшифрования требуется закрытый ключ. Поэтому, при установке сертификата в хранилище на другой машине, надо заполнить ссылку на закрытый ключ. Это можно сделать с помощью нашего мастера (КриптоПро CSP 2.0 и выше): Панель управления - КриптоПро CSP - Сервис - Установить личный сертификат
17.05.2005 13:13:59tiinn
Спасибо, помогло