ник: час
Великолепно..
тогда это будет выглядеть так... 
первыйэтап
А я бы сделал запросом на добавление и чохом добавил бы все недостающие
второй этап это
соэдать рекордсет объединяющий две таблицы по id_полю
Олег, а как пробежаться по нему сравнивая поля одной записи. Будет быстрее чем скакать по второму рекордсету с помощью Find
вот так?
dim name_field as string
dim raznicaECTb as integer
raznicaECTb =0
Do Until rstHelnok.EOF = True
‘, но вот это место я незнаю как записать
‘надо как-то пробежаться по названию полей
‘сравнить их содержимое на наличие разницы
name_field =rstHelnok.name
If Nz(rstOsnovna!(name_field)) <> Nz(rstHelnok!(name_field) Then raznicaECTb = 1
Loop
|