Проверка существую ли вложенные файлы в Rt-поле

[Sandro]

Есть RT-поле в котором пользователи выкладывают файлики, мне надо отследить размер этих файликов и в случае изменения сообщить кому нужно . Так вот если файлов нет в поле,

Forall o In rt.EmbeddedObjects
fs=Clng(o.FileSize)+fs
End Forall

Цикл всё равно выполняется, почему то?, выдавая ошибку.

Документ в целом на наличие вложенных доков проверить легко doc.HasEmbedded, а RT- поля ничего подобного не нашёл, как тут быть, подскажите новичку.

 

[hosm]

if not isEmpty(rt.EmbeddedObjects) ' есть вложения в рт-поле

 

[Omh]

Я делаю так

Dim EOs As Variant
EOs = rt.EmbeddedObjects
if Not isempty(EOs) then
'погнал
End if

 

[morpheus]

Sandro
у Вас ключефое слово "файликов", а Эмбетедобджекс != файл

If ( o.Type = EMBED_ATTACHMENT ) Then ...

 

[Sandro]

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

 

[Sandro]

Ну вообщем понятно, спасибо за разъяснения