Анализ сети

@M1lleniuM · Регистрация: 21.10.2012

Студворк — интернет-сервис помощи студентам

Здравствуйте. Мне нужно написать программу анализа сети на компьютере. В связи с этим возникло несколько вопросов. Программа по сути простая.
Логика:
Запускается программа, появляется ip адрес компьютера, определяется в какой он подсети, Далее нужно найти совпадение по сети, пинг до шлюза (имеется адрес), пинг до контроллера домена (имеется адрес), найти и сравнить адрес днс, попытаться разрешить доменное имя в IP.

Как определить ip посредством winAPI я знаю, подсеть думаю тоже осилю. Но как найти все остальное, возникают вопросы. Не могли бы вы подсказать? Если можно, как можно проще. Я вам буду очень благодарен.

@TemplarHJK · 25.04.2014, 12:58

Delphi
1
2
gethostname(name, 256);
p := gethostbyname(name);

Не будет работать, если не доступен DNS

Есть такая функция из IPHLPAPI.DLL:
http://msdn.microsoft.com/en-u... S.85).aspx

IMHO WMI использовать удобно, если он только не запрещен политиками безопасности или не нужно максимальное быстродействие.

А вообще да, странный админ все обычно то скриптами скриптами и Exe не нужен, ведь скрипты реально удобнее.

@M1lleniuM · 25.04.2014, 14:20 **[ТС]**

Сообщение от TemplarHJK

Не будет работать, если не доступен DNS

Плохо;(
А нет никаких примеров про WMI на delphi?
Я конечно сам поищу, но может у вас есть под рукой примеры

@mss · 25.04.2014, 14:31

Инструмент

@NiceQ · 18.05.2014, 13:42

Сообщение от M1lleniuM

ip адрес компьютера

Здравствуйте, не знаю может и не в тему, но определить ip адрес компьютера можно еще так:
Кидайте компонент TIdIPWatch из вкладки "Indy Misc", затем компонент который будет отображать IP(к примеру кнопка "Button"). теперь пишите такой текст:

Delphi
1
2
3
4
procedure TForm1.Button1Click(Sender: TObject);
begin
Button1.Caption:=IdIPWatch1.LocalIP;
end;

@mss · 19.05.2014, 09:12

Не по теме:

NiceQ, вот у меня, к примеру, 4 сетевых карты, каждая из которых подключена к отдельной ЛВС, и для каждой из карт назначено 4 IP-адреса. Итого 4 х 4 = 16 адресов.
Вопрос тебе на засыпку - какой из этих адресов покажет IdIPWatch1.LocalIP ?)

Новые блоги и статьи Все статьи Все блоги /
сукцессия 43. Вторая научная статья за месяц- прайминг и гатгил anaschu 25.07.2026 две стороны одной монеты	Более приземисто - Эстафету хвоста в .cdl (деревья эстафеты в сад). Hrethgir 24.07.2026 В будущем, после написания блока инверсии обхода дерева (эстафеты хвоста), я планирую вернуться к нашему прошлому разговору о том, обладают ли знания целеполаганием. Тогда я пришел к выводу, что. . .	Вот представьте что вам дали бессмертие. kumehtar 24.07.2026 Вот представьте что вам дали бессмертие, ничего более не меняя. Вообще ничего, только бессмертие в нынешнем виде. Рады были бы? Что бы вы тут делали всё это время? Никакой пенсии. Никакого нового. . .	сукцессия 41 anaschu 24.07.2026 Численная верификация бифуркации в агентной модели лесной сукцессии: от одного параметра к ансамблю Автор: пользователь @Shumilov_AS \| Раздел: Прикладная математика / Численные методы Кратко. . .
сукцессия 40. Ансамблевая кластерная параметризаци, часть 1. anaschu 24.07.2026 Пр# Сопровождение научной статьи ИИ-ассистентом: подготовка публикации и калибровка агентно-ориентированной модели сукцессии микоризных систем Полевые заметки о двухнедельной совместной работе. . .	Теория всего 12. ВГК на планете в стратегической игре "терра" anaschu 21.07.2026 ### Главные семантические изменения и дешифровка новой физики 1. `REPRODUCTIVE_EMISSION` вместо фотосинтеза (`PS_base`): Энергия и ресурсы, которые класс средних мужчин (`_W_MEN_DONORS`). . .	Публикация отклонённая на хабре. Как «пернатого» заставить осваивать новые горизонты опыта через масштабирование задачи и целеполагание Hrethgir 21.07.2026 https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11948&stc=1&d=1784657928 Привет Хабр. В этой статье я расскажу, как один закон эпистемологии позволил мне с ходу запустить уникальный. . .	Теория всего 11. Основные параметры anaschu 21.07.2026 Дешифровка тензорного ядра Soil Chemistry 2. 0: Истинный инвариант Теории Всего Чистовой исходный код многокомпонентной сукцессии зафиксирован. Модель оперирует единым вектором состояния. . .

@M1lleniuM 25 / 25 / 4 Регистрация: 21.10.2012 Сообщений: 391

	Анализ сети 16.04.2014, 12:39. Показов 3370. Ответов 24 Метки нет (Все метки) Здравствуйте. Мне нужно написать программу анализа сети на компьютере. В связи с этим возникло несколько вопросов. Программа по сути простая. Логика: Запускается программа, появляется ip адрес компьютера, определяется в какой он подсети, Далее нужно найти совпадение по сети, пинг до шлюза (имеется адрес), пинг до контроллера домена (имеется адрес), найти и сравнить адрес днс, попытаться разрешить доменное имя в IP. Как определить ip посредством winAPI я знаю, подсеть думаю тоже осилю. Но как найти все остальное, возникают вопросы. Не могли бы вы подсказать? Если можно, как можно проще. Я вам буду очень благодарен. 0

@mss 3530 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	25.04.2014, 14:31
	Инструмент 0

@mss
	19.05.2014, 09:12
	Не по теме: NiceQ, вот у меня, к примеру, 4 сетевых карты, каждая из которых подключена к отдельной ЛВС, и для каждой из карт назначено 4 IP-адреса. Итого 4 х 4 = 16 адресов. Вопрос тебе на засыпку - какой из этих адресов покажет IdIPWatch1.LocalIP ?) 0