1. Набираем команду codeby webinar. Набираем команду для организации и проведения вебинаров. Подробнее ...

    Скрыть объявление
  2. Требуются разработчики и тестеры для проекта codebyOS. Требования для участия в проекте: Знание принципов работы ОС на базе Linux; Знание Bash; Крайне желательное знание CPP, Python, Lua; Навыки системного администрирования. Подробнее ...

    Скрыть объявление
  3. Получи 30.000 рублей. Для получения денег необходимо принять участие в конкурсе авторов codeby. С условиями и призами можно ознакомиться на этой странице ...

    Внимание! Регистрация авторов на конкурс закрыта.

    Скрыть объявление

View.getselecteddocument

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

  1. Гость

    Репутация:
    0
    Очень, очень нужна команда как - view.GetSelectedDocument. Может кто знает, как выташить выделенные документы из View?
     
  2. Sandr

    Sandr Гость

    Репутация:
    0
    db.unprocesseddocuments :)
     
  3. Гость

    Репутация:
    0
    Да но жалко что потом у документа пусто значение ColumsValues :(
     
  4. Sandr

    Sandr Гость

    Репутация:
    0
    Денис Кириченко
    Вам энтри нужен или документ? Я чего-то не понимаю...

    Берете вышеуказанным методом получаете выделленные дкоументы. Потом из той вьюхи получаете коллекцию энтрисов. В колллекции энтрисов обрабатываете только те энтрисы, которые попали в коллекцию докуметов полученную способом db.unprocesseddocuments . Прямого метода получить выделеные энтрисы, вроде бы, нет.
     
  5. Гость

    Репутация:
    0
    Когда я беру документы из view:
    Код:
    	
    Set uiview = workspace.CurrentView
    Set view = uiview.View
    Set doc = view.GetFirstDocument	
    Do While Not doc Is Nothing		
    Print # tmpdatafilenumber%, |<tr>|
    Forall c In doc.ColumnValues
    то у меня доступно значение колонок записи, а вот когда через UnprocessedDocuments, нет :)

    Код:
    Set collection = db.UnprocessedDocuments
    Set doc = collection.GetFirstDocument()
    Do While Not doc Is Nothing
    Print # tmpdatafilenumber%, |<tr>|	
    Forall c In doc.ColumnValues[code]
     
  6. Medevic

    Medevic Что это ? :)
    Lotus team

    Репутация:
    0
    Регистрация:
    10 дек 2004
    Сообщения:
    3.346
    Симпатии:
    2
    А если так коллекцию получить?
    Set collection = uiview.Documents
     
  7. Гость

    Репутация:
    0
    Способ достаточно корявый и долгий, но у меня получилось так:
    Код:
    Set uiview = workspace.CurrentView
    Set view = uiview.View
    Set collection = uiview.Documents
    
    Dim docView As NotesDocument
    Dim docSel As NotesDocument
    
    Set docView = view.GetFirstDocument()
    Set docSel = collection.GetFirstDocument()
    
    Do While Not docView Is Nothing And Not docSel Is Nothing
    If docSel.UniversalID=docView.UniversalID Then
     
Загрузка...

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