except для несуществующей таблице

← →
alexmc © (2003-09-12 09:23) [0]

Народ нужна помощ.
Есть база данных в mdb
Как по средсвом обработки исключения определить наличие таблицы.
Напр:
q1.close;
q1.sql.clear;
q1.sql.add("select * from new");
try
q1.open;

except
???? //
end;

В данном случае в базе отсуствует таблица new
и при открытии произойдет ошибка
Как его избежать и продолжить работу приложения
Заранее благодарен

← →
Reindeer Moss Eater © (2003-09-12 09:25) [1]

Приложение умеет работать без таблицы new?

← →
alexmc © (2003-09-18 06:54) [2]

Да Конечно
Просто задача сводиться к обработки исключения прогаммным способом.

← →
alexmc © (2003-09-18 07:59) [3]

Народ проблема решилась Так

function tform1.check_db():boolean;
begin
result:=true;
try
q1.Close;
q1.SQL.Clear;
q1.SQL.Add("select * from new");
q1.open;
except
on EOleException do result:=false;
end;
end;

← →
WihOut Any ... (2003-09-18 07:59) [4]

If Table.Exist then

except для несуществующей таблице Найти похожие ветки