Хоренькак ето туплю жутко на этом моменте(
вот смотрите открываю одну БД и вторую выбираю местоположение. дальше нужно удалить таблицу из первой БД и вставляю в нее всю таблицу из второй БД.
Код:
procedure TForm1.Button1Click(Sender: TObject);
var Filename,s:string;
begin
adoconnection2.Connected:=true;
adotable2.Open;
OpenDialog1.Execute;
Filename:=opendialog1.FileName;
ADOConnection1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;'+
'Data Source='+filename+';Persist Security Info=False';
ADOConnection1.Connected:=true;
ADOTable1.TableName:='lgotniki';
adotable1.Open;
//Âñòàâêà
adoquery8.SQL.Add('INSERT INTO lgotniki_MFC.lgotniki SELECT *');
adoquery8.SQL.Add('FROM lgotniki_NEW.lgotniki_new ');
adoquery8.Active:=true;