Главная страница
    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.041 c
2-1164003387
lobach
2006-11-20 09:16
2006.12.10
ValueListEditor


6-1153229738
avram
2006-07-18 17:35
2006.12.10
сокеты


1-1161929527
Shlomo
2006-10-27 10:12
2006.12.10
Точка входа в проц-у ConvertToGlobalHandle не найден в kernel32


15-1164201013
Тульский
2006-11-22 16:10
2006.12.10
Победить глюк №2328 в Windows 2000 Server (SP3)


15-1163791359
Kolan
2006-11-17 22:22
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
Английский Французский Немецкий Итальянский Португальский Русский Испанский