Константы данной группы применяются для обращения к параметрам компоненты Пользователи. Работать с параметрами можно с помощью свойства IObject.Params.
Параметр |
Описание |
---|---|
DontCheckLoginUse |
Признак проверки использования логинов |
DontShowDialogs |
Признак показа окна генерации пользователя |
DontShowUserGenerationCompleteMessage |
Признак показа окна завершения генерации пользователя |
NewPassword |
Новый пароль текущего пользователя |
SBDeletingUserAuthenticationType |
Тип аутентификации удаляемого пользователя |
SBDeletingUserLogin |
Логин удаляемого пользователя |
SBDeletingDomain |
Домен удаляемого пользователя |
SBDeletingUserName |
Имя удаляемого пользователя |
SBUserID |
ИД удаляемого пользователя |
SBUserFullName |
Полное имя удаляемого пользователя |
SelectedDomainName |
Домен текущего пользователя |
SQLUserName |
Имя пользователя для подключения к SQL-серверу |
SQLUserPassword |
Пароль пользователя для подключения к SQL-серверу |
SBXRecID |
ИД удаляемой записи в компоненте Пользователи |
Пример:
// Имя и полное имя создаваемого пользователя:
UserName = 'User Name'
FullName = 'Full User Name'
UserLogin = 'User_Login'
UserDomain = 'User_Domain'
// Получить ссылку на компоненту "Пользователи"
USERS_COMPONENT: IReference.SYSREF_USERS = CreateReference(SYSREF_USERS)
// Во время работы с компонентой в визуальном режиме при генерации пользователя
// запрашиваются логин и пароль для доступа к SQL Server.
// Установить режим, запрещающий выводить диалоговые окна и задать значения
// необходимых параметров:
USERS_COMPONENT.Params.Add('DontShowDialogs'; TRUE)
USERS_COMPONENT.Params.Add('SQLUserName'; 'sa')
USERS_COMPONENT.Params.Add('SQLUserPassword'; '')
USERS_COMPONENT.Params.Add('DontShowUserGenerationCompleteMessage'; TRUE)
// Поскольку компонента открывается только для добавления новой записи,
// ее нужно открыть пустой:
WhereID = USERS_COMPONENT.AddWhere('0 = 1')
// Добавить нового пользователя
USERS_COMPONENT.Open
USERS_COMPONENT.Insert
USERS_COMPONENT.Requisites(SYSREQ_CODE).Value = UserName
USERS_COMPONENT.Requisites(SYSREQ_NAME).Value = FullName
USERS_COMPONENT.Requisites(SYSREQ_TYPE).Value = 'П'
USERS_COMPONENT.SYSREQ_USERS_STATUS = SYSRES_CONST_USER_STATUS_USER_NAME
USERS_COMPONENT.SYSREQ_USERS_AUTHENTICATION = SYSRES_CONST_AUTH_WINDOWS
USERS_COMPONENT.SYSREQ_USERS_DOMAIN = UserDomain
USERS_COMPONENT.SYSREQ_USERS_LOGIN = UserLogin
USERS_COMPONENT.Save
// Задать представление компоненты и получить ссылку на форму для выбранного
// представления:
USERS_COMPONENT.ViewName = 'Главное'
USERS_COMPONENT_FORM = USERS_COMPONENT.Form
// Сгенерировать пользователя
USERS_COMPONENT_FORM.Actions.FindAction('GenerateUsersAction').Execute
// Закрыть компоненту и удалить ограничения на выборку набора данных:
USERS_COMPONENT.Close
USERS_COMPONENT.DelWhere(WhereID)
© Компания DIRECTUM, 2018 | Сообщество пользователей DIRECTUM |