Форум продуктов IBM Lotus

Общие вопросы => Разработка приложений => Тема начата: Sergey_st85 от 09 Октябрь 2009, 13:00:26

Название: Как кодом открыть окошко с ACL для пользователя?
Отправлено: Sergey_st85 от 09 Октябрь 2009, 13:00:26

Прав предостаточно, просто нужно окно "ACL COntrol" выкинуть.

@Command( [FileDatabaseACL] )

НО.

Надо на ЛС... (

Название: Re: Как кодом открыть окошко с ACL для пользователя?
Отправлено: ViV от 12 Октябрь 2009, 09:30:19

Наверное только выводя через свой интерфейс, используя класс NotesACL.

Название: Re: Как кодом открыть окошко с ACL для пользователя?
Отправлено: Sergey_st85 от 14 Октябрь 2009, 10:39:12

Новая версия решения; за старую мне влепили: открывалась именно ACL базы, из которой кнопка нажималась. Итак.

В базах, ACL которых надо открыть - создал вьюху (ForOpenACL)

В ПОСТопен пишу
@Command([FileDatabaseACL]);
@Command([CloseWindow])

В квери клосе -
   Dim s As New NotesSession
   Dim ws1 As New NotesUIWorkspace
   
   Call ws1.OpenDatabase(s.CurrentDatabase.Server,s.CurrentDatabase.FilePath,"FL")
   Call ws1.CurrentView.Close


Как итог, последняя открытая вьюха в базе - "FL", и именно она откроется при открытии базы пользователем. Без квериклоС будет открываться (ForOpenACL)
, что не являетсая корректным.