![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
except для несуществующей таблице [D5, D6]
alexmc © (2003-09-12 09:23:00)
Народ нужна помощ.
Есть база данных в mdb
Как по средсвом обработки исключения определить наличие таблицы.
Напр:
q1.close;
q1.sql.clear;
q1.sql.add("select * from new");
try
q1.open;
except
???? //
end;
В данном случае в базе отсуствует таблица new
и при открытии произойдет ошибка
Как его избежать и продолжить работу приложения
Заранее благодарен
alexmc (2003-09-18 07:59:00) [1]
Народ проблема решилась Так
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:00) [2]
If Table.Exist then
alexmc (2003-09-18 06:54:00) [3]
Да Конечно
Просто задача сводиться к обработки исключения прогаммным способом.
Reindeer Moss Eater (2003-09-12 09:25:00) [4]
Приложение умеет работать без таблицы new?