IMetabase.GetConnectedUsers

Синтаксис

GetConnectedUsers: IConnectedUsersInfo;

Описание

Метод GetConnectedUsers позволяет получить информацию о пользователях, подключенных к репозиторию.

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

Пример

Sub Main;

Var

MB: IMetabase;

Users: IConnectedUsersInfo;

User: IConnectedUserInfo;

Begin

MB := MetabaseClass.Active;

Users := MB.GetConnectedUsers;

For Each User In Users Do

Debug.WriteLine("Станция: " + User.HostName + "; MAC-адрес: " + User.NETAddress);

Debug.WriteLine("Пользователь СУБД: " + User.UserDbName + "; Пользователь ОС: " + User.UserOsName);

End For;

End Sub Main;

После выполнения примера в консоль среды разработки будет выведена информация по всем пользователям, подключенным к текущему репозиторию.

См. также:

IMetabase