ISecuritySubjectsSearch.AreaIncludeDB

Синтаксис

AreaIncludeDB: Boolean;

Описание

Свойство AreaIncludeDB определяет признак поиска среди субъектов СУБД.

Комментарии

Если свойству установлено значение True, то будет производиться поиск среди субъектов СУБД.

Поиск будет производиться среди пользователей, добавленных в менеджере безопасности, а также среди пользователей, для которых включен признак отложенной загрузки описания.

Пример Fore

Sub UserProc;
Var
    MB: IMetabase;
    Search: ISecuritySubjectsSearch;
    Subjects: ISecuritySubjects;
    Subject: ISecuritySubject;
Begin
    MB := MetabaseClass.Active;
    Search := MB.Security.NewSubjectsSearch;
    Search.NameCriteria := "Ар*";
    Search.SubjectCriteria(SecuritySubjectType.User) := True;
    Search.SubjectCriteria(SecuritySubjectType.Group) := True;
    Search.AreaIncludeDB := True;
    Search.AreaIncludeNT := True;
    Search.ExecuteSearch;
    Subjects := Search.Subjects;
    If Subjects.Count > 0 Then
        For Each Subject In Subjects Do
            Debug.WriteLine(Subject.Name + ": " + Subject.Description);
        End For;
    End If;
End Sub UserProc;

При выполнении примера, будет произведен поиск субъектов безопасности: пользователей и групп, среди доменных субъектов и субъектов СУБД. Наименование и описание найденных субъектов будет выведено в консоль среды разработки.

Пример Fore.NET

Указанная процедура является точкой входа для .NET-сборки.

Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    Search: ISecuritySubjectsSearch;
    Subjects: ISecuritySubjects;
    Subject: ISecuritySubject;
Begin
    MB := Params.Metabase;
    Search := MB.Security.NewSubjectsSearch();
    Search.NameCriteria := "Ар*";
    Search.SubjectCriteria[SecuritySubjectType.sstUser] := True;
    Search.SubjectCriteria[SecuritySubjectType.sstGroup] := True;
    Search.AreaIncludeDB := True;
    Search.AreaIncludeNT := True;
    Search.ExecuteSearch();
    Subjects := Search.Subjects;
    If Subjects.Count > 0 Then
        For Each Subject In Subjects Do
            System.Diagnostics.Debug.WriteLine(Subject.Name + ": " + Subject.Description);
        End For;
    End If;
End Sub;

При выполнении примера, будет произведен поиск субъектов безопасности: пользователей и групп, среди доменных субъектов и субъектов СУБД. Наименование и описание найденных субъектов будет выведено в консоль среды разработки.

См. также:

ISecuritySubjectsSearch