[vladst]

Ситуация такая: в коде соединяемся с бд и нормально работаем:
ADOConnection.Open;
Query.SQL.Text := 'select * from ....'
Qurey.ExecSQL;
...
Программа работает круглосуточно, но ночью база останавливается левыми средствами и обновляется из других источников, после чего запускается... Т.е. мое ADOConnection.Open в программе отваливается и выдается exception, после чего прога уже не работает.

Вопрос: Как перехватить эту ошибку и попытаться переконнектить ADOConnection к базе?

[mav_c]

Сообщение от vladst

Ситуация такая: в коде соединяемся с бд и нормально работаем:
ADOConnection.Open;
Query.SQL.Text := 'select * from ....'
Qurey.ExecSQL;
...
Программа работает круглосуточно, но ночью база останавливается левыми средствами и обновляется из других источников, после чего запускается... Т.е. мое ADOConnection.Open в программе отваливается и выдается exception, после чего прога уже не работает.

Вопрос: Как перехватить эту ошибку и попытаться переконнектить ADOConnection к базе?

Напиши функцию TestConnect которая будет выполнять элементарный запрос к БД. Если он не проходит и вываливается exception то лови его и делай Connection.Close(); Connection.Open();
и дёргай эту функцию перед своими запросами к БД.

[vladst]

В том и дело, что все запросы под try т.е. ошибка вываливается не при запросе, а при элементарном простое подключенного коннекта. Запросов нет, а вот ADOConnection.Open все это время...

[mav_c]

Сообщение от vladst

В том и дело, что все запросы под try т.е. ошибка вываливается не при запросе, а при элементарном простое подключенного коннекта. Запросов нет, а вот ADOConnection.Open все это время...

Ну перекрой Application.OnException