Set Body = Doc.getfirstitem("attach")

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

Статус темы:
Закрыта.
  1. oxystile

    oxystile Гость

    Код (Text):
    Dim body As NotesRichTextItem
    Set body = doc.GetFirstItem("Attach")
    есть поле Attach в документе, но через раз body="", почему и как исправить?
     
  2. morpheus

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

    Регистрация:
    7 авг 2006
    Сообщения:
    3.927
    Симпатии:
    0
    Для: oxystile
    а почему не так как в хэлпе

    Код (Text):
    Dim body As NotesRichTextItem
    Set body = New NotesRichTextItem ( doc, "Attach" )
    да ,и документ сохранён?
     
  3. oxystile

    oxystile Гость

    да, документ сохранен.
    вроде как нашла причину, пока проверяю:

    The compiler raises an error if you try to set the return value of GetFirstItem equal to a NotesRichTextItem object. This is because a NotesItem is not necessarily a NotesRichTextItem, and the compiler has no way of knowing whether the name$ you specify actually corresponds to a rich text item. For example:
    Dim doc As NotesDocument
    Dim rtitem As NotesRichTextItem
    '...set value of doc...
    Set rtitem = doc.GetFirstItem( "Body" )
    'compiler complains
    The solution to this problem is to declare a variant, set it equal to the return value of GetFirstItem, and then treat the variant as a NotesRichTextItem. For example:
    Dim doc As NotesDocument
    Dim rtitem As Variant
    '...set value of doc...
    Set rtitem = doc.GetFirstItem( "Body" )
    If ( rtitem.Type = RICHTEXT ) Then
    '...use NotesRichTextItem methods...
    End If
     
  4. morpheus

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

    Регистрация:
    7 авг 2006
    Сообщения:
    3.927
    Симпатии:
    0
    <!--QuoteBegin-oxystile+18:10:2007, 10:02 -->
    <span class="vbquote">(oxystile @ 18:10:2007, 10:02 )</span><!--QuoteEBegin-->[snapback]82213" rel="nofollow" target="_blank[/snapback]</div>[/quote]
    Ух красавица програмист - администратор ;)
     
  5. Sandr

    Sandr Гость

    Проголосовал ;)
     
  6. oxystile

    oxystile Гость

    спасибо за поддержку:)
     
  7. root

    root Гость

    Для: oxystile
    Я тоже :(. (а какой приз?)
     
  8. Hedg

    Hedg Гость

Загрузка...
Статус темы:
Закрыта.

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