Форум: "Начинающим";
Текущий архив: 2005.12.25;
Скачать: [xml.tar.bz2];
ВнизИгнор ошибки!!! Найти похожие ветки
← →
Goast (2005-12-09 18:01) [0]Здравствуйте мастера!!!
Вопрос с Interbase. Каждые 5 мин приходят данные и я их «загоняю» в таблицу….
insert into telephon values (1,1,1,1); но вот проблема иногда приходят не нежные данные и программа выдает ошибку типа «несоответствие данных» и программа подвисает пока я не нажму ок на вылетевшей ошибке….так вот не знаю поняли вы меня или нет…как мне сделать так что бы если sql запрос не выполнился то программа не выдавала бы ошибки а продолжала бы работать дальше (игнорируя эти данные).фуф….вроде все….Пасибо
← →
Johnmen © (2005-12-09 18:03) [1]try
except
end
← →
Goast (2005-12-09 18:19) [2]
> Johnmen © (09.12.05 18:03) [1]
> try
> except
> end
мне всегда было интересно что это значит....так это именно для этого???
и куда мне сам запрос вставлять после try?
← →
MU © (2005-12-09 18:24) [3]try
//здесь все, что угодно .....
except
end;
и почитай help про try except
← →
Vlad © (2005-12-09 18:37) [4]
> Goast (09.12.05 18:19) [2]
> мне всегда было интересно что это значит....так это именно
> для этого???
> и куда мне сам запрос вставлять после try?
в справке по-моему все предельно ясно описано.
Что касается твоего случая, можно сделать что нибудь наподобие такого:var
WasErrors: Boolean;
begin
<цикл>
try
// тут делаем попытку вставки записи
except
// Пишем ошибку в лог-файл (например)
WasError := True;
end;
<конец_цикла>
if WasError then ShowMessage("Выполнено с ошибками, см. лог файл")
← →
Goast (2005-12-09 18:41) [5]
> Vlad © (09.12.05 18:37) [4]
>
> > Goast (09.12.05 18:19) [2]
>
>
> > мне всегда было интересно что это значит....так это именно
>
> > для этого???
> > и куда мне сам запрос вставлять после try?
>
> в справке по-моему все предельно ясно описано.
> Что касается твоего случая, можно сделать что нибудь наподобие
> такого:
>
> var
> WasErrors: Boolean;
> begin
> <цикл>
> try
> // тут делаем попытку вставки записи
> except
> // Пишем ошибку в лог-файл (например)
> WasError := True;
> end;
> <конец_цикла>
> if WasError then ShowMessage("Выполнено с ошибками, см.
> лог файл")
ок пасибо огромное...
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2005.12.25;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.013 c