Как можно добраться до содержимого поля если документ еще не сохранен

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

  1. PavelT100

    PavelT100 Well-Known Member

    Регистрация:
    9 июл 2007
    Сообщения:
    105
    Симпатии:
    0
    Lotus Script.
    ...
    Dim ws As New NotesUIWorkspace

    Dim uidoc As NotesUIDocument ' главный документ на клиенте
    Set uidoc = ws.CurrentDocument
    uidoc.EditMode = True
    Call uidoc.GotoField( "BR" )

    Dim doc As NotesDocument ' главный документ на сервере
    Set doc = uidoc.Document

    Dim rti As NotesRichTextItem ' поле BugReferences для временного хранения ссылок
    Set rti = doc.GetFirstItem("BR")
    If rti Is Nothing Then
    Messagebox "Document contains no links",, "No links"
    Exit Sub
    End If
    .....
    В форме в поле "BR" вношу ссылку на какой-то документ, но пока текущий документ не сохранен, вышеприведенный скрипт закончится сообщением "Document contains no links"
    Как можно добраться до содержимого поля если документ еще не сохранен ?
     
  2. morpheus

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

    Регистрация:
    7 авг 2006
    Сообщения:
    3.927
    Симпатии:
    0
    Читайте хэлп про NotesRichTextItem - никак, туту работать можно только с БэкЭнд документом
    Правда есть такой изврат
     
  3. Kee_Keekkenen

    Kee_Keekkenen Well-Known Member

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

    PavelT100 Well-Known Member

    Регистрация:
    9 июл 2007
    Сообщения:
    105
    Симпатии:
    0
    Чтобы rti был не Nothing и можно было написать далее

    Dim rtnav As NotesRichTextNavigator
    Set rtnav = rti.CreateNavigator

    Dim rtlink As NotesRichTextDocLink
    Set rtlink = rtnav.GetFirstElement(RTELEM_TYPE_DOCLINK)

    и т.д.
     
Загрузка...

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