Статус: Участник
Группы: Участники
Зарегистрирован: 28.10.2009(UTC) Сообщений: 15  Откуда: Москва
|
Новожилова Елена написал:Вы обращаетесь к свойствам объекта CPSigner после проверки подписи? Да, я беру объект Signer как OSigner = OSignedData.Signers.item(1), где OSignedData объект CAdESCOM.CadesSignedData. '
|
|
|
|
|
|
Статус: Сотрудник
Группы: Администраторы, Участники Зарегистрирован: 10.12.2008(UTC) Сообщений: 924  Откуда: Крипто-Про Поблагодарили: 99 раз в 95 постах
|
А какая ошибка при обращении к свойствам объекта Signer?
|
|
|
|
|
|
Статус: Участник
Группы: Участники
Зарегистрирован: 28.10.2009(UTC) Сообщений: 15 Откуда: Москва
|
говорит: OLE:Automation object error. причем при вызове метода :osigner.display отображается информация, в том числе и о времени подписи! Отредактировано пользователем 20 апреля 2010 г. 15:07:04(UTC)
| Причина: Не указана
|
|
|
|
|
|
Статус: Сотрудник
Группы: Администраторы, Участники Зарегистрирован: 10.12.2008(UTC) Сообщений: 924 Откуда: Крипто-Про Поблагодарили: 99 раз в 95 постах
|
BRN написал:говорит: OLE:Automation object error. Это не код ошибки. Вы можете выложить или прислать скомпилированный код, который воспроизводит ошибку, или воспроизвести ее, например, на VBScript и выложить? У нас аналогичный код работает и ошибка не воспроизводится.
|
|
|
|
|
|
Статус: Участник
Группы: Участники
Зарегистрирован: 28.10.2009(UTC) Сообщений: 15 Откуда: Москва
|
Новожилова Елена написал:BRN написал:говорит: OLE:Automation object error. Это не код ошибки. Вы можете выложить или прислать скомпилированный код, который воспроизводит ошибку, или воспроизвести ее, например, на VBScript и выложить? У нас аналогичный код работает и ошибка не воспроизводится. Цитата:
option Explicit
Dim osignedData
dim osettings
dim osigner
dim a
set oSettings = CreateObject("CApicom.Settings")
set oSigner = CreateObject("CadesCom.CPSigner")
osigner.TSAAddress = "http://172.16.0.60/TSP_it/tsp.srf"
oSettings.EnablePromptForCertificateUI=True
Set oSignedData = CreateObject("CadesCom.CadesSignedData")
oSignedData.Content = "TEstoviy pricol"
Dim sSignedData
sSignedData = oSignedData.Signcades(nothing)
A = OsignedData.VerifyCades( sSignedData,1,False)
set oSigner = OSignedData.Signers(1)
msgbox sSignedData
Osigner.display
Msgbox OSignedData.Signers(1).SignatureTimeStampTime
Версия библиотекиCadesCom: 1.2.0391.0 Отредактировано пользователем 21 апреля 2010 г. 14:45:51(UTC)
| Причина: Не указана
|
|
|
|
|
|
Статус: Участник
Группы: Участники
Зарегистрирован: 28.10.2009(UTC) Сообщений: 15 Откуда: Москва
|
Вопрос снимается, При проверке подписи проверялся не расширенный формат подписи, правильный код:93
|
|
|
|
|
|
Статус: Новичок
Группы: Участники
Зарегистрирован: 11.06.2010(UTC)
Сообщений: 5
Откуда: vli-info.ru
|
BRN написал:с помощью CADESCOM, при этом на вызов функции SignCades объекта SignedData Я вообще не вижу такой функции, как SignCades |
|
|
|
|
|
|
Статус: Сотрудник
Группы: Администраторы, Участники Зарегистрирован: 10.12.2008(UTC) Сообщений: 924 Откуда: Крипто-Про Поблагодарили: 99 раз в 95 постах
|
vli-info.ru написал:Я вообще не вижу такой функции, как SignCades Если Вы пишете на C#, то скорее всего Вы используете либо старую версию ЭЦП SDK, либо старый Interop.
|
|
|
|
|
|
Быстрый переход
Вы не можете создавать новые темы в этом форуме.
Вы не можете отвечать в этом форуме.
Вы не можете удалять Ваши сообщения в этом форуме.
Вы не можете редактировать Ваши сообщения в этом форуме.
Вы не можете создавать опросы в этом форуме.
Вы не можете голосовать в этом форуме.
Important Information:
The Форум КриптоПро uses cookies. By continuing to browse this site, you are agreeing to our use of cookies.
More Details
Close
