Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.12.10;
Скачать: CL | DM;

Вниз

Опрос конкретного порта во всей локальной сети !   Найти похожие ветки 

 
312kbps   (2006-11-17 17:38) [0]

Уважаемы профессионалы !
Подскажите как отправить сообщение на порт (на пример 3030) во все компы локальной сетки и получить от них ответ  !?


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

см. UDP broadcast


 
312Kbps   (2006-11-18 13:32) [2]

Дааа, ты всега раскрытые ответы даешь !
Спасибо, профи !


 
Anatoly Podgoretsky ©   (2006-11-18 14:04) [3]

> 312Kbps  (18.11.2006 13:32:02)  [2]

Ты смеешься или плачешь?


 
Вася   (2006-11-18 17:20) [4]


> как отправить сообщение на порт (на пример 3030) во все
> компы локальной сетки



uses Windows, WinSock;
...
var
  sock    : integer;
  i       : integer;
  address : TSockAddrIn;
begin
  Result := 0;
  i      := 1;
  flag   := 1;

  // создаем UDP socket
  sock := socket(PF_INET, SOCK_DGRAM, IPPROTO_UDP);
  if sock = -1 then Exit;

  // настраиваем socket посылать и принимать broadcast
  setsockopt(sock, SOL_SOCKET, SO_BROADCAST, PChar(@i), SizeOf(i));

  // прикрепляем socket к порту
  address.sin_addr.S_addr := INADDR_ANY;
  address.sin_port        := htons(3030);
  address.sin_family      := AF_INET;
  if bind(sock, address, sizeof(address)) = -1 then begin
     CloseSocket(sock);
     Exit;
  end;

  ...


 
Rouse_ ©   (2006-11-18 23:24) [5]


> Дааа, ты всега раскрытые ответы даешь !

Кто тебе сказал что тебе дадут развеонутый ответ? Ты его что, оплатил?  Форум тебе не школа, а возможность получить информацию... Постарайся хотя-бы поиском поискать материал, который обозначил тебе > Сергей М.


 
312Kbps   (2006-11-19 14:54) [6]


> Вася   (18.11.06 17:20) [4]

Спасибо ))) !



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

Текущий архив: 2006.12.10;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.053 c
1-1161991895
Sp1r1t
2006-10-28 03:31
2006.12.10
Скажите плс. Как вывести список установленный программ?


1-1161710150
7D7
2006-10-24 21:15
2006.12.10
Как узнать объем памяти для данных?


4-1153839437
cando
2006-07-25 18:57
2006.12.10
прослушивание линии


2-1163956876
Alians
2006-11-19 20:21
2006.12.10
GetMem для массива


6-1153381513
s_pavell
2006-07-20 11:45
2006.12.10
Аудит принтера в сети