• 15 апреля стартует «Курс «SQL-injection Master» ©» от команды The Codeby

    За 3 месяца вы пройдете путь от начальных навыков работы с SQL-запросами к базам данных до продвинутых техник. Научитесь находить уязвимости связанные с базами данных, и внедрять произвольный SQL-код в уязвимые приложения.

    На последнюю неделю приходится экзамен, где нужно будет показать свои навыки, взломав ряд уязвимых учебных сайтов, и добыть флаги. Успешно сдавшие экзамен получат сертификат.

    Запись на курс до 25 апреля. Получить промодоступ ...

Getnextdocument

  • Автор темы gmp11
  • Дата начала
G

gmp11

Есть такой вот агент
Код:
		Dim session As New NotesSession
Dim db As NotesDatabase
Dim dc As NotesDocumentCollection
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set dc = db.AllDocuments
Set doc = dc.GetFirstDocument
While Not(doc Is Nothing)
'(ну тут он отчёт формерует)
Set doc = dc.GetNextDocument(doc)
Wend
Документы в представлении отсортированны, и как мне кажется агент должен пробигать их в порядке сортировки, а он работает так как будто я использую не GetFirstDocument\GetNextDocument, а GetNthDocument, тоесть в том порядке в котором документы заносились в базу.
 
O

Omh

Буа-га. :unsure:
Как там адепты христианства говорят? "Когда кажеться крестится надо, а лучше RTFM'ить"...
Смотри NotesViewEntryCollection.
 
G

gmp11

NotesViewEntryCollection Да здравствуют все NotesViewEntryCollection
 
K

kera

не долго занимаюсь лотусом, но насколько знаю, сортированы вьюхи, проще ее брать и идти по ней
вот примерно так:
Dim session As New NotesSession
Dim db As NotesDatabase
Dim view As NotesView
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set view = db.GetView( "твоя вью" )
Set doc = view.GetNextDocument
 
O

Omh

autoupdate лучше выключить перед хождением по view: быстрее будет.
view.autoupdate который...
 

Medevic

Что это ? :)
Green Team
10.12.2004
3 334
1
BIT
4
autoupdate лучше выключить перед хождением по view: быстрее будет.
Да даже не лучше, а обязательно. А то будут некоторые проблемы, если вдруг текущий документ исчезнет из представления, а мы попытаемся взять следующий.
 
G

gmp11

не долго занимаюсь лотусом, но насколько знаю, сортированы вьюхи, проще ее брать и идти по ней
вот примерно так:
Dim session As New NotesSession
Dim db As NotesDatabase
Dim view As NotesView
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set view = db.GetView( "твоя вью" )
Set doc = view.GetNextDocument
Это дело я уже зделал, и всё работает. а вот про autoupdate как то не подумал
 
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!