Сценарій, який я маю тут, записує потрібну інформацію. Однак я помітив, що кожен новий дійсний запис замінює останній. Я не можу зрозуміти, чому. Так що в кінцевому підсумку я отримую лише 1 запис, навіть якщо виявлено 1000 комп'ютерів. Будь ласка, допоможіть мені зрозуміти це.
$computers = Get-ADComputer -SearchBase "DC=some,DC=web,DC=com" -Filter * | Select-Object -ExpandProperty Name
foreach ($computer in $computers){
if(!(Test-Connection -CN $computer -BufferSize 16 -Count 1 -ea 0 -quiet))
{write-host "Cannot reach $computer offline." -f red}
else {
$outtbl = @()
Try{
$sr=Get-WmiObject -Class Win32_BIOS -ComputerName $computer -ErrorAction Continue
$Xr=Get-WmiObject -Class Win32_Processor -ComputerName $computer -ErrorAction Continue
$ld=Get-ADComputer $computer -Properties * -ErrorAction Continue
$r="{0} GB" -f ((Get-WmiObject Win32_PhysicalMemory -ComputerName $computer |Measure-Object Capacity -Sum).Sum / 1GB)
$x = gwmi win32_computersystem -ComputerName $computer |select @{Name = "Type";Expression = {if (($_.pcsystemtype -eq '2') )
{'Laptop'} Else {'Desktop Or Other something else.'}}},Manufacturer,@{Name = "Model";Expression = {if (($_.model -eq "$null") ) {'Virtual'} Else {$_.model}}},username -ErrorAction Continue
$t= New-Object PSObject -Property @{
ServiceTag = $sr.serialnumber
ComputerName = $ld.name
IPV4Address=$ld.ipv4Address
Enabled=$ld.Enabled
Description=$ld.description
OU=$ld.DistinguishedName.split(',')[1].split('=')[1]
Type = $x.type
Manufacturer=$x.Manufacturer
Model=$x.Model
RAM=$R
ProcessorName=($xr.name | Out-String).Trim()
NumberOfCores=($xr.NumberOfCores | Out-String).Trim()
NumberOfLogicalProcessors=($xr.NumberOfLogicalProcessors | Out-String).Trim()
AddressWidth=($xr.Addresswidth | Out-String).Trim()
OperatingSystem=$ld.operatingsystem
OperatingSystemServicePack=$ld.OperatingSystemServicePack
OperatingSystemVersion=$ld.OperatingSystemVersion
OperatingSystemHotfix=$ld.OperatingSystemHotfix
LastLogonDate=$ld.lastlogondate
ObjectCreated=$ld.Created
ObjectModified=$ld.whenChanged
LoggedInUser=$x.username
}
$outtbl += $t
}
catch [Exception]
{
"Error communicating with $computer, skipping to next"
}
$outtbl | select Computername,ServiceTag,IPV4Address,Description,Enabled,OU,Type,Manufacturer,Model,RAM,ProcessorName,NumberOfCores,NumberOfLogicalProcessors,AddressWidth,OperatingSystem,OperatingSystemServicePack,OperatingSystemVersion,OperatingSystemHotfix,ObjectCreated,ObjectModified,LoggedInUser,LastLogonDate | Format-Table * -Wrap -AutoSize | Out-String -Width 4096 | Out-File $env:USERPROFILE\Desktop\AD-Inventory.txt
}
}
Що ви пробували? Схоже, ви не додаєте елементи до масиву належним чином.
—
Twisty Impersonator