2 Small. Прости за вопрос, может показаться тебе глупым. Как можно в одном запросе взять данные из таблицы dbf и добавить/изменить в mdb?

Забыл уточнить, необходимо это сделать при помощи TQuery в Делфи

2 Small
Я поступаю аналогично и при этом обработка каких-то 10000 записей идет ну очень не быстро. Просто я в цикле перебирал записи обновляемой таблицы, осуществлял поиск по связующим реквизитам, а затем производил обновление.
код приведен ниже
Ostatki.Open;
Ostatki.First;
While not(Ostatki.Eof) do
begin
Dif.Close;
Dif.Parameters.ParamValues['vsr_kod']:=Ostatki.FieldbyName ('vsr_code').AsString;
Dif.Parameters.ParamValues['pro_code']:=Ostatki.FieldbyName('pro_code').AsString;
Mars_1C.Open;
Mars_1C.RecordCount=0 then
begin
if (Ostatki.FieldByName('current_qnt').AsInteger>0) then
begin
Ostatki.Edit;
Ostatki.FieldByName('current_qnt').AsInteger:=0;
Ostatki.Post;
end;
end;
Ostatki.Next;
end;

// Ostatki - таблица в базе MDB, Dif -запрос к таблице DBF

В код закралась очепятка. Mars_1C= Dif

2SmaLL
Если я правильно понял, ты предлагаешь первоначально SQL- запросом выбрать содержимое обновляемой таблтицы и
Query.First;
while not(Query.Eof) do
begin
//
Передавать значения реквизитов, получать результат запроса и обновлять?
//
Query.Next;
end;
На счет необходимости... Э-х. Надо.

2 Dmitri Krizhanovski. Если я правильно понял, ADOCommand ты подключаешь к MDB базе? А для таблиц DBF ты просто указываешь их месторасположение?

2 Dmitri Krizhanovski.
Спасибо за ADOCommand. Появилась следующая ошибка. Я создаю временную таблицу : ADOCommand.CommandText:='create table Temp (code text,name text,ean text)';
ADOCommand.Execute;
Затем добавляю данные :
ADOCommand.CommandText:='insert into Temp select * from exptov in "С:\Path" "dBase III;"';
Структура таблиц один в один. При ADOCommand.Execute; "Не совпадает число значений запроса и число результирующих полей" . Повторяю - структура dbf и временной таблицы идентична.
Прикол в том, что я несколькими строками выше произвожу аналогичные действия с другой временной таблицей - все прекрасно работает.

2 Dmitri Krizhanovski. Все вопрос решен. Оказывается я перед этим создал таблицу с этим же наименованием, только другой структуры.

Надо будет поискать, где-то в форуме видел удаление таблицы из MDB. Если кто помнит, подскажите где.

Нашел. Просьба снимается.

Помогите пожалуйста разобраться со следующей проблемой :
Работаю с двумя таблицами Table1 и Table2, связываюсь при помощи полей Field1 и Field2.
Query1.Close;
Queri1.SQL.Clear; // Получаю содержимое Table1, понимаю что можно было Query1.SQL.Add('select * from Table1');// работать непосредственно с Table,но
Query1.Open;//сказали что с Query работает быстрее
if Query1.RecordCount>0 then
begin
Query1.First;
while not (Query1.Eof) do
begin
Query2.Close; // **
Query2.ParamByName('kod1').AsString:=Query1.FieldByName('Fied1').AsString;
Query2.ParamByName('kod2').AsString:=Query1.FieldByName('Fied2').AsString;
Query2.Open;
case Query2.RecordCount of
0: ShowMessage('Запись отсутсвует');
1: begin
UpdQuery.Close;
UpdQuery.ParamByName('New_Kod'):=Query2.FieldByName('Fied1').AsString;
UpdQuery.ExecSQL;
end;
2..10:
begin
Query2.First;
UpdQuery.Close;//обновляет поле Field1
UpdQuery.ParamByName('New_Kod'):=Query2.FieldByName('Fied1').AsString;
UpdQuery.ExecSQL;
repeat
Query2.Next;
InsQuery.Close;//Добавляет в Table1 записи с Table2.Field1 и Table2.Field2
InsQuery.ParamByName('Field1').AsString=Query2.FieldByName ('Fied1').AsString;
InsQuery.ParamByName('Field2').AsString=Query2.FieldByName ('Fied2').AsString;
InsQuery.ExecSQL;
until Query2.Eof;
end;
end;
end;

Понимаю, что мой перебор записей таблицы выглядит ... плохо, поэтому помогите реализовать этот код более оптимально
//** Query2 - запрос : Select Table2.* from Table2 where Table2.Field1=:Field1 and Table2.Field2=:Field2;