Получение списка групп для пользователя

  • Автор темы shershun4ik
  • Дата начала
Статус
Закрыто для дальнейших ответов.
S

shershun4ik

#1
очу создать кнопку, вносящую в поле "Department" список групп в которых состоит пользователь.

[codebox]Sub Click(Source As Button)

Dim ws As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Set uidoc = ws.currentDocument
Dim doc As NotesDocument
Set doc = uidoc.Document
Set notesRegistration = New NotesRegistration
Dim nr As Variant
nr = notesRegistration.GroupList
Set doc.Department = nr

End Sub[/codebox]

В дебагере он показывает, что в свойствах NotesRegistration есть поле GroupList, но оно пустое (точнее несуществует). При попытке присвоить его значение в nr, nr остается пустым (несуществующим). А при присвоении doc.Department значения nr выдает Type mismatch.

Где я неправ?

Писал на основе примера из книги по программированию в Lotus R5
 

NickProstoNick

Статус как статус :)
Lotus team
22.08.2008
1 803
21
#4
shershun4ik , стесняюсь спросить.... а в контексте какого пользователя? и на сколько я понял notesRegistration.GroupList не дает знаний о текущем пользователе. Этот метод используется для внесения пользователя в определенную(определенные) группы перед регистрацией
 
7
#5
NotesRegistration служит для регистрации пользователя
 
K

K-Fire

#6
Скачайте себе .Domino Framework.
http://www.openntf.org/Projects/pmt.nsf/1a...33;OpenDocument

Там в 99% случаев можно найти нужную функцию для себя. Либо переиспользовать 1 к 1, либо модифицировать под себя. Ну или на крайний случай подчерпнуть идею как что сделать.
 
S

shershun4ik

#7
Спасибо всем, кто откликнулся проблема решена при помощи @UserNamesList
 
Статус
Закрыто для дальнейших ответов.