Главная страница
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.049 c
2-1164270535
webpauk
2006-11-23 11:28
2006.12.10
как правильно записать следующую конструкцию?


15-1164096145
DelphiLexx
2006-11-21 11:02
2006.12.10
Помогите создать функцию, умеющая красиво сокращать текст


2-1163951013
lobach
2006-11-19 18:43
2006.12.10
Как перейти на следующюю строку текстого файла?


6-1153474419
bobbi
2006-07-21 13:33
2006.12.10
И снова отправка почты ...........


6-1153729806
KyRo
2006-07-24 12:30
2006.12.10
Возникает ошибка при коннекте