Работа с вьюхами?

[Kron]

Возник ряд вопросов по работе с вьюхами:
1. Как в нескольких выбранных вьюхах (20-30) проставить роль, не заходя в каждую.
2. КАк можно переимновать в десингере выборку вьюх?

 

[Elena Nefedova]

НИКАК. Все возможные операции над несколькими элементами дизайна отображаются в инфобоксе Design Properties, доступном через контекстное меню

 

[morpheus]

роли это я так понимаю - ридерсы (поле $Readers), думаю их можно найти и проставить юзая NotesNoteCollection

насчет имени думаю там же(NotesNote) попробовать, ну или DXL ( вроде как никто не отменял )

 

[Kron]

нет роли это Roles

 

[Omh]

1. +1 к посту Morpheus'a
2. NotesView.Name


Kron
Что такое роли у view?

 

[Kron]

а вероятно проблема в том что у меня руссификатор в окне безопастности свойств пердставления можно указать не только юзера но и роль которая была указана на узера к окне роли при регистрации на дангой базе юзера.

 

[Omh]

Kron
Так это как раз то, о чём говорил Morpheus.
Эти роли (наравне с юзерами) хранятся в документе view в поле "$Readers" (если конечно они выбраны).

 

[Kron]

то есть как я понимаю нужно просто прогонять агента типа
Sub Initialize

Dim Session As New NotesSession
Dim DB As NotesDatabase
Dim DC As NotesDocumentCollection
Dim Doc As NotesDocument
Set DB = Session.CurrentDatabase
Set DC = DB.UnprocessedDocuments

Print "Выбрано документов - " & DC.Count

For i% = 1 To DC.Count
Set Doc = DC.GetNthDocument( i% )
If Not(Doc Is Nothing) Then
Set item = doc.GetFirstItem( "$KeepPrivate" )
If Not(item Is Nothing) Then
Call item.Remove
Call doc.Save( False, True )
End If
End If
Next
Print "OK!!!"
End Sub
Но проводить замену ролей

Но на вьюхах этого нет толкьо на документах!!!

 

[morpheus]

REM Create note collection
Dim nc As NotesNoteCollection
Set nc = db.CreateNoteCollection(False)
Call nc.SelectAllIndexElements(True)
nc.SelectViews = True
Call nc.BuildCollection

в результате из nc можно вытянуть NoteID всех представлений. что даёт нам возможность работать с ними(представлениями) какбы "как" с документами.