Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Импорт данных / 2 сообщений из 2, страница 1 из 1
06.10.2003, 17:42
    #32285486
ruslan_r
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Импорт данных
Подскажите. Подскажите. У меня есть 2 таблице. Я из одной таблице все данные импортирую в другую таблицу. Как сделать чтобы если совпадают несколько реквизитов (Фамилия, Имя, Отчество) из одной таблице (1) с другой (2) чтобы заменяла данную ее.
Заранее спасиба.

Try
Table1.Open;
BM.Source:=table1;
BM.Destination:=im_dis;
table2.Open;
BM.Execute;
table1.Close;
table2.Close;

ShowMessage('Импортировано '+IntToStr(BM.MovedCount)+' записей');
except
ShowMessage('Перепишите файл импорта "import.db" и "import.px" в папку "c:\top3\import"');
end;
end;
...
Рейтинг: 0 / 0
07.10.2003, 05:23
    #32285694
dragonx
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Импорт данных
delaesh v 2 etapa:
1. UPDATE TABLE2 where exists in Table1
eto tvoi: если совпадают несколько реквизитов (Фамилия, Имя, Отчество)
из одной таблице (1) с другой (2) чтобы заменяла данную ее
1.1 Esli nado poschitai kolichestvo zapisei
eto tvoi: если совпадают несколько реквизитов (Фамилия, Имя, Отчество)
из одной таблице (1) с другой (2) чтобы заменяла данную ее

2. INSERT INTO TABLE2 SELECT from TABLE1 where not exists
eto tvoi: если совпадают несколько реквизитов (Фамилия, Имя, Отчество)
из одной таблице (1) с другой (2) чтобы заменяла данную ее
2.2 SELCCT COUNT(*) - 1.1 - kolichestvo importirovannix zapisei
...
Рейтинг: 0 / 0
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Импорт данных / 2 сообщений из 2, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]