Как удалить Ole объект из документа на Ibm Os 400

Тема в разделе "Lotus - Программирование", создана пользователем fedotxxl, 18 фев 2008.

  1. fedotxxl

    fedotxxl Well-Known Member

    Регистрация:
    9 ноя 2005
    Сообщения:
    614
    Симпатии:
    0
    В RichText поле просто добавляется файл (через скрепку), документ сохраняется. Я пытаюсь агентом по расписанию удалить аттачи:
    Код (Text):
    Dim objectsList As Variant
    Dim object As NotesEmbeddedObject
    Dim i As Integer
    If docReq.HasEmbedded Then
    objectsList = docReq.EmbeddedObjects

    If Isempty(objectsList) Then
    Print "Документ не имеет встроенных объектов"
    Exit Sub
    End If

    For i = 0 To Ubound(objectsList)
    Set object = objectsList(i)
    Call object.Remove
    Next
    Call docReq.Save(True, True)
    End If
    Интересно, что docReq.HasEmbedded возвращает тру, а objectsList пустой... Как поступить?
     
  2. morpheus

    morpheus скриптописец

    Регистрация:
    7 авг 2006
    Сообщения:
    3.927
    Симпатии:
    0
    Для: fedotxxl
    EmbeddedObjects property

    Example
    Read-only. The OLE/2 and OLE/1 embedded objects in a document.

    Note Embedded objects and object links are not supported for OS/2, UNIX, and the Macintosh. File attachments are.
     
  3. fedotxxl

    fedotxxl Well-Known Member

    Регистрация:
    9 ноя 2005
    Сообщения:
    614
    Симпатии:
    0
    Для: Morpheus
    Спасибо, я не спрашивал почему. Я спрашивал КАК?
    Почему я итак уже догадался (гр*цензура*ный Linux, ни COM'a, ни OLE)
     
  4. morpheus

    morpheus скриптописец

    Регистрация:
    7 авг 2006
    Сообщения:
    3.927
    Симпатии:
    0
    Такой проблемы у меня не было. Первое что приходит в голову

    2 варианта:
    1. Где то на другой машинке с windows стартует агент и перелапачивает в базе всё. Увеличиваеться скорость работы.
    2. Где то на той же лок. машинке. Машинка реплецирует себе базу ( resive only ) . опять же перелопачивает всё что есть ( но уже на локали, что намного быстрее ) и реплецирует базу обратно ( send only )
     
  5. Kee_Keekkenen

    Kee_Keekkenen Well-Known Member

    Регистрация:
    5 сен 2006
    Сообщения:
    616
    Симпатии:
    4
    может просто поле удалить?.
     
Загрузка...

Поделиться этой страницей