View Selection И @environment

[nvyush]

qwerty
Попробуйте поиграться с агентом вида:

Sub Initialize
Dim session As New NotesSession
Dim db As NotesDatabase
Dim view As NotesView

If session.NotesVersion < 359 Then
Set db = session.GetDatabase("", "desktop6.ndk")
Else
Set db = session.GetDatabase("", "desktop8.ndk")
End If
Set view = db.GetView(АЛИАС_ПРЕДСТАВЛЕНИЯ)
view.SelectionFormula = ФОРМУЛА_ОТБОРА
End Sub

Представление перед этим должно быть открыто, т.е. должна быть создана приватная версия! Использовать на свой страх и риск.

 

[iosif88]

qwerty
Попробуйте поиграться с агентом вида:
...
Представление перед этим должно быть открыто, т.е. должна быть создана приватная версия! Использовать на свой страх и риск.

Отлично!
Работает как мне и нужно было.
Благодарю за помощь.

 

[iosif88]

Работает как мне и нужно было.

Но поиск насколько я понял при таком раскладе работать не будет

"Cannot perform search on a private view of a server based database"