Главная страница
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.47 MB
Время: 0.075 c
2-1334691033
Новичок
2012-04-17 23:30
2013.03.22
Сканер штрих-кодов


2-1337504907
Глеб
2012-05-20 13:08
2013.03.22
Поиск нужного компонента


2-1328617065
AV
2012-02-07 16:17
2013.03.22
TClientDataSet (TDataset) проапдейтить поле


15-1338216754
leklerk
2012-05-28 18:52
2013.03.22
Когда нужно использовать ООП?


15-1351234770
AV
2012-10-26 10:59
2013.03.22
Легкая пятничная. Не гуглить! :)