Список сессий в Domino

[sj54]

Подскажите пожалуйста, как программно получить доступ к списку активных сессий в Domino? Интересует такая информация: номер сессии, имя клиента, ip адрес клиента, имя базы.

 

[sundog]

Исходя из того как это происходит в Администраторе, надо на сервере попытаться выполнить команду Show Users -xml > "временный файл", ну и затем распарсить полученный xml.

 

[NickProstoNick]

можно попробовать поковырять вот это

Dim session As New NotesSession
Dim DOMParser As NotesDOMParser
Dim resp As String
Set DOMParser = session.CreateDOMParser
cmd = Chr$(27) & "!show inetusers -xml"
resp = session.SendConsoleCommand("", cmd)
Call DOMParser.Setinput(resp)
Call DOMParser.Process()
Set DOMDocument = DOMParser.Document
Set DOMNodeList = DOMDocument.GetElementsByTagName("userdata")
Dim doc As NotesDocument
Set doc = session.DocumentContext
doc.allcurrentusers = Cstr(DOMNodeList.NumberOfEntries)

правда в коде речь идет о интернет-пользователях

 

[sj54]

Спасибо.
Все получилось через SendConsoleCommand(...., 'show user -xml')