1. Акция на весь декабрь! Получай оплату х2 за уникальные статьи, объемом от 200 слов, если в заголовке темы и теле статьи присутствует слово Python
    Скрыть объявление

Не работает Getdocumentbykey

Тема в разделе "Lotus - Программирование", создана пользователем rm2005, 5 дек 2006.

  1. rm2005

    rm2005 Гость

    Добрый день! Необходимо по щелчку на кнопке в справочнике пользователей (ФИО, Лотус-имя) найти человека залогинившегося в базу.
    Сделал вид по Лотус именам ("ByNotesName"). В OnClick написал обработчик:
    Код (Text):
    Sub Click(Source As Button)
    Dim Baza As New NotesDatabase(CurrentServerName, CurrentDataBasePath+"Справочник.nsf")
    Dim CurrentSession As New NotesSession
    Dim view As NotesView
    Dim doc As NotesDocument

    Set view=Baza.GetView("ByNotesName")

    Set doc=view.GetDocumentByKey(CurrentSession.UserName)
    If doc Is Nothing Then Messagebox ("Не найдено")

    End Sub
    Почему-то никогда не находит. Можь че не так делаю?
     
  2. morpheus

    morpheus скриптописец

    Регистрация:
    7 авг 2006
    Сообщения:
    3.927
    Симпатии:
    0
    Для: rm2005
    Читаем хэлп и видим
    что значит... Вам необходимо сортированная колонка(по который вы ищете - ключ ), желательно первая в Вашем представлении

    Да и CurrentSession.UserName - посмотрите что уВас записано там... а что записано в справочнике...
    ведь CurrentSession.UserName вернёт чтото типа "CN=Stew Malone/OU=Editorial/O=Acme." а Вам надо выкавырять тока CN
     
  3. rm2005

    rm2005 Гость

    Блин! Точно! Не стояло свойство Ascending. Спасибо огромное, а то уже 3 дня убил.
     
Загрузка...

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