Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Работа с сетью в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 01.10.2010, 10:53   #1
ivan_90
 
Регистрация: 01.10.2010
Сообщений: 8
Восклицание Обнаружение сервера

Здравствуйте! Возникла такая серьезная проблема:
Имеется сеть на 2500 компьютеров... В этой сети появился сервер, который раздает IP адреса и портит нашу сеть конфликтом IP адресов. Т.е. этого сервера быть не должно! (Хакер very bad!!!) sorry!
Я написал программу на delphi которая сканирует сеть! И теперь встала такая задача, чтобы послать определенному IP адресу широковещательный запрос с помощью UdpSocket! Сервер, получив запрос, должен отправить ответ (т.е. отослать IP адрес). И в программе я отмечу, какой IP(т.е. IP с сервером), раздает IP! Саму систему работы сети и DHCP я понимаю, но как это реализовать на delphi... Уже просто мозг кипит...
Помогите кто знает!? Я в delphi с сетью мало работал, больше с базами данных и программульками...
Пытался реализовать так, но думаю я не в том направлении...

UdpSocket1.LocalHost:='0.0.0.0'; \\задаем IP нашей сетевой платы
UdpSocket1.LocalPort:='68';
UdpSocket1.RemoteHost:='192.168.1.1 '; \\указываем адрес подключения
UdpSocket1.RemotePort:='67'; \\указываем порт подключения
UdpSocket1.Active:=True; \\подключаемся
UdpSocket1.Sendln('DHCPDISCOVER'); \\посылаем запрос
ListBox1.Items.Add(UdpSocket1.Recei veln); \\вставляем ответ
ivan_90 вне форума Ответить с цитированием
Старый 04.10.2010, 07:56   #2
ivan_90
 
Регистрация: 01.10.2010
Сообщений: 8
По умолчанию

Люди!!! Неужели никто не знает как это сделать?
ivan_90 вне форума Ответить с цитированием
Старый 04.10.2010, 15:30   #3
ivan_90
 
Регистрация: 01.10.2010
Сообщений: 8
По умолчанию

Задача вполне осуществимая! Не понимаю, почему модератор остается равнодушным?!
ivan_90 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Игровые сервера xayam Gamedev - cоздание игр: Unity, OpenGL, DirectX 7 08.06.2010 22:21
Перенос сервера 1С MisterKoK Софт 0 23.11.2009 16:42
Обнаружение картинки в пространстве Altera Свободное общение 7 21.02.2009 20:25
Распознавание(обнаружение) лиц на фотографии Бзик Мультимедиа в Delphi 4 18.02.2009 23:15
обнаружение ошибок makar575 Фриланс 3 18.12.2007 07:56