Всем привет!
Вот такое решение сделал, с одной стороны вроде все красиво, с другой может есть подводные камни?
1. Есть папка shared, desktop private on first use
2. Есть скрытая папка - темплэйт (folder~myWork~tmpl)
3. В папке есть shared action 'Обновить дизайн личной папки'со следующим кодом:
@UpdateViewDesign(@ViewTitle;"(folder~myWork~tmpl)");
@Command([RunAgent];"(folder_rebuild)")
В агенте собственно код
Dim workspace As New NotesUIWorkspace
Call workspace.Viewrebuild()
========================================
Нажимаю на кнопку - дизайн обновляется. Клиент 9-ка
Вот такое решение сделал, с одной стороны вроде все красиво, с другой может есть подводные камни?
1. Есть папка shared, desktop private on first use
2. Есть скрытая папка - темплэйт (folder~myWork~tmpl)
3. В папке есть shared action 'Обновить дизайн личной папки'со следующим кодом:
@UpdateViewDesign(@ViewTitle;"(folder~myWork~tmpl)");
@Command([RunAgent];"(folder_rebuild)")
В агенте собственно код
Dim workspace As New NotesUIWorkspace
Call workspace.Viewrebuild()
========================================
Нажимаю на кнопку - дизайн обновляется. Клиент 9-ка