ОБСУЖДЕНИЕ

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

3 ответов 4,7 тыс.
AI-выжимка обсуждения скоро
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"
Как можно добраться до содержимого поля если документ еще не сохранен ?
 
Читайте хэлп про NotesRichTextItem - никак, туту работать можно только с БэкЭнд документом
Правда есть такой изврат
 
а что имеется ввиду под добраться до содержимого ?
 
а что имеется ввиду под добраться до содержимого ?
Чтобы rti был не Nothing и можно было написать далее

Dim rtnav As NotesRichTextNavigator
Set rtnav = rti.CreateNavigator

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

и т.д.
 

Статистика тем

Создано
PavelT100,
Последний ответ от
PavelT100,
Ответы
3
Просмотры
4 688