7 Страницы<1234>» Перейти на страницу...

Извлечь данные из файла подписи Опции  Отправить тему по почте  Отслеживать эту тему  Распечатать тему  Atom-лента темы  RSS-лента темы » Обычный Дерево

Предыдущая тема Следующая тема

Ruvip		#11 Оставлено : 27 января 2013 г. 16:46:42(UTC)
Статус: Активный участник Группы: Участники Зарегистрирован: 25.01.2013(UTC) Сообщений: 55 Откуда: Москва Сказал(а) «Спасибо»: 1 раз		Есть только файл подписи с расширением p7s Вложение(я): подпись.rar (3kb) загружен 6 раз(а). У Вас нет прав для просмотра или загрузки вложений. Попробуйте зарегистрироваться.
Профиль пользователя Просмотр всех сообщений пользователя Просмотр «Спасибо»

Андрей Писарев		#12 Оставлено : 27 января 2013 г. 16:51:54(UTC)
Статус: Сотрудник Группы: Участники Зарегистрирован: 26.07.2011(UTC) Сообщений: 13,340 Сказал «Спасибо»: 550 раз Поблагодарили: 2212 раз в 1727 постах		Автор: Ruvip Есть только файл подписи с расширением p7s Петров Петр Петрович подписал. Я предложил выше сценарий.
		Техническую поддержку оказываем тут Наша база знаний
		WWW
Профиль пользователя Просмотр всех сообщений пользователя Просмотр «Спасибо»

Ruvip		#13 Оставлено : 27 января 2013 г. 16:53:09(UTC)
Статус: Активный участник Группы: Участники Зарегистрирован: 25.01.2013(UTC) Сообщений: 55 Откуда: Москва Сказал(а) «Спасибо»: 1 раз		:) Спасибо
Профиль пользователя Просмотр всех сообщений пользователя Просмотр «Спасибо»

Андрей Писарев		#14 Оставлено : 27 января 2013 г. 16:56:05(UTC)
Статус: Сотрудник Группы: Участники Зарегистрирован: 26.07.2011(UTC) Сообщений: 13,340 Сказал «Спасибо»: 550 раз Поблагодарили: 2212 раз в 1727 постах		Автор: Ruvip :) Спасибо В выходной должно быть: Спасибо, спасибо. кнопка даже такая есть... до чего техника дошла
		Техническую поддержку оказываем тут Наша база знаний
		WWW
Профиль пользователя Просмотр всех сообщений пользователя Просмотр «Спасибо»

Ruvip		#15 Оставлено : 27 января 2013 г. 17:09:11(UTC)
Статус: Активный участник Группы: Участники Зарегистрирован: 25.01.2013(UTC) Сообщений: 55 Откуда: Москва Сказал(а) «Спасибо»: 1 раз		Set oBinaryStream = CreateObject("ADODB.Stream") oBinaryStream.Open oBinaryStream.Type= 1 oBinaryStream.LoadFromFile(sPath) vStr = oBinaryStream.Read oBinaryStream.Close Set oStore = CreateObject("CAdESCOM.CPEnvelopedData") oStore.Content = vStr Set oSigner = oSignedData.Signers.Item(1) print oKey.Certificate.SubjectName - возникает ошибка, что не так, делаю как в примере
Профиль пользователя Просмотр всех сообщений пользователя Просмотр «Спасибо»

Ruvip		#16 Оставлено : 27 января 2013 г. 17:14:43(UTC)
Статус: Активный участник Группы: Участники Зарегистрирован: 25.01.2013(UTC) Сообщений: 55 Откуда: Москва Сказал(а) «Спасибо»: 1 раз		А благодарность моя безгранична, так как я понимаю, что вы тратите свое личное время на мою проблему.
Профиль пользователя Просмотр всех сообщений пользователя Просмотр «Спасибо»

Андрей Писарев		#17 Оставлено : 27 января 2013 г. 17:16:19(UTC)
Статус: Сотрудник Группы: Участники Зарегистрирован: 26.07.2011(UTC) Сообщений: 13,340 Сказал «Спасибо»: 550 раз Поблагодарили: 2212 раз в 1727 постах		Автор: Ruvip Set oBinaryStream = CreateObject("ADODB.Stream") oBinaryStream.Open oBinaryStream.Type= 1 oBinaryStream.LoadFromFile(sPath) vStr = oBinaryStream.Read oBinaryStream.Close Set oStore = CreateObject("CAdESCOM.CPEnvelopedData") oStore.Content = vStr Set oSigner = oSignedData.Signers.Item(1) print oKey.Certificate.SubjectName - возникает ошибка, что не так, делаю как в примере CPEnvelopedData = это зашифрованные данные, причем здесь они?
		Техническую поддержку оказываем тут Наша база знаний
		WWW
Профиль пользователя Просмотр всех сообщений пользователя Просмотр «Спасибо»

Андрей Писарев		#18 Оставлено : 27 января 2013 г. 17:18:53(UTC)
Статус: Сотрудник Группы: Участники Зарегистрирован: 26.07.2011(UTC) Сообщений: 13,340 Сказал «Спасибо»: 550 раз Поблагодарили: 2212 раз в 1727 постах		Полученные данные (vStr) из файла (oBinaryStream.LoadFromFile(sPath)) передать в приведенную ранее function Verify(sSignedMessage) + и ее немного подкорректировать Отредактировано пользователем 27 января 2013 г. 17:19:37(UTC)  | Причина: имена функций
		Техническую поддержку оказываем тут Наша база знаний
		WWW
Профиль пользователя Просмотр всех сообщений пользователя Просмотр «Спасибо»

Ruvip		#19 Оставлено : 27 января 2013 г. 18:28:07(UTC)
Статус: Активный участник Группы: Участники Зарегистрирован: 25.01.2013(UTC) Сообщений: 55 Откуда: Москва Сказал(а) «Спасибо»: 1 раз		Set oStore = CreateObject("CAdESCOM.CPEnvelopedData") oStore.VerifyCades(vStr, 1) Set oSigner = oStore.Signers.Item(1) - снова валиться ошибка в этом месте
Профиль пользователя Просмотр всех сообщений пользователя Просмотр «Спасибо»

Андрей Писарев		#20 Оставлено : 27 января 2013 г. 19:35:14(UTC)
Статус: Сотрудник Группы: Участники Зарегистрирован: 26.07.2011(UTC) Сообщений: 13,340 Сказал «Спасибо»: 550 раз Поблагодарили: 2212 раз в 1727 постах		Автор: Ruvip Set oStore = CreateObject("CAdESCOM.CPEnvelopedData") oStore.VerifyCades(vStr, 1) Set oSigner = oStore.Signers.Item(1) - снова валиться ошибка в этом месте Вообще ... принято сообщать код и текст ошибки p.s. .Content не заполнил
		Техническую поддержку оказываем тут Наша база знаний
		WWW
Профиль пользователя Просмотр всех сообщений пользователя Просмотр «Спасибо»

RSS Лента  Atom Лента

Пользователи, просматривающие эту тему

Guest (5)

7 Страницы<1234>» Перейти на страницу...