Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

CommandTimeOut - HELP !!! [D5, MSSQL]


AndrewK ©   (2002-03-27 13:47:00) 

Помогите, плз! Запрос выполняется около 25 сек. При использовании ADO вылетает запрос "Conection time out". Ставлю на ADOConnection.CommandTimeout := 900; Ровным счетом ничего не меняется. Запрос как прерывался по таймауту, так и прерывается. Как можно заставить программу подождать еще?

Использую Delphi 5 (Build 5.62) и MS SQL Server 7.0


AndrewK   (2002-03-27 14:32:00) [1]

Разобрался. Спасибо Кулюкину Олегу за решение.

Кому интересно цитирую его ответ на похожий вопрос на форуме:

TADOQuery потомок TCustomADODataSet у которого есть свойство CommandTimeout (но оно приватное). У TADOConnection тоже есть свойство CommandTimeout, но на TADOQuery оно не влияет.

Чтобы избавиться от "Timeout expired" я сделал так:
1. Описал класс, в котором опубликовал свойство CommandTimeout
TMyADODataSet = class(TCustomADODataSet)
public
property CommandTimeout;
end;
2. Присвоил новое значение свойству CommandTimeout компонентов TADOQuery (по умолчанию оно равно 30)
TMyADODataSet(ADOQuery1).CommandTimeout := 60;

3. Вот собственно и все (ну можно еще заняться оптимизацией запросов).

Начинать желательно с третьего пункта.


До третьего пункта пока не добрался, но первые две сработали как надо.

Спасибо.


Fay   (2002-03-27 14:09:00) [2]

:)
Это такой глюкан у TADOConnection!
Можешь хоть 9000 поставить - пофигу!


wicked   (2002-03-27 14:06:00) [3]

а в ADOConnection.ConnectionString что у тебя стоит?....


AndrewK   (2002-03-27 13:53:00) [4]

Sorry, вылетает сообщение "Timeout expired"


Наверх

Титульная страница Поиск, карта сайта Написать письмо