С Новым годом! Форум программистов, компьютерный форум, киберфорум
PowerShell
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.68/40: Рейтинг темы: голосов - 40, средняя оценка - 4.68
0 / 0 / 0
Регистрация: 20.08.2019
Сообщений: 5
1

Выгрузка c DHCP сервера, Powershell GUI

20.08.2019, 14:48. Показов 7776. Ответов 1

Author24 — интернет-сервис помощи студентам
Нужно произвести выгрузку необходимых данных с DHCP сервера, который вводит пользователь. Все было хорошо ровно до того момента, как я понял, что не могу одновременно добавить IPAddress и SubnetMask. Имеющийся код прилагается.

PowerShell
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
Add-Type -Assembly System.Windows.Forms
Add-Type -Assembly System.Drawing
 
$form = New-Object System.Windows.Forms.Form
$Form.Text = 'Главное меню'
$Form.Width = 700
$form.Height = 600
$form.StartPosition = 'CenterScreen'
$form.Font = New-Object System.Drawing.Font ("OldStyle",10)
 
function DHCPinfo 
{
$ServerName = $TextBox.Text
 
   $checkDHCP = Get-DHCPServerv4Scope -ComputerName $ServerName | select ScopeID, SubnetMasK | 
    ForEach-Object {Get-DHCPServerv4Lease -ScopeId $_.ScopeId -ComputerName $Servername -AllLeases  |
    Select-Object HostName,SubnetMasK,ScopeId,IPAddress,AddressState }
 
$list = New-Object System.collections.ArrayList
$list.AddRange($checkDHCP)
$dataGridView.DataSource = $list
}
 
$dataGridView = New-Object System.Windows.Forms.DataGridView
$dataGridView.Location = New-Object System.Drawing.Size(10,150) 
$dataGridView.Width = 600
$dataGridView.Height = 400
$dataGridView.size = New-Object System.Drawing.Size(600,400) 
$dataGridView.ReadOnly = $true
$dataGridView.ColumnHeadersVisible = $true
 
$form.Controls.Add($dataGridView)
 
$Form.Controls.Add($outputBox) 
 
$label1 = New-Object System.Windows.Forms.Label
$label1.Location = New-Object System.Drawing.Point(20,40)
$label1.AutoSize = $True
$label1.Text = 'Пожалуйста, введите имя DHCP сервера:'
 
$form.Controls.Add($label1)
 
$TextBox = New-Object System.Windows.Forms.TextBox
$TextBox.Location  = New-Object System.Drawing.Point(40,70)
$TextBox.Size = New-Object System.Drawing.Size(200,10)
 
$form.Controls.Add($TextBox)
 
$Button = New-Object System.Windows.Forms.Button 
$Button.Location = New-Object System.Drawing.Size(400,30) 
$Button.Size = New-Object System.Drawing.Size(100,80) 
$Button.Text = "Загрузить" 
$Button.Add_Click({DHCPinfo}) 
 
$Form.Controls.Add($Button) 
 
[void] $Form.ShowDialog()
Мне надо иметь в одной переменной все значения, чтобы после загрузить их в dataGridView. Облазил все, но так и не смог ничего найти
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
20.08.2019, 14:48
Ответы с готовыми решениями:

DHCP vs. PowerShell 2.0
есть Windows Server 2008 r2 x64. есть не совсем маленькая сетка, где надо резервировать порядка 60...

Настройка DHCP сервера
В сети много мануалов по настройке, но я столкнулся с проблемой. Вот цитата: DHCP сервер...

Адрес DHCP-сервера
Всем привет. сколько пересмотрел в документации, везде можно узнать только адрес DNS сервера, а...

Настройка DHCP-сервера
Как настроить DHCP-сервер таким образом, чтобы оба компьютера получали всегда один и тот же адрес?...

1
1886 / 1108 / 428
Регистрация: 22.01.2016
Сообщений: 3,050
20.08.2019, 16:19 2
Лучший ответ Сообщение было отмечено GlossJim как решение

Решение

Цитата Сообщение от GlossJim Посмотреть сообщение
не могу одновременно добавить IPAddress и SubnetMask
Вместо:

Цитата Сообщение от GlossJim Посмотреть сообщение
PowerShell
1
2
3
$checkDHCP = Get-DHCPServerv4Scope -ComputerName $ServerName | select ScopeID, SubnetMasK | 
 ForEach-Object {Get-DHCPServerv4Lease -ScopeId $_.ScopeId -ComputerName $Servername -AllLeases |
 Select-Object HostName,SubnetMasK,ScopeId,IPAddress,AddressState }
Пишете:

PowerShell
1
2
3
$checkDHCP = Get-DHCPServerv4Scope -ComputerName $ServerName | 
    ForEach {$SubnetMasK = $_.SubnetMasK; $_ | Get-DHCPServerv4Lease -AllLeases | 
    Select HostName,@{N='SubnetMasK';E={$SubnetMasK}},ScopeId,IPAddress,AddressState}
1
20.08.2019, 16:19
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
20.08.2019, 16:19
Помогаю со студенческими работами здесь

2 DHCP сервера в 1й сети
Здравствуйте, такая задачка) имеем: сеть из 4х пк: 1. Linux (Fedora) - является сервером 2....

Настройка dhcp сервера в CentOS 7
Добрый день всем. Есть CentOS 7 и на нем поднят DHCP-сервер. Есть IP-телефоны D-Link с MAC:...

Настройка DHCP сервера ipv6
Здравствуйте! Начал изучать Ipv6, всё хорошо, настроил DNS,HTTP сервера, но вот с DHCP вышла...

Настройка простого DHCP сервера
Здравствуйте! Каким образом DHCP решает проблему уникальности назначения адресов?


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru