Как узнать номер порта по IP?

[muravey]

Хочу сделать клиент сервер! Проблема возникла:IP адресс сервера я знаю и IP адресс компа к которому хочу подключиться, но нужно узнать значение порта сервера! Как это можно сделать, пишу вот по такому FAQu:
procedure tform1.button1click(sender: tobject);
var
mystream: tmemorystream;
begin
mystream := tmemorystream.create; // Создание класса
nmstrm1.port := 6711; // Значение порта получателя
nmstrm1.timeout := 3000; // Задержка при подключении (timeout)
nmstrm1.host := '127.0.0.1'; // ip-Адресс получателя
nmstrm1.fromname := 'Клиент'; // Имя отправителя
mystream.loadfromfile('c:\autoexec. bat'); // Файл для отправки
nmstrm1.postit(mystream); // Отправка данных
mystream.free; // Освобождение памяти
end;
procedure tform1.nmstrmserv1msg(sender: tcomponent; const sfrom: string;
strm: tstream);
var
mystream: tmemorystream;
begin
mystream := tmemorystream.create;
mystream.copyfrom(strm, nmstrmserv1.bytestotal); // Извлекаем файл
mystream.savetofile('d:\autoexec.ba t'); // Сохраняем полученный файл
end;

[Квэнди]

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

Хочу сделать клиент сервер! Проблема возникла:IP адресс сервера я знаю и IP адресс компа к которому хочу подключиться, но нужно узнать значение порта сервера! Как это можно сделать, пишу вот по такому FAQu:
procedure tform1.button1click(sender: tobject);
var
mystream: tmemorystream;
begin
mystream := tmemorystream.create; // Создание класса
nmstrm1.port := 6711; // Значение порта получателя
nmstrm1.timeout := 3000; // Задержка при подключении (timeout)
nmstrm1.host := '127.0.0.1'; // ip-Адресс получателя
nmstrm1.fromname := 'Клиент'; // Имя отправителя
mystream.loadfromfile('c:\autoexec. bat'); // Файл для отправки
nmstrm1.postit(mystream); // Отправка данных
mystream.free; // Освобождение памяти
end;
procedure tform1.nmstrmserv1msg(sender: tcomponent; const sfrom: string;
strm: tstream);
var
mystream: tmemorystream;
begin
mystream := tmemorystream.create;
mystream.copyfrom(strm, nmstrmserv1.bytestotal); // Извлекаем файл
mystream.savetofile('d:\autoexec.ba t'); // Сохраняем полученный файл
end;

Ерунду какую- то написали...

IP адресс сервера я знаю и IP адресс компа к которому хочу подключиться хм... они разные ?
Порт узнать можете только снифом, который прирежет любой мало мальски уважающий себя файрвол

[muravey]

Сообщение от Квэнди

Ерунду какую- то написали...
Порт узнать можете только снифом, который прирежет любой мало мальски уважающий себя файрвол

Что такое Сніф.... і как вообще можно узнать порт????

[Квэнди]

так, тогда начнем издалека, что такое порт в вашем аспекте ?

[muravey]

Буквально пару минут назад прочитал статью про порты--- понял, что я морозил,Ip адресс сервера Ip адрес компьютера разные, Квенди спасибо за то что направил на правильный путь!

[zetrix]

Ещё поправка: сервер и компьютер куда вы хотите подключиться - это одно и тоже

Сервер - то, к чему подключаемся.
Клиент - то, что подключается к чему-то.