Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.08.18;
Скачать: CL | DM;

Вниз

Удаление из многих таблиц   Найти похожие ветки 

 
Bless   (2003-07-23 10:59) [0]

Нужно удалить из таблиц, у которых есть поле nzo все строки, в которых значение этого поля равно, к примеру 1.
Как это можно сделать, не меняя вручную содержимое системных таблиц?
"


 
Плохиш   (2003-07-23 11:14) [1]

1. В цикле для всех таблиц проверяешь наличие поля. Если есть выполняешь SQL

2. Причём тут системные таблицы?


 
Sergey13 ©   (2003-07-23 11:15) [2]

А при чем тут системные таблицы? Как из одной таблицы удалить знаешь? Если да, то из всех таблиц по порядку и удаляй.


 
Bless   (2003-07-23 15:07) [3]

>При чем тут системные таблицы?

Дико извиняюсь. Забыл исправить предложение...

>В цикле для всех таблиц проверяешь наличие поля. Если есть
>выполняешь SQL

А как организовать цикл для всех таблиц?


 
XanderMan ©   (2003-07-23 15:11) [4]


for i := 0 to componentcount-1 do
if components[i] is TIBDataSet then begin
{здесь ищешь поле}
end


 
Плохиш   (2003-07-23 15:13) [5]

TADOConnection.GetTableNames


 
XanderMan ©   (2003-07-23 15:19) [6]

Опять же, при использовании IB и IBX, у TIBDatabase есть метод GetTableNames, который возвращает именно имена всех таблиц, оттуда можно взять и поля


 
Bless   (2003-07-24 09:24) [7]

Прошу прощения. Системные таблицы, конечно, не причем. Забыл исправить предложение.
>1. В цикле для всех таблиц проверяешь наличие поля. Если есть
>выполняешь SQL

А как организовать цикл?

>Как из одной таблицы удалить знаешь? Если да, то из всех таблиц
>по порядку и удаляй.

Удалять из каждой таблицы по очереди можно. Но не хотелось бы переписывать процедуру, если вдруг появятся новые таблицы (что не исключено), если, конечно, есть такая возможность. То есть нужно удалять из всех таблиц, имя которых находится в результате запроса
select object_name(id) from syscolumns where name="nzo"


 
Bless   (2003-07-24 09:38) [8]

Забыл добавить, что это желательно реализовать внутри хранимой процедуры MS SQL 7.0


 
Bless   (2003-07-24 10:46) [9]

То бишь, не мотодами делфийских компонент, а с помощью T-SQL


 
Andrey007   (2003-07-24 11:12) [10]

DELETE FROM table1 WHERE nzo = 1;
DELETE FROM table2 WHERE nzo = 1;
....
DELETE FROM tableN WHERE nzo = 1;



Страницы: 1 вся ветка

Текущий архив: 2003.08.18;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.007 c
14-58423
NNN
2003-08-02 18:03
2003.08.18
REGISTRACIJA PROGRAMM


14-58406
artgamer
2002-12-12 23:56
2003.08.18
Караул!!! Не могу запустить приложение MCK!!!


14-58421
reticon
2003-08-03 11:01
2003.08.18
Строительство яхты =)


14-58487
II
2003-07-23 15:31
2003.08.18
Как сделат всgлывающее окошко при наведении на ячейку в TDBGridEh


14-58449
Soft
2003-08-01 16:50
2003.08.18
Вам когда-нибудь кошмары снятся?