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

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

ivashkalotus

#1
Создаю новый документ и хочу его заполнить:
Код:
Sub Click(Source As Button)
Dim session As New NotesSession
Dim view As NotesView
Dim d1 As NotesDocument
Dim db As NotesDatabase
Dim ws As New NotesUIWorkspace

Set db = session.CurrentDatabase
Set d1 = New NotesDocument( db )

Call d1.Save( True, True )

Call ws.EditDocument( True, d1 )
Call ws.ViewRefresh 
End Sub
Если нет в базе дефоултной формы, то созданный документ не хочет открываться.
Сделать какую-нибудь форму дефолтной не проблема, но если я захочу создать документ по другой форме? :)
Помогите, может у документа есть свойство Form, в котором записано какой формой его открывать?
 
G

Guest

#2
Есть свойство Form.
См. в хелпе примеры для класса NotesDocument.
 
I

ivashkalotus

#3
<!--QuoteBegin-Юлия+28:03:2006, 14:58 -->
<span class="vbquote">(Юлия @ 28:03:2006, 14:58 )</span><!--QuoteEBegin-->Есть свойство Form.
[snapback]32652" rel="nofollow" target="_blank[/snapback]​
[/quote]
Странное поле :), среди списка полей документа его нет, по нажатию точки после имени документа выбрать его то же нельзя.
А в примере оно используется :blink:
И все равно у меня не работает, пишу
Код:
Set d1.Form="book"
, предварительно удалив дефолтную форму и мне выдает ошибку.

P.S. Форму назвал правильно: book.
 
G

Guest

#4
Set не нужно. Это для инициализации объектов.
 
I

ivashkalotus

#5
Спасибо, заработало.
А что по поводу:
<!--QuoteBegin-ivashkalotus+28:03:2006, 15:14 -->
<span class="vbquote">(ivashkalotus @ 28:03:2006, 15:14 )</span><!--QuoteEBegin-->Странное поле , среди списка полей документа его нет, по нажатию точки после имени документа выбрать его то же нельзя.
А в примере оно используется 
[snapback]32655" rel="nofollow" target="_blank[/snapback]​
[/quote]
 
Статус
Закрыто для дальнейших ответов.