Ключевое слово в защите информации
КЛЮЧЕВОЕ СЛОВО
в защите информации
Получить ГОСТ TLS-сертификат для домена (SSL-сертификат)
Добро пожаловать, Гость! Чтобы использовать все возможности Вход или Регистрация.

Уведомление

Icon
Error

Опции
К последнему сообщению К первому непрочитанному
Offline MrSource  
#1 Оставлено : 1 марта 2023 г. 12:29:27(UTC)
MrSource

Статус: Новичок

Группы: Участники
Зарегистрирован: 01.03.2023(UTC)
Сообщений: 4

Сказал(а) «Спасибо»: 1 раз
Приветствую. Прошу помощи.
Задача: получить срока действия лицензии КриптоПро CSP 4.0.9944 с помощью библиотеки cplicmgmt.dll на Autoit.
На форуме нашёл >>>
Код:
Dim obj: Set obj = CreateObject("CPCSPLicense.CPCSPLicense")
MsgBox obj.GetExpireDate("") & " " & obj.GetType()


Пишу >>>
Код:
Local $obj, $oObjects
$obj = ObjCreate("CPCSPLicense.CPCSPLicense")
If Not @error Then
    MsgBox(0, "CSP", $obj.GetExpireDate(''))
Else
    MsgBox(4096, "Тест ObjCreat", "Не удалось открыть объект. Код ошибки: " & Hex(@error, 8))
EndIf


Ошибка >>>
MsgBox(0, "GUI", $obj^ ERROR

Прошу помочь разобраться.
oleview

Отредактировано пользователем 1 марта 2023 г. 12:30:38(UTC)  | Причина: Не указана

Offline TolikTipaTut1  
#2 Оставлено : 1 марта 2023 г. 14:47:52(UTC)
TolikTipaTut1

Статус: Активный участник

Группы: Участники
Зарегистрирован: 05.07.2018(UTC)
Сообщений: 467

Сказал(а) «Спасибо»: 43 раз
Поблагодарили: 69 раз в 61 постах
Код:
Local $obj, $oObjects, $date
$obj = ObjCreate("CPCSPLicense.CPCSPLicense")
$date = $obj.GetExpireDate("{407E5BA7-6406-40BF-A4DC-3654B8F584C1}")
If Not @error Then
    MsgBox(0, "CSP", $date)
Else
    MsgBox(4096, "Тест ObjCreat", "Не удалось открыть объект. Код ошибки: " & Hex(@error, 8))
EndIf


{50F91F80-D397-437C-B0C8-62128DE3B55E} - ProductCode КриптоПро CSP 5.0 (см. тут)
{407E5BA7-6406-40BF-A4DC-3654B8F584C1} - по идее ProductCode КриптоПро CSP 4.0 (см. тут и тут)

Отредактировано пользователем 1 марта 2023 г. 16:04:02(UTC)  | Причина: Не указана

thanks 1 пользователь поблагодарил TolikTipaTut1 за этот пост.
MrSource оставлено 01.03.2023(UTC)
Offline MrSource  
#3 Оставлено : 2 марта 2023 г. 7:20:58(UTC)
MrSource

Статус: Новичок

Группы: Участники
Зарегистрирован: 01.03.2023(UTC)
Сообщений: 4

Сказал(а) «Спасибо»: 1 раз
Автор: TolikTipaTut1 Перейти к цитате

{50F91F80-D397-437C-B0C8-62128DE3B55E} - ProductCode КриптоПро CSP 5.0 (см. тут)
{407E5BA7-6406-40BF-A4DC-3654B8F584C1} - по идее ProductCode КриптоПро CSP 4.0 (см. тут и тут)


Слёзы на моих глазах брат. Спасибо!
RSS Лента  Atom Лента
Пользователи, просматривающие эту тему
Guest
Быстрый переход  
Вы не можете создавать новые темы в этом форуме.
Вы не можете отвечать в этом форуме.
Вы не можете удалять Ваши сообщения в этом форуме.
Вы не можете редактировать Ваши сообщения в этом форуме.
Вы не можете создавать опросы в этом форуме.
Вы не можете голосовать в этом форуме.