Форум программистов, компьютерный форум, киберфорум
PowerShell
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.72/47: Рейтинг темы: голосов - 47, средняя оценка - 4.72
222 / 175 / 73
Регистрация: 05.11.2015
Сообщений: 533

Полная инвентаризация компьютеров в домене

31.01.2017, 15:30. Показов 9592. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Подскажите пожалуйста, как на PowerShell создать скрипт для полной инвентаризации компьютеров в домене?
может кто писал уже такое, или у кого завалялся подобный скрипт? буду очень благодарен и признателен за помощь)
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
31.01.2017, 15:30
Ответы с готовыми решениями:

Инвентаризация основных комплектующих всех компьютеров в домене
Люди, всем, привет!!! Я сисадмин, а мой начальник - главный сисадмин - попросил меня написать в PowerShell'е скрипт, дабы снять со всех...

Закрывается explorer сам по себе. У всех компьютеров в домене Active Directory
Добрый день. В локальной сети по какой-то причине начал сам по себе закрываться explorer на всех компьютерах с windows 7 и windows...

Поиск компьютеров в домене
Всем добрый день. Есть ли возможность найти компьютеры в домене,по логину пользователя? Иными словами,есть заявки от пользователей,есть...

1
96 / 17 / 5
Регистрация: 05.07.2015
Сообщений: 53
18.02.2017, 14:14
пользую следующую функцию. Для полной инвентаризации ее не достаточно, но можно доделать.
права конечно должны быть админские.
в не доменной среде не тестировалась.
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
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
################################################
function Get-SystemInfo {
<#
  .SYNOPSIS
  .DESCRIPTION
  .EXAMPLE
  "comp1","comp2","comp3" | ? { Test-Connection $_ -Count 1 -ea SilentlyContinue } | Get-SystemInfo
  #>
 
    [CmdletBinding( SupportsShouldProcess = $true )]
    param (
        [Parameter(ValueFromPipelineByPropertyName=$True,
        ValueFromPipeline=$True)] 
        [string[]]$ComputerName = $env:COMPUTERNAME
 
    )
    begin {
        if ($PSBoundParameters.Verbose) {$VerbosePreference = "Continue"}
        #########################################################################
        function PIDDecoderFromRegistry($digitalProductId) {
 
            New-Variable -Name base24 -Value 'BCDFGHJKMPQRTVWXY2346789'    -Option Constant ## <24> символа использующиеся в ключах продукта Windows и Office
            New-Variable -Name decodeStringLength -Value 24       -Option Constant ## ‘Чистая’ длина зашифрованного ключа продукта
            New-Variable -Name decodeLength -Value 14             -Option Constant ## Длина зашифрованного ключа продукта в байтах (символы хранятся в полубайтах)
            New-Variable -Name decodedKey -Value ([System.String]::Empty)     ## Строка содержащая расшифрованный ключ продукта
            ## Проверка, содержит ли ключ продукта ‘N’ (такое возможно для Windows 8 и Office 15)
            $containsN = ($digitalProductId[$decodeLength] / 8) -bAnd 1        ## ($digitalProductId[$decodeLength] -shr 3) -bAnd 1 ## PS 4.0
            $digitalProductId[$decodeLength] = [System.Byte]($digitalProductId[$decodeLength] -bAnd [System.Convert]::ToByte('F7', 16)) ## 247
            ## Собственно процесс расшифровки
            for ($i = $decodeStringLength; $i -ge 0; $i--) {
                $digitMapIndex = 0
                for ($j = $decodeLength; $j -ge 0; $j--) {
                    $digitMapIndex = $digitMapIndex * 256 -bXor $digitalProductId[$j] ## $digitMapIndex -shl 8 -bXor $digitalProductId[$j] ## PS 4.0
                    $digitalProductId[$j] = [System.Math]::Truncate($digitMapIndex / $base24.Length)
                    $digitMapIndex = $digitMapIndex % $base24.Length
                }
                $decodedKey = $decodedKey.Insert(0, $base24[$digitMapIndex])
            }
            ## Удаление первого символа в ключе и помещение ‘N’ в нужную позицию
            if ([System.Boolean]$containsN)
            {
                $firstLetterIndex = 0
                for ($index = 0; $index -lt $decodeStringLength; $index++) {
                    if ($decodedKey[0] -ne $base24[$index]) {continue}
                    $firstLetterIndex = $index
                    break
                }
                $keyWithN = $decodedKey
                $keyWithN = $keyWithN.Remove(0, 1)
                $keyWithN = $keyWithN.Substring(0, $firstLetterIndex) + 'N' + $keyWithN.Remove(0, $firstLetterIndex)
                $decodedKey = $keyWithN;
            }
            $returnValue = $decodedKey
            ## Вставка тире через каждые пять символов
            for ($t = 20; $t -ge 5; $t -= 5)
            {
                $returnValue = $returnValue.Insert($t, '-')
            }
            return $returnValue
        }
        #########################################################################
        New-Variable -Name hklm -Value 2147483650  -Option Constant
        New-Variable -Name regPath -Value 'Software\Microsoft\Windows NT\CurrentVersion' -Option Constant
        New-Variable -Name regValue -Value 'DigitalProductId' -Option Constant
        ######################################
        $parameters_switch = @{}
        $current_function = get-item (Join-Path function: $MyInvocation.MyCommand);
        $current_function.parameters.values |
        #where { @($_.attributes | % {$_.position}) -eq [int]::MinValue} |       # only custom parameters; только втроенные параметры функций.
        where { $_.SwitchParameter } |                                          # only switchers; только переключатели
        where { $PSBoundParameters.ContainsKey( $_.name)}|
        foreach { $parameters_switch.add($_.name, $PSBoundParameters[$_.Name] ) }
            
    
    
    } process {
        if ($ComputerName.count -gt 1) { $ComputerName |?{$_}|%{$_} | &$current_function.Name @parameters_switch ; return }
        if ($_ -ne $null) {
            if ($_.GetType().fullname -eq "Microsoft.ActiveDirectory.Management.ADComputer") { $ComputerName = $_.Name; }
            if ($_.GetType().fullname -eq "Quest.ActiveRoles.ArsPowerShellSnapIn.Data.ArsComputerObject") { $ComputerName = $_.Name; }
        } 
        if ($PSCmdlet.ShouldProcess($ComputerName, "Get-SystemInfo") ) {
            try {
            
                $CS = gwmi -comp $ComputerName -ea stop win32_computersystem
                $Procc = gwmi -comp $ComputerName -ea stop Win32_Processor
                $os = gwmi -comp $ComputerName -ea stop win32_operatingsystem
                $mb = gwmi win32_baseboard -comp $ComputerName
                $logical_disks = gwmi Win32_LogicalDisk -Filter "DriveType=3" -ComputerName $ComputerName
                $ph_memory = gwmi win32_physicalmemory -comp $ComputerName
            
                $wmi = [WMIClass]"\\$ComputerName\root\default:stdRegProv"
                $binArray = $wmi.GetBinaryValue($hklm,$regPath,$regValue).uValue[52..66]
 
                $ComputerName | select @{n="ComputerName";e={$_}},
                @{n="User";e={$CS | % {$_.username.split("")[1]} }},
                @{n="Memory";e={ $CS | % { $_.TotalPhysicalMemory /1mb -as [int]}} },
                @{n="MemoryDetail";e={
                    @(
                        $ph_memory|
                        group -Property capacity | 
                        foreach {
                            $_.count.ToString() + "*" + [math]::Round($_.name/1mb,0)
                        }
                    ) -join " + "}},
                @{n="ProccName";e={if ($Procc.name) {$Procc.name.trim(" ") -replace "\s{2}"," "} else {""}} },
                @{n="Clock";e={$Procc.MaxClockSpeed }},
                @{n="Core";e={$procc.NumberofCores}},
                @{n="Socket";e={
                    switch -regex ($Procc.SocketDesignation) {
                        "775|j3e1" {"Socket 775"}
                        "478|j2e1" {"Socket 478"}
                        default {$_}
                    }   
                }},
                @{n="OSname";e={$os.caption}},
                @{n="SystemType";e={$CS.SystemType}},
                @{n="OS_SP";e={$os.csdversion}},
                @{n="OSLanguage";e={$os.oslanguage}},
                @{n="OSInstall";e={[Management.ManagementDateTimeConverter]::ToDateTime($os.InstallDate);}},  #2 способ. ([wmi] '').ConvertToDateTime($os.InstallDate)
                @{n='ProductKey';e={  if ($binArray) { PIDDecoderFromRegistry($binArray) } }},
                @{n="MatherBoard";e={$mb.Manufacturer + " " + $mb.Product}},
                @{n="Volumes";e={
                       
                    $logical_disks |
        
                    Select-Object @{n='Letter';e={$_.deviceid}},
                    @{n='VolumeName';e={$_.VolumeName}},
                    @{n='Size';e={ ([math]::round($_.Size/1gb,1)) }},
                    @{n='Free';e={ ([math]::round($_.freespace/1gb,1))}},
                    @{n='Used';e={ ([math]::round(($_.Size-$_.freespace)/1gb,1)) }},
                    @{n="HardDisk";e={
                        gwmi -ComputerName $ComputerName -Query ("Associators of {" + $_.__path + "} Where ResultClass=Win32_DiskPartition") |
                        where {$part = $_; $_ } |
                        foreach {
                            $hd = gwmi -ComputerName $ComputerName -Query ("Associators of {" + $part.__path + "} Where ResultClass=Win32_DiskDrive")
                            $hd.caption + " (" + [math]::Round($hd.size/1gb,0) + " ГБ)"
                        }
                    }};
                }};
            } catch { Write-Error $_; }
        
        }
    
    
    } 
    end {
        
    }
}
##################################################
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
18.02.2017, 14:14
Помогаю со студенческими работами здесь

Отображение учетной записи компьютеров в домене
Задача, есть ряд компьютеров, необходимо знать какой пользователь сидит за &quot;машиной&quot; на момент опроса bat'ника. Для ручной...

Ипользование сокетов: создать свой мониторинг компьютеров в домене
Хочу создать свой мониторинг компьютеров в домене. Алгоритм работы: на компах установлены агенты по сбору инфы(выступают в роли...

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

Управление сервером Hyper-v в домене, из клиента, находящего в другом домене
Доброго времени суток. Ситуация такая. Сама архитектура глупой может быть получилась но так надо, перегуглил уже все что можно но...

Не работает IFrame на русскоязычном домене в домене рф
Кто-нибудь сталкивался с таким что не работает iframe в русскоязычном домене? Уже думаю что только в этом причина, по другому уже не знаю...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Символические и жёсткие ссылки в Linux.
algri14 15.03.2026
Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это дополнительная запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая. . .
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages
DevAlt 07.03.2026
Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
Модульный подход на примере F#
DevAlt 06.03.2026
В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru