Создания нового документа из Lotusscript

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

Статус темы:
Закрыта.
  1. Гость

    Можно ли по данным значением создавать новый документ, т.е переносить значения из PickListStrings для создания нового документа?
     
  2. Omh

    Omh Lotus team
    Lotus team

    Регистрация:
    4 июл 2007
    Сообщения:
    2.210
    Симпатии:
    0
    Код (Text):
    Dim session As New NotesSession
    Dim db As NotesDatabase
    Set db = session.CurrentDatabase

    Set dc = ws.PickListCollection( PICKLIST_CUSTOM, False, db.server, db.Filepath, "ViewName", "Select ", "Please select ")
    if dc.count > 0 then
    Dim SelectedDoc as NotesDocument
    Set SelectedDoc = dc.getFirstDocument

    Dim newDoc as NotesDocument
    Set newDoc = db.CreateDocument
    Call newdoc.ReplaceItemValue("Form", "FORM")
    'тут копируем значения из SelectedDoc в NewDoc
    Call ws.EditDocument(True, Doc) 'ну или Save, смотря что надо
    end if
     
Загрузка...
Статус темы:
Закрыта.

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