ReSQL.ru
     
powered by simpleCommunicator - 2.0.51     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Вывод настроек DHCP сервера
5 сообщений из 5, страница 1 из 1
Вывод настроек DHCP сервера
    #38923958
xBOBeRx
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
xBOBeRx
Гость
Доброго времени суток.
Подскажите пожалуйста можно ли как то получить настройки DHCP сервера при помощи VBS.
Надо вывести на экран настройки DHCP сервера просто для просмотра. Точнее настройки одной скопы (пул адресов, DNSы, IP сервера, количество занятых и свободных IP из пула). Чувствую что это можно сделать через Win32_NetworkAdapterConfiguration, но не пойму как. Помогите пожалуйста, подскажите куда копать.
Заранее спасибо.
...
Рейтинг: 0 / 0
01.04.2015, 15:29
| Ответить | Цитировать | Написать  
Вывод настроек DHCP сервера
    #38924063
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Antonariy
Участник
xBOBeRxЧувствую что это можно сделать через Win32_NetworkAdapterConfigurationНельзя. Само название как бы говорит нам, что это конфигурация сетевого адаптера, которая имеет отношение к конфигурации dhcp-сервера чуть менее чем никакое.

xBOBeRxПомогите пожалуйста, подскажите куда копать. https://msdn.microsoft.com/en-us/library/hh832732(v=vs.85).aspx
...
Рейтинг: 0 / 0
01.04.2015, 16:31
| Ответить | Цитировать | Написать  
Вывод настроек DHCP сервера
    #38924081
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
DHCP-сервис и NetworkAdapter никак не связаны.

Попробуй получить данные через SNMP (есссно на сервере должен быть поднят ответчик), типа

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
dhcpScope = "1.3.6.1.4.1.311.1.3.2"
scopeTable = "1.3.6.1.4.1.311.1.3.2.1"
scopeTableEntry = "1.3.6.1.4.1.311.1.3.2.1.1"
subnetAdd = "1.3.6.1.4.1.311.1.3.2.1.1.1"
noAddInUse = "1.3.6.1.4.1.311.1.3.2.1.1.2"
noAddFree = "1.3.6.1.4.1.311.1.3.2.1.1.3"
noPendingOffers = "1.3.6.1.4.1.311.1.3.2.1.1.4"

strDevice = "10.0.0.1"
strCommunity = "public"

Set objSNMP = CreateObject("OlePrn.OleSNMP")
objSNMP.Open strDevice, strCommunity, 2, 1000
WScript.echo objSNMP.Get(dhcpScope)
WScript.echo objSNMP.Get(scopeTable)
WScript.echo objSNMP.Get(scopeTableEntry)
WScript.echo objSNMP.Get(subnetAdd)
WScript.echo objSNMP.Get(noAddInUse)
WScript.echo objSNMP.Get(noAddFree)
WScript.echo objSNMP.Get(noPendingOffers)
...
Рейтинг: 0 / 0
01.04.2015, 16:46
| Ответить | Цитировать | Написать  
Вывод настроек DHCP сервера
    #38924083
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
Хотя через DhcpServerPsProvider, наверное, всё же попроще будет.
...
Рейтинг: 0 / 0
01.04.2015, 16:48
| Ответить | Цитировать | Написать  
Вывод настроек DHCP сервера
    #38924754
xBOBeRx
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
xBOBeRx
Гость
Я прошу прощения, а нельзя ли немного по подробнее как через DhcpServerPsProvider это реализовать, я недавно начал изучать VBS и не все еще понимаю.
...
Рейтинг: 0 / 0
02.04.2015, 11:44
| Ответить | Цитировать | Написать  
5 сообщений из 5, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Вывод настроек DHCP сервера
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&msg=38924063&tid=2155990]:
 0ms
get settings:
 8ms
get forum list:
 12ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 43ms
get topic data:
 12ms
get forum data:
 3ms
get page messages:
 49ms
get tp. blocked users:
 2ms
others: 12ms
total:  149ms
созд. / загр.: 149ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]