Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Не соединяется [D7, WinXP]

Страницы: < 1 2
Ozone © (2004-03-16 11:51:00)
Использую компоненты Indy (TIdTcpClient, TIdTcpServer).
Клиентом подключаюсь след. образом:

tcpClient.Host := '192.168.41.203' // там стоит серверное приложение
tcpClient.Port := 25;
tcpClient.Connect();

И соответсвенно на сервере

tcpServer.DefaultPort := 25;
tcpServer.Active := true;

Так вот, проблема в следующем: запускаю клиента на своей машине (192.168.40.219) - все работает, потом запускаю на другой (192.168.41.215) - и не коннектиться (хотя ping проходит).

В чем может быть проблема?

Reindeer Moss Eater (2004-03-16 12:24:00) [21]
На самом деле пишет - "Socket Error #10061. Connection refused"

На указанном хосте на указанном порту твоего клиента никто не ждет. нет там никакого сервера.

Ozone (2004-03-16 12:19:00) [22]
TO Reindeer Moss Eater © [9]

Нет он не пустой, он принимает одну строку:

s := AThread.Connection.ReadLn();

А клиентом отсылается так:

tcpClient.Writeln('Test message'); //хотя до сюда все равно не доходит

Reindeer Moss Eater (2004-03-16 12:16:00) [23]
Да нет же, там всего 2 строчки (все остальное пока убрал) :

Стало быть OnExecute у сервера тоже пустой?
Тогда вернись на 192.168.40.219 и убедись, что теперь и там ничего не коннектится

Ozone (2004-03-16 12:16:00) [24]
TO Reindeer Moss Eater © [6]

Это просто для установления факта как такового...
На самом деле пишет - "Socket Error #10061. Connection refused"

Ozone (2004-03-16 12:12:00) [25]
TO Reindeer Moss Eater © [4]

Да нет же, там всего 2 строчки (все остальное пока убрал) :

tcpServer.DefaultPort := 25;
tcpServer.Active := true;

Reindeer Moss Eater (2004-03-16 12:12:00) [26]
except
ShowMessage('Not connection');
end;

Зашибись!
Очень полезная и нужная обработка исключений.
В шпионской школе так учили?
Что бы никто код ошибки не узнал?
Молоток!

Ozone (2004-03-16 12:10:00) [27]
TO Verg © [3]

Вот я и пытаюсь выяснить...
Если писать

try
tcpClient.Connect();
except
ShowMessage('Not connection');
end;

то 2-й машине программа выдает "Not connection" (о чем я и говорил). Но вот почему, я не могу понять.

Reindeer Moss Eater (2004-03-16 12:07:00) [28]
Сервер не принимает клиентов из своей же 41 сети.
Ну так написан.

Verg (2004-03-16 12:05:00) [29]
Опять "угадай мелодию"....
Ошибка в программе. Нет?

Ozone (2004-03-16 12:03:00) [30]
To Reindeer Moss Eater ©

Не-а.

Reindeer Moss Eater (2004-03-16 12:00:00) [31]
Пока идешь к машине 41.215 кто-то стопает твой сервер

Страницы: < 1 2

Наверх

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