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

Тема в разделе "Lotus - Программирование", создана пользователем shershun4ik, 16 июл 2009.

Статус темы:
Закрыта.
  1. shershun4ik

    shershun4ik Гость

    очу создать кнопку, вносящую в поле "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
     
  2. wowa

    wowa Well-Known Member

    Регистрация:
    1 фев 2007
    Сообщения:
    842
    Симпатии:
    0
    doc.Department = nr
     
  3. 7hi

    7hi Гость

    Если для текущего, то @UserNamesList
     
  4. NickProstoNick

    NickProstoNick Статус как статус :)

    Регистрация:
    22 авг 2008
    Сообщения:
    1.766
    Симпатии:
    39
    shershun4ik , стесняюсь спросить.... а в контексте какого пользователя? и на сколько я понял notesRegistration.GroupList не дает знаний о текущем пользователе. Этот метод используется для внесения пользователя в определенную(определенные) группы перед регистрацией
     
  5. 7hi

    7hi Гость

    NotesRegistration служит для регистрации пользователя
     
  6. K-Fire

    K-Fire Гость

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

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

    shershun4ik Гость

    Спасибо всем, кто откликнулся проблема решена при помощи @UserNamesList
     
Загрузка...
Статус темы:
Закрыта.

Поделиться этой страницей