поле Rich-text и Select по нему

  • Автор темы Oksana
  • Дата начала
O

Oksana

В базе есть несколько полей типа Rich-text, для вложения фалов. Нужно сделать вид и выбрать в него только документы где одно из этих полей (конкретное) не пустое.
Не могу найти средство для этого, есть функции, которые показываеют есть ли вложения в документе в целом, но с конкретным полем работать нельзя.
Какие проверки допустимы для поля с таким типом?
Может в принципе нужно использовать другой подход?
 
S

SINUS

нужен просто агент, который пометит нужные документы, и отображать их в виде
 
O

Oksana

<!--QuoteBegin-SINUS+16:01:2006, 19:07 -->
<span class="vbquote">(SINUS @ 16:01:2006, 19:07 )</span><!--QuoteEBegin-->нужен просто агент, который пометит нужные документы, и отображать их в виде
[snapback]29355" rel="nofollow" target="_blank[/snapback]​
[/quote]

а вот с этого места по-подробнее, пожалуйста, я только начала заниматься разработкой )
 

Medevic

Что это ? :)
Green Team
10.12.2004
3 334
1
BIT
6
Можно создать поле, которое содержит информацию есть ли воджения или нет.
Сами вложения проверять через notesRichTextItem.EmbeddedObjects в QuerySave. И, если есть, то значение поля устанавливать в 1, иначе в 0. А дальше - понятно.
 
O

Oksana

может я что не так объяснила. Например, есть три поля А, В, С, все типа RTF, в любое можно делать вложения. Вот мне нужен вид, в котором можно отобразить только документы имеющие вложение в поле "В". То есть не вообще документы имеющие любые вложения, а вложения в конкретное поле. Если бы можно было проверить просто пустое это поле или нет, не было бы проблем, к такому типу поля эта проверка не применяется, как быть?
 

Medevic

Что это ? :)
Green Team
10.12.2004
3 334
1
BIT
6
Ну а я про что ?
Создаешь поле, например BB.
В PostSave пишешь:
Код:
Sub Postsave(Source As Notesuidocument)
Dim rtitem As NotesRichTextItem
Set rtitem = Source.Document.GetFirstItem("B")
If Isempty(rtitem.EmbeddedObjects) Then Source.Document.BB = "0" Else Source.Document.BB = "1"
Call Source.Document.Save(True, True, True)
End Sub
В представление делаешь отбор по полю BB.
 
O

Oksana

<!--QuoteBegin-Medevic+16:01:2006, 23:25 -->
<span class="vbquote">(Medevic @ 16:01:2006, 23:25 )</span><!--QuoteEBegin-->Ну а я про что ?
Создаешь поле, например BB.
В PostSave пишешь:
Код:
Sub Postsave(Source As Notesuidocument)
Dim rtitem As NotesRichTextItem
Set rtitem = Source.Document.GetFirstItem("B")
If Isempty(rtitem.EmbeddedObjects) Then Source.Document.BB = "0" Else Source.Document.BB = "1"
Call Source.Document.Save(True, True, True)
End Sub
В представление делаешь отбор по полю BB.
[snapback]29372" rel="nofollow" target="_blank[/snapback]​
[/quote]

Спасибо большое, работает как и требовалось. Я с @-функциями немного разобралась, а вот Lotus-Script не знаю совсем, но без него не обойтись, как вижу. Надо где-то чего-то почитать, мне хелпа мало для начала.
 
Мы в соцсетях:

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