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

  • Автор темы -
  • Дата начала
Статус
Закрыто для дальнейших ответов.

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

Omh

Well-Known Member
Lotus team
04.07.2007
2 210
1
37
Латвиджа, Рига
#2
Код:
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
 
Статус
Закрыто для дальнейших ответов.