Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2006.12.10;
Скачать: [xml.tar.bz2];

Вниз

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

 
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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.082 c
15-1163714053
vasIzmax
2006-11-17 00:54
2006.12.10
Запароленные архивы


2-1164145586
albertinio
2006-11-22 00:46
2006.12.10
Работа с Word.Application


2-1163397990
Lebedev
2006-11-13 09:06
2006.12.10
Событие TmediaPlayer’а по завершению воспроизведения видео.


2-1164276706
Fostr
2006-11-23 13:11
2006.12.10
Syntax Error (Missing operator) in Query expression


4-1154016016
Destroyer
2006-07-27 20:00
2006.12.10
Проблема с получением короткого пути





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский