Pytanie : Powershell WMI Zapytanie

Cześć,

I pisać Powershell pismo query niektóre informacja o nasz serwer. I zastanawiać się jeżeli someone móc dlaczego the słowo "Hotfix" i "Aktualizacja" od pisać the przodować spreadsheet? Także, między the program pozycja, tam  być czasem ogromny przerwa betweeen program. Móc ty mówić móc powodować móc i dlaczego ono?

Thank you 
(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:

$strComputer = "."

$Excel = Nowy-Protestować - Com Excel.Application
$Excel.visible = $True
$Excel = $Excel.Workbooks.Add ()

$Sheet = $Excel.WorkSheets.Item (1)
$Sheet.Cells.Item (1,1) = "Komputer"
$Sheet.Cells.Item (1,2) = "Przejażdżka List"
$Sheet.Cells.Item (1,3) = "Opis"
$Sheet.Cells.Item (1,4) = "FileSystem"
$Sheet.Cells.Item (1,5) = "Rozmiar w GB"
$Sheet.Cells.Item (1,6) = "Uwalniać Przestrzeń w GB"


$WorkBook = $Sheet.UsedRange
$WorkBook.Interior.ColorIndex = 8
$WorkBook.Font.ColorIndex = 11
$WorkBook.Font.Bold = $True

$intRow = 2
$colItems = Dostawać-wmiObject - klasa "Win32_LogicalDisk" - namespace "korzeń \ CIMV2" `
- computername $strComputer

foreach ($objItem w $colItems) {
$Sheet.Cells.Item ($intRow, 1) = $objItem.SystemName
$Sheet.Cells.Item ($intRow, 2) = $objItem.DeviceID
$Sheet.Cells.Item ($intRow, 3) = $objItem.Description
$Sheet.Cells.Item ($intRow, 4) = $objItem.FileSystem
$Sheet.Cells.Item ($intRow, 5) = $objItem.Size/1GB
$Sheet.Cells.Item ($intRow, 6) = $objItem.FreeSpace/1GB

$intRow = $intRow + (1)

$WorkBook.EntireColumn.AutoFit ()

}

$Sheet = $Excel.WorkSheets.Item (1)
$Sheet.Cells.Item (7,1) = "Produkt"
$Sheet.Cells.Item (7,2) = "Sprzedawca"
$Sheet.Cells.Item (7,3) = "Wersja"
$Sheet.Cells.Item (7,4) = "Instalować Data"

$intRow = 7
$Keys = Dostawać-ChildItem HKLM: \ Oprogramowanie \ Microsoft \ Windows \ CurrentVersion \ Uninstall

$Items = $keys |foreach-protestować {Dostawać-ItemProperty $_.PsPath}

foreach ($item w $items) {
$Sheet.Cells.Item ($intRow, 1) = $Item.DisplayName
$Sheet.Cells.Item ($intRow, 2) = $Item.Publisher
$Sheet.Cells.Item ($intRow, 3) = $Item.DisplayVersion
$Sheet.Cells.Item ($intRow, 4) = $Item.InstallDate

$intRow = $intRow + (1)

$WorkBook.EntireColumn.AutoFit ()
}

Jasny

Odpowiedź : Powershell WMI Zapytanie

Cześć Brent,

I robić patrzeć polepszenie który musieć i ty patrzeć dla.  I wysyłać znowu wkrótce wkrótce zmiana.

Otucha,

D
(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:

$strComputer = "."

$Excel = Nowy-Protestować - Com Excel.Application
$Excel.visible = $True
$Excel = $Excel.Workbooks.Add ()

$Sheet = $Excel.WorkSheets.Item (1)
$Sheet.Cells.Item (1,1) = "Komputer"
$Sheet.Cells.Item (1,2) = "Przejażdżka List"
$Sheet.Cells.Item (1,3) = "Opis"
$Sheet.Cells.Item (1,4) = "FileSystem"
$Sheet.Cells.Item (1,5) = "Rozmiar w GB"
$Sheet.Cells.Item (1,6) = "Uwalniać Przestrzeń w GB"


$WorkBook = $Sheet.UsedRange
$WorkBook.Interior.ColorIndex = 8
$WorkBook.Font.ColorIndex = 11
$WorkBook.Font.Bold = $True

$intRow = 2
$colItems = Dostawać-wmiObject - klasa "Win32_LogicalDisk" - namespace "korzeń \ CIMV2" `
- computername $strComputer

foreach ($objItem w $colItems) {
$Sheet.Cells.Item ($intRow, 1) = $objItem.SystemName
$Sheet.Cells.Item ($intRow, 2) = $objItem.DeviceID
$Sheet.Cells.Item ($intRow, 3) = $objItem.Description
$Sheet.Cells.Item ($intRow, 4) = $objItem.FileSystem
$Sheet.Cells.Item ($intRow, 5) = $objItem.Size/1GB
$Sheet.Cells.Item ($intRow, 6) = $objItem.FreeSpace/1GB

$intRow = $intRow + (1)

$WorkBook.EntireColumn.AutoFit ()

}

$intRow = $intRow + (1)

$Sheet = $Excel.WorkSheets.Item (1)
$Sheet.Cells.Item ($introw, 1) = "Produkt"
$Sheet.Cells.Item ($introw, 2) = "Sprzedawca"
$Sheet.Cells.Item ($introw, 3) = "Wersja"
$Sheet.Cells.Item ($introw, 4) = "Instalować Data"

$introw = $introw + (1)
$Keys = Dostawać-ChildItem HKLM: \ Oprogramowanie \ Microsoft \ Windows \ CurrentVersion \ Uninstall

$Items = $keys | foreach-protestować {Dostawać-ItemProperty $_.PsPath} | dokąd-protestować {($_.DisplayName - notmatch "Aktualizacja|Hotfix") - i ($_.DisplayName - ne $null)}

foreach ($item w $items) {
$Sheet.Cells.Item ($intRow, 1) = $Item.DisplayName
$Sheet.Cells.Item ($intRow, 2) = $Item.Publisher
$Sheet.Cells.Item ($intRow, 3) = $Item.DisplayVersion
$Sheet.Cells.Item ($intRow, 4) = $Item.InstallDate

$intRow = $intRow + (1)

}

$WorkBook.EntireColumn.AutoFit ()

Jasny
Inne rozwiązania  
 
programming4us programming4us