Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме 85 тыс рублей в месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 08.02.2012, 17:22   #1
GROSS777
Пользователь
 
Регистрация: 27.05.2010
Сообщений: 18
По умолчанию Объединить таблицу access и таблицу paradoxa в таблицу access

Есть БД на акцессе и БД на парадоксе, для анализа берутся данные из двух таблиц разных БД. Как объединить данные в одну акцессовскую таблицу с помощью делфи? в какую сторону копать? можно как нибудь сделать чтобы два разных датасета брали данные из этих таблиц и помещали в третий датасет?
GROSS777 вне форума Ответить с цитированием
Старый 09.02.2012, 14:58   #2
silent_lab
Пользователь
 
Регистрация: 16.06.2009
Сообщений: 36
По умолчанию

Таблицы DBF мона тут посмотреть

Код:
procedure TForm1.Button1Click(Sender: TObject);
02	begin
03	  with TADOCommand.Create(nil) do
04	      try
05	        Connection := DataModule.ADOConnection;
06	        CommandText := 'SELECT ' + ChangeFileExt(ExtractFileName(OpenDialog.FileName),'') + '.* INTO Tmp_import FROM '+ ChangeFileExt(ExtractFileName(OpenDialog.FileName),'') + ' IN '+''''+''+ExtractFilePath(OpenDialog.FileName)+''+''''+'[dBase IV;HDR=NO;IMEX=2]';
07	        try
08	          Execute;
09	        except
10	          ShowMessage('Ошибка Импорта таблицы !');
11	        end;
12	      finally
13	       Free;
14	      end;
15	end;
Если *.DB

Код:
ADOTable1.Active := False;
ADOTable1.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\;Extended Properties=Paradox 5.x;';
ADOTable1.TableName := 'MKB_SEX';
ADOTable1.Active := True;

Последний раз редактировалось silent_lab; 09.02.2012 в 16:15.
silent_lab вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме 85 тыс рублей в месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Добавить данные в таблицу Access ара Помощь студентам 19 14.05.2011 18:09
MS Access. Подстановка в таблицу sVasilich Microsoft Office Access 12 03.03.2010 22:35
изменить таблицу access uber Помощь студентам 1 29.01.2010 10:35
Добовление в таблицу access girz БД в Delphi 11 08.06.2009 17:13
Добавить таблицу в MS ACCESS Seqular БД в Delphi 5 21.02.2007 02:14