Сранить поля в формах разныз баз

[dimat]

Всем привет.
Есть шаблон и есть база, в которых формы с одинаковыми именами.
Необходимо получить список полей для каждой формы если поле с данным именем не найдено в шаблоне.
Как это осуществить?

 

[nvyush]

См. классы NotesDatabase.Forms & NotesForm.Fields.

Ну и функция ArrayGetIndex для проверки наличия имени поля в списке полей.

 

[hosm]

еще может понадобиться NotesDatabase.GetForm(formName) - например, для получения формы из БД-шаблона, одноименной с рабочей БД.

 

[dimat]

Forall field In form.Fields
If Arraygetindex(dbform.fields,field)=Null Then
Call dcur.FieldAppendText("log",form.name+Chr(13)+Chr(10)+"	 "+field+Chr(13)+Chr(10))
End If
End Forall

Не срабатывает условие, хотя точно знаю что есть поля в шаблоне, которых нет в бд
может как то не правильно записал?

 

[nvyush]

If Arraygetindex(dbform.fields,field)=Null Then

If IsNull(Arraygetindex(dbform.fields, field)) Then