Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2012.04.08;
Скачать: [xml.tar.bz2];

Вниз

узнать запущен ли веб сервер   Найти похожие ветки 

 
gvozdkoff   (2011-12-20 11:50) [0]

Всем привет.
Суть в следующем.
Есть сервер с белым IP.
С этого сервера я качаю несколько фалов, текстовых, имена файлов не постоянные.
Но до закачки я проверяю. доступен ли сервер по сети
(wininet.InternetCheckConnection)
Но тут получилось так, что сервер доступен, но веб-сервер на нем упал.
Хотелось бы как то опросить , включен ли веб сервер.
пробовал так
IdHttp.Get(ServerName), ругается на ошибку сокета
Подскажите, пожалуйста,  как это лучше бы реализовать


 
Сергей М. ©   (2011-12-20 11:55) [1]

Ф-ция wininet.InternetCheckConnection не имеет ни малейшего отношения к проверке "доступен ли сервер по сети".


> IdHttp.Get(ServerName)
> , ругается на ошибку сокета


try
IdHttp.Get(ServerName)
except
// анализ причин исключения
end;


 
Anatoly Podgoretsky ©   (2011-12-20 12:26) [2]

Она известна - ошибка сокета


 
Медвежонок Пятачок ©   (2011-12-20 12:43) [3]

А зачем узнавать, доступен ли веб-сервер?

Это ты типа опасаешься успешно скачать с него контент, в то время как веб-сервер в дауне?


 
gvozdkoff   (2011-12-20 12:52) [4]


> Медвежонок Пятачок ©   (20.12.11 12:43) [3]
> А зачем узнавать, доступен ли веб-сервер?

ну вобщем это можно и так объяснить )


 
Медвежонок Пятачок ©   (2011-12-20 12:55) [5]

так не бойся.
если сервер в дауне - ты с него не скачаешь ничего.
и даже иногда если он не в дауне, то тоже ничего не скачаешь.


 
gvozdkoff   (2011-12-20 12:56) [6]

получилось у меня следующее

procedure TForm1.Button1Click(Sender: TObject);
var
servername:string;
begin
   memo1.Clear;
   servername:="http://server" ;
 try
  IdHttp1.Get(servername);
  except
  on E: Exception do
   begin
memo1.Lines.Add(E.Message);
   end;
 end;
end;


Если веб-сервер включен. то в мемо пусто, то есть все хорошо. как я понимаю, если же отключаю веб-сервер то в мемо у меня пишется строка

Socket Error # 10054
Connection reset by peer.

Поправьте меня пожалуйста, если мои рассуждения не верны


 
gvozdkoff   (2011-12-20 12:57) [7]


> Медвежонок Пятачок ©   (20.12.11 12:55) [5]
> так не бойся.
> если сервер в дауне - ты с него не скачаешь ничего.
> и даже иногда если он не в дауне, то тоже ничего не скачаешь.
>

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


 
Медвежонок Пятачок ©   (2011-12-20 13:01) [8]

не хотелось бы слышать вопросов а че за ошибка и тд

вопросов не будет только в том случае, если каждое скачивание будет завершаться успехом. Причем независимо от того, работает сервер или нет.

А так вопросы будут.


 
gvozdkoff   (2011-12-20 13:02) [9]


> Медвежонок Пятачок ©   (20.12.11 13:01) [8]
> не хотелось бы слышать вопросов а че за ошибка и тд
>
> вопросов не будет только в том случае, если каждое скачивание
> будет завершаться успехом. Причем независимо от того, работает
> сервер или нет.
>
> А так вопросы будут.

все нармально. едем дальше ))


 
Медвежонок Пятачок ©   (2011-12-20 13:05) [10]

уже приехали.
какие вопросы-то?


 
gvozdkoff   (2011-12-20 13:26) [11]


> Сергей М. ©   (20.12.11 11:55) [1]

спасибо за помощь



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

Форум: "Начинающим";
Текущий архив: 2012.04.08;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.47 MB
Время: 0.004 c
2-1324367435
gvozdkoff
2011-12-20 11:50
2012.04.08
узнать запущен ли веб сервер


6-1254724774
matt_
2009-10-05 10:39
2012.04.08
Wi-Fi и прием данных


8-1222099174
ruf
2008-09-22 19:59
2012.04.08
Использовать свои шрифты


2-1324146298
SQLEX
2011-12-17 22:24
2012.04.08
Почему? Value assigned to ... never used


15-1323234832
Генсек
2011-12-07 09:13
2012.04.08
Законность. Программа использует другую программу.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский