Определить список активных пользователей с приложением

[miledi]

Привет всем.Проблема в следующем:при открытии приложения(БД) создается карточка с отметкой об открытии базы данных. Когда нормально выходишь из БД, то в карточке отметка проставляется о выходе. если аварийная ситуация(отключили свет и т.д.), то в карточке не отмечается, надо админу проставлять отметку в конкретной карточке, а в других запрещать.Поэтому и надо автоматически выявить выпавший комп. Помогите.

 

[Guest]

Может серверным агентом проверять периодически что происходит с базой и в соотвествии с этим менять значение переменной в карточке?

 

[oshmianski]

Привет всем.Проблема в следующем:при открытии приложения(БД) создается карточка с отметкой об открытии базы данных. Когда нормально выходишь из БД, то в карточке отметка проставляется о выходе. если аварийная ситуация(отключили свет и т.д.), то в карточке не отмечается, надо админу проставлять отметку в конкретной карточке, а в других запрещать.Поэтому и надо автоматически выявить выпавший комп. Помогите.

не совсем понятно смысл задачи (для чего это нужно) => такой вариант

Dim users As Variant
rcmd_server = "ServerName"
rcmd_command = "show users -xml"
Dim Session As New NotesSession


Dim remoteConsole As New RemoteConsole (rcmd_server)

rcmd_result = remoteConsole.Execute (rcmd_command)
'здесь парсишь результат и выбираешь нужных тебе
users=GetUsers(rcmd_result)


результат возвращается в xml формате. чтобы посмотреть, что же таки возвращается, можно в консоли сервака выполнить команду "show users -xml >c:\notes_users.xml"