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

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

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

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

Как обратиться ко встроенной вьюшке на форме ?

  • Автор темы Sandro
  • Дата начала
S

Sandro

Есть форма, на ней расположена вьюшка отображающая все респонсы документа, на основе полей формы и вьюшки надо создать печатный документ в word.
Не пойму как обратиться ко встроенной вьюхе , что бы считать с неё содержимое
 
S

susinmn

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

А что тебе мешает получить коллекцию документов *на основе полей формы*? и *создать печатный документ в word* на основе тек. документа и выше указанной коллекции :(
 
S

Sandro

А что тебе мешает получить коллекцию документов *на основе полей формы*? и *создать печатный документ в word* на основе тек. документа и выше указанной коллекции :(
Ну в теории понял,а можно примерчик ,а то учусь тока и туговато соображаю (((
 
O

Omh

Взять вложенное view из базы (Set view = db.GetView(EMBEDDED_VIEW_NAME))
Взять коллекцию по ключу, который в твоём случае совпадёт с формулой из ShowSingleCategory.
Обработать коллекцию.
Усё.
 
S

Sandro

Взять вложенное view из базы (Set view = db.GetView(EMBEDDED_VIEW_NAME))
Взять коллекцию по ключу, который в твоём случае совпадёт с формулой из ShowSingleCategory.
Обработать коллекцию.
Усё.
Делаю вот так
Код:
Dim collection As NotesDocumentCollection
Set collection = db.Search("@Responses",Nothing,0)
Messagebox collection.Count,,"!"
If collection.Count>0 Then
Set tdoc=collection.GetFirstDocument	

Do Until tdoc Is Nothing 

Messagebox tdoc.fld_parent(0), ,"!"
Set tdoc=collection.GetNextDocument(tdoc)

Loop		

End If
Ничерта не возвращает (((((
 
S

susinmn

Если у тебя во вью первая колонка @Text($ref), а в ShowSingleCategory @Text(@DocumentUniqueID) тогда


Set collection = doc.Responses, где doc текущий документ. Если ты жмешь кнопку из документа, то doc получаешь, как
Dim ws As New NotesUIWorkspace
Set doc=ws.CurrentDocument.Document
 
L

lotsman

столкнулся с такой же траблой.
Sandro, подскажи чем закончилось.
имеется тоже встроеная вьюха с отобранными дочерними доками, подскажи как решил проблему?
спасибо. если не трудно кинь образчик ;)
 

Cleric-Lviv

Well-known member
03.01.2008
603
0
BIT
0
lotsman

ну посмотрите ви чуть више, уже все написали:rolleyes:
 
Мы в соцсетях:

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