Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2013.03.22;
Скачать: CL | DM;

Вниз

No route to host   Найти похожие ветки 

 
Den   (2010-02-11 10:16) [0]

Здраствуйте ! Помогите решить проблему. Есть приложение, работает по сети. При старте приложения необходимо добавить в сетевую БД (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; что вообщем то понятно...

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


 
brother ©   (2010-02-11 11:40) [1]

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


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

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


 
YurikGL ©   (2010-02-11 14:16) [3]

try
pFIBDatabase.Connected := True;

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

end


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


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


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


 
Eraser ©   (2010-02-11 15:37) [5]

> [0] Den   (11.02.10 10:16)

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


 
Anatoly Podgoretsky ©   (2010-02-12 16:40) [6]

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

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



Страницы: 1 вся ветка

Текущий архив: 2013.03.22;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.052 c
15-1347901722
Rouse_
2012-09-17 21:08
2013.03.22
Хе, а я оказывается выиграл лицензию EurekaLog :))


15-1337665496
Василий3005
2012-05-22 09:44
2013.03.22
Как не потерять клиента?


15-1348730620
Jeer
2012-09-27 11:23
2013.03.22
Приподнимая завесу..


15-1339263264
Дмитрий С
2012-06-09 21:34
2013.03.22
Удаленный доступ к компу с маком.


2-1330249957
Pert21
2012-02-26 13:52
2013.03.22
Добавление и удаление свойства в процессе работы программы