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

  • Автор темы Kron
  • Дата начала
K

Kron

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

Elena Nefedova

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

morpheus

скриптописец
07.08.2006
3 915
1
34
Украина, Киев
#3
роли это я так понимаю - ридерсы (поле $Readers), думаю их можно найти и проставить юзая NotesNoteCollection

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

Kron

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

Omh

Well-Known Member
Lotus team
04.07.2007
2 210
1
37
Латвиджа, Рига
#7
Kron
Так это как раз то, о чём говорил Morpheus.
Эти роли (наравне с юзерами) хранятся в документе view в поле "$Readers" (если конечно они выбраны).
 
K

Kron

Гость
#8
то есть как я понимаю нужно просто прогонять агента типа
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

скриптописец
07.08.2006
3 915
1
34
Украина, Киев
#9
Код:
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 всех представлений. что даёт нам возможность работать с ними(представлениями) какбы "как" с документами.