Тема: Ошибка при Установке подписи на объект
Не могу понять с чем связана ошибка установки подписи на объект.
- Объект один и тот же.
- Пользователь один и тот же.
- Пробовал и под системным администратором.
Используется следующий код:
== Этот РАБОТАЕТ без нареканий.
thisscript.sysadminmodeOn
Set newSign = signs.Create(signSysName)
thisscript.sysadminmodeOff
Set SignDlg = ThisApplication.Dialogs.SetSignDlg
SignDlg.Object = sObj
SignDlg.Sign = newSign
ret_val = SignDlg.Show
== Эти варианты - Выдает ошибку - "Отсутствуют права"
thisscript.sysadminmodeOn
Set newSign = sObj.Signs.Create(signSysName)
newSign.SetSign password, ThisApplication.CurrentUser, Date
или
sObj.SetSign signSysName, password, ThisApplication.CurrentUser, Date
thisscript.sysadminmodeOff
Добавлю - Создание экземпляра подписи выполняется успешно в обоих вариантах.
Не проходит только "активация". Пустая подпись на объекте остается.