CreateUser(Password: String);
Password. Пароль служебного пользователя.
Метод CreateUser осуществляет создание служебного пользователя в базе данных.
Для СУБД Microsoft SQL Server пароль должен соответствовать требованиям, указанным к сложности пароля.
После создания нового служебного пользователя добавьте его учётные данные на каждом компьютере пользователя с помощью приложения PP.Util.
Для выполнения примера добавьте ссылку на системную сборку Metabase.
Sub UserProc;
Var
MB: IMetabase;
MS: IMetabaseSecurity;
AuditUser: IMetabaseAuditUserInfo;
Lic: Object;
Begin
MB := MetabaseClass.Active;
// Получим лицензию для возможности работы с менеджером безопасности
Lic := MB.RequestLicense(UiLicenseFeatureType.Adm);
MS := MB.Security;
// Получим параметры служебного пользователя
AuditUser := MS.AuditUserInfo;
// Создадим нового служебного пользователя, если зарезервирован служебный пользователь P4AUDIT
If AuditUser.IsReserved Then
AuditUser.Name := "SERVICE_USER";
AuditUser.Scope := AuditUserCredsScope.LocalMachine;
AuditUser.CreateUser("wg5aj4");
End If;
// Сохраним изменения
MS.Apply;
// Освободим лицензию
Lic := Null;
End Sub UserProc;
После выполнения примера будет создан новый служебный пользователь подсистемы безопасности в базе данных, если в репозитории был зарезервирован служебный пользователь P4AUDIT. Учётные данные нового служебного пользователя будут храниться в реестре локальной машины и доступны для использования всем пользователям на компьютере.
См. также: