S
SkinGreek
Всем добрый вечер.
Сново столкнулся с непонятной проблемой.
В Document manager есть нечто подобие событий и возможность их обработки. Я пытаюсь обработать событие QueryAddToBinder(ddoc As DocDocument, BinderID As String, Continue As Integer).
Казалось бы задача проста, BinderID передается, метод GetBinderById существует у объекта библиотеки, в общем проблем не ожидается... как и обычно и бывает)) Но лотус оказался хитрее и вывел сообщение о не найденной подшивке в данном коде.
после часа мучений всеж решился вывести всю библиотеку
и оказалось что binder.id на самом деле равен cabinet.id & BinderID. то есть binder.id == cabinet.id & BinderID
где BinderID - передаваемый параметр в обработчик события QueryAddToBinder
Как определить нормальный BinderID который необходимо для GetBinderById я не нашел потому и прошу помощи
попытался посмотреть полный BinderID через DocDocument.ParentBinderID, но как и ожидалось он вернул мне 0(событие всеж Query)
как в примере хелпа предполагают текущую секцию (Cabinet) мне не нравится, ибо по Title определять cabinet.id, мне кажеться слишком сурово (не уверен, но предполагаю что Title у секции не уникален)
Собственно вот, суть проблемы изложил.надеюсь не сильно запутанно:$
Есть у кого идеи как бороться с этим совершенно неожиданной проблемой?
Сново столкнулся с непонятной проблемой.
В Document manager есть нечто подобие событий и возможность их обработки. Я пытаюсь обработать событие QueryAddToBinder(ddoc As DocDocument, BinderID As String, Continue As Integer).
Казалось бы задача проста, BinderID передается, метод GetBinderById существует у объекта библиотеки, в общем проблем не ожидается... как и обычно и бывает)) Но лотус оказался хитрее и вывел сообщение о не найденной подшивке в данном коде.
Код:
Set theCurrentBinder = theLibrary.GetBinderById(BinderID)
Код:
For i =0 To theLibrary.Cabinets.Count
Set cabinet = theLibrary.Cabinets.ItemByIndex(i)
Print "cabinet: ID=" & cabinet.id & " Title=" & cabinet.Title & " index=" & i
For j =0 To cabinet.Binders.Count-1
Dim binder As Variant
Set binder = theLibrary.Cabinets.ItemByIndex(i).Binders.ItemByIndex(j)
Print " binder: ID=" & binder.id & " Title=" & binder.Title
Next
Next
где BinderID - передаваемый параметр в обработчик события QueryAddToBinder
Как определить нормальный BinderID который необходимо для GetBinderById я не нашел потому и прошу помощи
попытался посмотреть полный BinderID через DocDocument.ParentBinderID, но как и ожидалось он вернул мне 0(событие всеж Query)
как в примере хелпа предполагают текущую секцию (Cabinet) мне не нравится, ибо по Title определять cabinet.id, мне кажеться слишком сурово (не уверен, но предполагаю что Title у секции не уникален)
Собственно вот, суть проблемы изложил.надеюсь не сильно запутанно:$
Есть у кого идеи как бороться с этим совершенно неожиданной проблемой?