Scripts/Get-PCCDROM.ps1
Function Get-PCCDROM { <# .SYNOPSIS Get CDROM information .DESCRIPTION Get CDROM information .PARAMETER ComputerName The target computer name .EXAMPLE Get-PCCDROM -ComputerName LabPC2024 .NOTES N/A .LINK N/A #> [CmdletBinding ()] Param ( [Parameter (Mandatory = $True, ValueFromPipeline = $True, ValueFromPipelineByPropertyName = $True, HelpMessage = 'Enter computer name' ) ] [String[]]$ComputerName ) BEGIN { Function Show-Output ($Computer, $Values, $Status) { [PSCustomObject]@{ ComputerName = $Computer Caption = $Values.Caption Description = $Values.Description Drive = $Values.Drive Manufacturer = $Values.Manufacturer MediaType = $Values.MediaType MediaLoaded = $Values.MediaLoaded Status = $Status } } } PROCESS { ForEach ($Computer In $ComputerName) { If (Test-Connection -ComputerName $Computer -Count 1 -Quiet) { Try { $Data = Get-WmiObject Win32_CDROMDrive -ComputerName $Computer | Select-Object * ForEach ($Item In $Data) { Show-Output $Computer.ToUpper() $Item 'Ok' } } Catch { Show-Output $Computer.ToUpper() $Null $PSItem.Exception.Message } } Else { Show-Output $Computer.ToUpper() $Null 'Unreachable' } } } END {} } |