Закрытие Открытого Дока По Таймеру

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

  1. azzza

    azzza Well-Known Member

    Регистрация:
    26 апр 2011
    Сообщения:
    54
    Симпатии:
    0
    Подскажите как реализовать закрытие открытого дока по таймеру.
    Делаю таймер в Postopen запускаю, есть Handle для таймера, но вот как
    сделать само закрытие внутри Handle.

    <div class="sp-wrap"><div class="sp-head-wrap"><div class="sp-head folded clickable">" делаю так ..."</div></div><div class="sp-body"><div class="sp-content">в Declaration
    Dim openTimer As NotesTimer

    в Postopen
    здесь имеем source
    Set openTimer = New NotesTimer(10)
    On Event Alarm From openTimer Call timermsg

    Sub timermsg(Source As NotesTimer)
    ...
    End Sub
     
  2. nvyush

    nvyush Lotus team
    Lotus team

    Регистрация:
    22 апр 2009
    Сообщения:
    2.317
    Симпатии:
    0
    Попробуйте
    в Declaration
    Public meUIDoc As NotesUIDocument

    в PostOpen
    Set meUIDoc = Source

    в timermsg
    meUIDoc.Close

    За квадраты Малевича не отвечаю :please: .

    Добавлено
    Где-то на форуме проскакивала информация, что создание нескольких NotesTimer может завалить Lotus. В Вашей реализации таймеров предполагается по числу открытых документов, что чревато непредсказуемыми последствиями. Также на форуме кем-то предлагалось использовать javascript'овые таймеры, это вроде рабочий вариант. Поищите.
     
  3. morpheus

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

    Регистрация:
    7 авг 2006
    Сообщения:
    3.927
    Симпатии:
    0
    azzza
    а можно полюбопытствовать - зачем?

    з.ы. я бы сделал через диалоговое окно + жаваскрипт самозакрытия
     
  4. nvyush

    nvyush Lotus team
    Lotus team

    Регистрация:
    22 апр 2009
    Сообщения:
    2.317
    Симпатии:
    0
    azzza
    Попробуйте
    в Declaration
    Код (LotusScript):
    Public meUIDoc As NotesUIDocument
    в PostOpen
    Код (LotusScript):
    Set meUIDoc = Source
    в JS Header
    Код (Text):
    function runCloseWindow()
    {
    window.document.forms[0].btnClose.click();
    }
    в onLoad (JavaScript)
    Код (Text):
    window.setTimeout("runCloseWindow();", 5000);
    на форме скрытая кнопка с <HTML> Name = btnClose и кодом
    Код (LotusScript):
    Sub Click(Source As Button)
    meUIDoc.Close
    End Sub
     
Загрузка...
Похожие Темы - Закрытие Открытого Дока
  1. k85
    Ответов:
    12
    Просмотров:
    892
  2. YGol
    Ответов:
    5
    Просмотров:
    1.247
  3. orion
    Ответов:
    8
    Просмотров:
    1.671
  4. hosm
    Ответов:
    2
    Просмотров:
    3.521
  5. lmike
    Ответов:
    11
    Просмотров:
    4.644

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