Как вывести результаты работы LS на страницу

Тема в разделе "Lotus - Программирование", создана пользователем Guest_lek, 25 янв 2005.

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

    Guest_lek Гость

    Здравствуйте.
    Хочу чтобы при открытии базы на странице была некоторая статистика: число документов, размеры вложений и т.д.
    Создал вычисляемое поле, в нём вывожу:
    имя пользователя: @Name([CN]; @UserName),
    почтовый файл: @Subset(@MailDbName; -1),
    почтовый сервер: @Subset(@MailDbName; 1),
    имя базы данных: @Subset(@DbName; -1)

    На LS получил число документов и их размер:
    Код (Text):
    Sub Onload(Source As Notesuidocument)
    Dim session As New NotesSession
    Dim db As NotesDatabase
    Dim collection As NotesDocumentCollection
    Dim n As Integer
    Set db = session.CurrentDatabase
    Set collection = db.AllDocuments
    n = collection.Count
    Messagebox(n & " documents in database")
    i=0

    Set collection = db.AllDocuments
    Set doc = collection.GetFirstDocument
    While Not(doc Is Nothing)
    i=i+doc.Size
    Set doc = collection.GetNextDocument(doc)
    Wend
    Messagebox("All size of documents: " & i & " bytes")
    End Sub
    Не могу разобраться, как вывести их на странице, а не в MessageBox
     
  2. GROMILA

    GROMILA Well-Known Member

    Регистрация:
    8 апр 2004
    Сообщения:
    297
    Симпатии:
    0
    Боюсь, что для LS-вычислений ты не сможешь использовать возможности страницы, так как там есть только Computed Text, который ограничен формулами.

    Можно использовать вместо страницы форму и хранить отдельный документ со всей логикой вычислений.

    Если нужно совместить отображение Формы+Страница (outline) то прийдется дробить на соответствующие фреймы.

    Может и лучше способ есть, пусть люди скажут.
     
  3. nor

    nor Гость

    вместо страницы используй форму, создай скрытое вычисляемое при создании поле SaveOptions со значением "0".
     
Загрузка...
Статус темы:
Закрыта.

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