Создать документ по форме другой БД

[wowa]

Подскажите, пожалуйста...
Как Создать документ по форме другой БД?

 

[morpheus]

Для: wowa

Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set doc = db.CreateDocument
doc.Subject = "New building"
Call doc.Save( True, True )

Вместо Set db = session.CurrentDatabase - привязка к нужной Вам базе

 

[wowa]

Для: Morpheus
листал я этот код и как -то не заострил внимания.
Спасибо , ща проверю

 

[morpheus]

<!--QuoteBegin-wowa+28:08:2007, 09:55 -->
<span class="vbquote">(wowa @ 28:08:2007, 09:55 )</span><!--QuoteEBegin-->ща проверю

[snapback]76553" rel="nofollow" target="_blank[/snapback]​

[/quote]
гы-гы нюню... IBM хэлп проверять....

 

[wowa]

Для: Morpheus
)))
doc.Subject = "New building"
А что оно делает?
Создает документ по форме "New building"

 

[Omh]

Если надо создать док на форме, то сделай
Call doc.ReplaceItemValue("Form", "DESIRED_FORM")
перед сохранением или открытием, что там надо...

 

[wowa]

Для: Omh
пробовал что-то не получается....

Нужно, чтобы создался документ по форме другой БД

 

[Medevic]

Для: wowa
А зачем такое надо?

 

[morpheus]

<!--QuoteBegin-wowa+28:08:2007, 10:19 -->
<span class="vbquote">(wowa @ 28:08:2007, 10:19 )</span><!--QuoteEBegin-->doc.Subject = "New building"
А что оно делает?
Создает документ по форме "New building"

[snapback]76559" rel="nofollow" target="_blank[/snapback]​

[/quote]
Присваивает полю Subject значение "New building"

<!--QuoteBegin-wowa+28:08:2007, 10:30 -->
<span class="vbquote">(wowa @ 28:08:2007, 10:30 )</span><!--QuoteEBegin-->Нужно, чтобы создался документ по форме другой БД

[snapback]76564" rel="nofollow" target="_blank[/snapback]​

[/quote]
Ну так и напишите
doc.Form = "My_Cool_Form"

 

[Omh]

Что-то в этом роде

Dim Db as New NotesDatabase(DESIRED_DB_SERVER, DESIRED_DB_FILEPATH)
Dim NewDoc as NotesDocument
Set NewDoc = db.CreateDocument
Call NewDoc.ReplaceItemValue("Form", DESIRED_FORM)
Call NewDoc.Save(True, False)

 

[wowa]

Для: Omh
все равно что-то не соображаю, создает документ с одним полем, хотя в той форме куча полей

 

[morpheus]

Для: wowa
в свойствах дока посмотрите чему равно поле Form , вот той форме оо и должно быть равно что Вам надо.

косяк может быть из-за того что в базе определена форма по умолчанию

 

[Omh]

Для: wowa
Ну если хочешь, что бы появились поля видимые на форме, то можно после присваивания формы, но перед сохранением сделать ComputeWithForm.
Но я бы не советовал: метод тормознутый, да и вообще, кмк, если разработчик начинает широко использовать ComputeWithForm - нехороший знак для системы <_<