Introduzione a PowerShell

D1

(Get-WmiObject -Class Win32_ComputerSystem).UserName

D2

$a = New-Object -ComObject Excel.Application
$a.Visible = $True
$b = $a.Workbooks.Add()
$c = $b.Worksheets.Item(1)
$c.Cells.Item(1,1) = "Service Name"
$c.Cells.Item(1,2) = "Service Status"
$i = 2

Get-Service |
    ForEach-Object{ $c.cells.item($i,1) = $_.Name; $c.cells.item($i,2) = $_.Status; $i=$i+1}

$b.SaveAs("C:\Test.xls")
$a.Quit()