powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Импорт данных
2 сообщений из 2, страница 1 из 1
Импорт данных
    #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
Импорт данных
    #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
2 сообщений из 2, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Импорт данных
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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