26/05/2008 | Елена
Вожможно ли, с копии бд перенести документ в основную бд сохраняя при этом значения всех полей (дата и время создания документа не должны также изменяться, простое Ctrl+C и Ctrl+V -изменяет)?
Ответ :Елена, добрый день!
Можно воспользоваться методом CopyToDatabase объекта NotesDocument в LotusScript.
Дата и время создания сохранятся, все поля будут скопированы, ID документа будет другой.
Например:
Dim s As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Dim db2 As NotesDatabase
Dim dc As NotesDocumentCollection
Set db = s.CurrentDatabase
Set db2 = s.GetDatabase(db.Server,"test2.nsf")
Set dc = db.UnprocessedDocuments
Set doc = dc.GetFirstDocument
Call doc.CopyToDatabase(db2)
-- Взято из раздела Вопросы и ответы --
