Не работает Getdocumentbykey

  • Автор темы rm2005
  • Дата начала
R

rm2005

#1
Добрый день! Необходимо по щелчку на кнопке в справочнике пользователей (ФИО, Лотус-имя) найти человека залогинившегося в базу.
Сделал вид по Лотус именам ("ByNotesName"). В OnClick написал обработчик:
Код:
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
Почему-то никогда не находит. Можь че не так делаю?
 

morpheus

скриптописец
07.08.2006
3 915
1
#2
Для: rm2005
Читаем хэлп и видим
For the getDocumentByKey method to work using a key, you must have at least one column sorted for every key in the vector.
что значит... Вам необходимо сортированная колонка(по который вы ищете - ключ ), желательно первая в Вашем представлении

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

rm2005

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