Ошибка: Socket Error #11001 или socket error #10051

@prnira_sef · Регистрация: 15.04.2011

Студворк — интернет-сервис помощи студентам

Делаю простую проверку подключен к нету комп или нет

Delphi
1
2
3
4
5
6
7
8
9
10
11
procedure TForm1.Button1Click(Sender: TObject);
  var Connected: Boolean;
begin
 Try
  IdHTTP1.Get('http://www.ya.ru/');
  connected := True;
  Except
 connected := False;
   end;
  if connected=true then label1.Caption:='есть' else label1.Caption:='нету';
end;

когда нет есть то все нормально работает, а если нет то выпрыгивает ошибка socket error #10051 пробовал

Delphi
1
2
3
Application.ProcessMessages;
Sleep(100);
Application.ProcessMessages;

тогда ошибка Socket Error #11001

что не так - помогите - Спасибо!

HighPredator · 13.12.2011, 16:40

По ip пробовали подключиться?

@prnira_sef · 13.12.2011, 16:50 **[ТС]**

теперь socket error #10061 может не провильно ip прописал

Delphi
1
IdHTTP1.Get('77.88.21.3');

?

HighPredator · 13.12.2011, 17:03

Попробуйте отключить брандмауэр/файерволл.

@prnira_sef · 13.12.2011, 17:24 **[ТС]**

с каспером выпригивает socket error #10051 без него socket error #10061

HighPredator · 13.12.2011, 17:33

Не по теме:

Касперский зло.

Ошибка 10051 говорит о том, что сеть недоступна. Бывает, если:
1) сети нет и роутер знает, что сеть не достать
2) проблема в настройке
3) мешает сам роутер или файерволл
На память вроде все.
Ошибка 10061 - ошибка соединения с сервером. Тоже может возникать из-за файервола.

@dtsey · 13.12.2011, 17:41

Delphi
1
2
3
4
5
6
7
8
9
10
uses IdException;
var: s:string;
begin
s:='';
try 
  s:=IdHttp1.Get('http://bla-bla-bla.com');
except on e: Exception do end;
if s<>'' then ShowMessage('OK!') 
else ShowMessage('NOT OK!');
end;

@prnira_sef · 13.12.2011, 18:05 **[ТС]**

Сообщение от dtsey

Delphi
1
2
3
4
5
6
7
8
9
10
uses IdException;
var: s:string;
begin
s:='';
try 
  s:=IdHttp1.Get('http://bla-bla-bla.com');
except on e: Exception do end;
if s<>'' then ShowMessage('OK!') 
else ShowMessage('NOT OK!');
end;

если нет есть то все нормально OK! если нета нет то ошибка socket error #10051

Добавлено через 2 минуты
и только после ошибки выпрыгивает сообщение

NOT OK!

@dtsey · 13.12.2011, 19:00

Вот рабочий, только что проверил.

@dtsey · 13.12.2011, 19:15

Сделал в некрасивом потоке, перепиши, если хочешь.

Добавлено через 1 минуту
Допиши в конце процедуры потока

Delphi
1
endthread(0);

Добавлено через 10 минут
Или даже лучше

Delphi
1
CloseHandle(tr);

Новые блоги и статьи Все статьи Все блоги /
Непрерывная интеграция для пакета Python Mr. Docker 22.06.2025 Было 4 часа утра пятницы, когда я выпустил новую версию нашей внутренней библиотеки для обработки данных. Релиз 0. 5. 2 содержал небольшой фикс для обработки дат в ISO формате, что может пойти не так?. . .	Продвинутый ETL на C# из OLTP БД в хранилище stackOverflow 22.06.2025 Работая в сфере корпоративной аналитики, я постоянно сталкиваюсь с одним и тем же - нужны чистые, структурированные и, главное, свежие данные. Без них современные аналитические системы, машинное. . .	Мастер-класс по микросервисам на Node.js Reangularity 21.06.2025 Node. js стал одной из самых популярных платформ для микросервисной архитектуры не случайно. Его неблокирующая однопоточная модель и событийно-ориентированный подход делают его идеальным для. . .	Управление Arduino из WPF приложения Wired 21.06.2025 Зачем вообще связывать Arduino с WPF-приложением? Казалось бы, у Arduino есть собственная среда разработки, своя экосистема, свои способы управления. Однако при создании серьезных проектов. . .	Звёздная пыль kumehtar 20.06.2025 Я просто это себе представляю: как создавался этот мир. Как энергия слипалась в маленькие частички. Как они собирались в первые звёзды, как во вселенной впервые появился Свет. Как эти звёзды. . .
Создание нейросети с PyTorch AI_Generated 19.06.2025 Ключевое преимущество PyTorch — его питоновская натура. В отличие от TensorFlow, который изначально был построен как статический вычислительный граф, PyTorch предлагает динамический подход. Это. . .	JWT аутентификация в ASP.NET Core UnmanagedCoder 18.06.2025 Разрабатывая веб-приложения, я постоянно сталкиваюсь с дилеммой: как обеспечить надежную аутентификацию пользователей без ущерба для производительности и масштабируемости? Классические подходы на. . .	Краткий курс по С# aaLeXAA 18.06.2025 Здесь вы найдете все необходимые функции чтоб написать програму на C# Задание 1: КЛАСС FORM 1 public partial class Form1 : Form { Spisok listin = new Spisok(); . . .	50 самых полезных примеров кода Python для частых задач py-thonny 17.06.2025 Эффективность работы разработчика часто измеряется не количеством написаных строк, а скоростью решения задач. Готовые сниппеты значительно ускоряют разработку, помогают избежать типичных ошибок и. . .	C# и продвинутые приемы работы с БД stackOverflow 17.06.2025 Каждый . NET разработчик рано или поздно сталкивается с ситуацией, когда привычные методы работы с базами данных превращаются в источник бессонных ночей. Я сам неоднократно попадал в такие ситуации,. . .

HighPredator 6045 / 2160 / 753 Регистрация: 10.12.2010 Сообщений: 6,005 Записей в блоге: 3
	13.12.2011, 16:40
	По ip пробовали подключиться? 1

HighPredator 6045 / 2160 / 753 Регистрация: 10.12.2010 Сообщений: 6,005 Записей в блоге: 3
	13.12.2011, 17:03
	Попробуйте отключить брандмауэр/файерволл. 0

@prnira_sef 0 / 0 / 1 Регистрация: 15.04.2011 Сообщений: 84
	13.12.2011, 17:24 [ТС]
	с каспером выпригивает socket error #10051 без него socket error #10061 0

HighPredator 6045 / 2160 / 753 Регистрация: 10.12.2010 Сообщений: 6,005 Записей в блоге: 3
	13.12.2011, 17:33
	Не по теме: Касперский зло. Ошибка 10051 говорит о том, что сеть недоступна. Бывает, если: 1) сети нет и роутер знает, что сеть не достать 2) проблема в настройке 3) мешает сам роутер или файерволл На память вроде все. Ошибка 10061 - ошибка соединения с сервером. Тоже может возникать из-за файервола. 1