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

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

No route to host [D7, WinXP]


Den ©   (2010-02-11 10:16:00) 

Здраствуйте ! Помогите решить проблему. Есть приложение, работает по сети. При старте приложения необходимо добавить в сетевую БД (Firebird) некоторые данные. Но перед добавлением необходимо убедится что сервер с БД доступен в сети. Пытаюсь сделать через пинг:

IdIcmpClient1.Host := 10.10.0.100
IdIcmpClient1.Ping();
if IdIcmpClient1.ReceiveTimeout <= 30000 then....
//вставляем запись - сервер доступен


Если выключить сеть то на строке IdIcmpClient1.Ping(); получаю ошибку "No route to host".

Данные вставляются с помощью компонентов FIBPlus. Пытался убрать пинг, и просто тупо пытаться встявлять данные, если сети нет то получаю Access violation на строке pFIBDatabase.Connected := True; что вообщем то понятно...

Может кто подскажет рабочее и грамотное решение данной проблемы


Anatoly Podgoretsky   (2010-02-12 16:40:00) [1]

> Den  (11.02.2010 10:16:00)  [0]

Глупая и не нужная идея. Ну проверил ты, получил ОК, а через миллисекунду получишь облом.


Eraser   (2010-02-11 15:37:00) [2]

> [0] Den   (11.02.10 10:16)

этот компонент для корректной работы требует права админа, лучще использовать другой подход.


Сергей М.   (2010-02-11 15:08:00) [3]


> если сети нет то получаю Access violation на строке pFIBDatabase.
> Connected := True; что вообщем то понятно


С чего бы вдруг "понятно" ?
Мне вот совершенно не понятно откуда вдруг взялось страшное AV по такому смехотворному поводу как отсутствие сети..


YurikGL   (2010-02-11 14:16:00) [4]

try
pFIBDatabase.Connected := True;

except
showmessage('ошибка подключения к базе');
halt;

end


Дмитрий Белькевич   (2010-02-11 12:03:00) [5]

Эпидемия прям.


brother   (2010-02-11 11:40:00) [6]

ща начнется ;)


Наверх

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