Création tableau avec valeurs

Version imprimable

Bonjour,

J'ai de nouveau besoin de votre aide. J'ai un script qui effectue plusieurs actions comme regarder si un service est actif, présent, pareil pour un processus etc....

J'aurais besoin de mettre chaque action dans une colonne, donc par exemple j'ai ce genre de script :

Code:

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
    #Services :
    write-host "~~~~~~~~~~~~~~~~~~~~~~~~" 
    Write-Host "Services sur la machine $name :"
    foreach($svc in $srcsvc){
    $mysvc = Get-Service -name $svc -ComputerName $name -ErrorAction 4
        if($mysvc -and $($mysvc.Status) -eq "Running") {
            write-host "- $svc est présent. Il est actuellement : En cours d'exécution"
 
        } elseif ($mysvc -and $($mysvc.Status) -eq "Stopped") {
            write-host "- $svc est présent. Il est actuellement : Arrêté"
 
        } else {
            write-host "- $svc n'est pas présent."
        }
    }
 
 
    #Processus :
    write-host "~~~~~~~~~~~~~~~~~~~~~~~~"
    Write-Host "Processus sur la machine $name :"
    foreach($proce in $srcproce){
        if(Get-Process -ProcessName $proce -ComputerName $name -ErrorAction 4) {
            write-host "- $proce est présent."
        } else {
            write-host "- $proce n'est pas présent."
        }
    }
 
 
    #Clé registre :
    write-host "~~~~~~~~~~~~~~~~~~~~~~~~"
    write-host "Clé de registre sur la machine $name :"
    foreach ($reg in $srcreg){
    $regsplit = $reg.split(';')
    $pathsplit = $reg.split(';')[-2]
    If(Get-ItemProperty -Path $pathsplit -name $regsplit  -ErrorAction 4) {
        write-host "- Clé" $regsplit.split(' ')[1] "présente dans :" $pathsplit
        } else {
        write-host "- Clé" $regsplit.split(' ')[1] "non présente dans :" $pathsplit
        }
    }

Et j'aurai besoin de faire un tableau du genre :

Services	Processus	Registre
write-host de mes services	write-host de mes processus	write-host de mon registre

Voila, j'espère avoir été simple dans mes explications :)

Alexis

10/04/2017, 15h52
ericlm128

C'est pour un export csv ou c'est juste pour l'affichage ?
10/04/2017, 15h53
alexis45140

Un export csv.

Alexis

Voici la méthode que je te propose avec une boucle de simulation :
La, on est dans la logique Powerhsell, la variable "$Results" peux directement être exploitée par la cmdlet "Export-Csv".
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 $Results=@() foreach($item in 1..5) { $Result = New-Object psobject -Property @{ Services = "" Processus = "" Registre = "" } $Result.Services = "Services $item" $Result.Processus = "Processus $item" $Result.Registre = "Registre $item" $Results += $Result } $Results
Résultat (les espace sont tronquée par le site) :

Citation:

Registre Services Processus
-------- -------- ---------
Registre 1 Services 1 Processus 1
Registre 2 Services 2 Processus 2
Registre 3 Services 3 Processus 3
Registre 4 Services 4 Processus 4
Registre 5 Services 5 Processus 5

10/04/2017, 16h03
alexis45140

Je test ça dans la soirée si j'ai le temps ou demain matin.

Je vous tiens au courant demain.

Merci

Alexis

Bonjour,

Je viens d'essayer votre code mais je n'arrive pas à mettre ce que je reçois dans mes write-host (dans mes services par exemple) dans une des colonnes, faut-il que je mette mon write-host dans une variable ? Ou juste le texte dans une variable et je met ensuite cette variable dans un service de votre code, du style :

Code:

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
#Services :
    write-host "~~~~~~~~~~~~~~~~~~~~~~~~" 
    Write-Host "Services sur la machine $name :"
    foreach($svc in $srcsvc){
    $mysvc = Get-Service -name $svc -ComputerName $name -ErrorAction 4
        if($mysvc -and $($mysvc.Status) -eq "Running") {
            $a = write-host "- $svc est présent. Il est actuellement : En cours d'exécution"
 
        } elseif ($mysvc -and $($mysvc.Status) -eq "Stopped") {
            $b = write-host "- $svc est présent. Il est actuellement : Arrêté"
 
        } else {
            $c = write-host "- $svc n'est pas présent."
        }
    }
 
 
 
$Results=@()
foreach($item in 1..5)
{
    $Result = New-Object psobject -Property @{
        Services = ""
        Processus = ""
        Registre = ""
    }
 
    $Result.Services = "Services $a"
    $Result.Services = "Services2 $b"
    $Result.Services = "Services3 $c"
    $Results += $Result
}
$Results

Merci

Alexis

1 pièce(s) jointe(s)

Du coup je viens de faire quelques changements qui fonctionne bien pour trois choses : Information sur le processeur, la RAM et les Disques dur. Le problème c'est que pour tout ce qui est Update, logiciels, services, processus, clé de registre, j'ai une boucle "foreach" et donc je ne sais pas comment mettre le résultat des boucles dans mon tableau.

Code:

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
write-host "//Ressources matériels :\\"
    #Processeur :
    foreach ($proc IN gwmi -ComputerName $name -Class Win32_Processor){
        $nbproc = $proc.NumberOfLogicalProcessors
        $cadproc = [Math]::round($proc.MaxClockSpeed /1000,2)
    }
    write-host ""
    write-host "Nombre de processeur : $nbproc "
    write-host "Cadence : $cadproc GHz"
 
    #RAM : 
    foreach ($ramcomputer IN gwmi -ComputerName $name -Class Win32_ComputerSystem){
        $ramtotale = [Math]::round($ramcomputer.TotalPhysicalMemory /1GB,1)
    }
    foreach ($ramoperating IN gwmi -ComputerName $name -Class Win32_OperatingSystem){
        $ramlibre = [Math]::round($ramoperating.FreePhysicalMemory /1MB,1)
    }
    $ramutil = $ramtotale - $ramlibre
    write-host "~~~~~~~~~~~~~~~~~~~~~~~~"
    write-host "RAM totale : $ramtotale Go"
    write-host "RAM utilisé : $ramutil Go"
 
    #Disque dur :  #que dd interne pas support externe
    $nbdd = gwmi -ComputerName $name -Class Win32_LogicalDisk -Filter "DriveType = 3" | Measure-object
    $nbddcount = $nbdd.count
    write-host "~~~~~~~~~~~~~~~~~~~~~~~~"
    write-host "Nombre de disques dur :"$nbddcount
    foreach($volume IN gwmi -ComputerName $name -Class Win32_LogicalDisk -Filter "DriveType = 3") {
        $totale = [Math]::round($volume.size /1024/1024/1024,1)
        $libre = [Math]::round($volume.FreeSpace /1024/1024/1024,1)
        write-host $volume.name $volume.VolumeName
        write-host "Espace disque totale : $totale Go"
        write-host "Espace disque libre : $libre Go"
        write-host ""
    } 
 
$Results=@()
foreach($item in 1)
{
    $Result = New-Object psobject -Property @{
        nbproc = ""
        cadproc = ""
        RAMtotale = ""
        RAMutil = ""
        NbDD = ""
        DDlibre = ""
        DDtotale = ""
    }
 
    #Processeur
    $result.nbproc = "$nbproc"
    $result.cadproc = "$cadproc"
    #RAM
    $result.RAMtotale = "$ramtotale"
    $result.RAMutile = "$ramutil"
    #Disque dur
    $Result.NbDD = "Nb DD $nbddcount"
    $Result.DDlibre = "Libre $libre"
    $Result.DDtotale = "Totale $totale"
 
    $Results += $Result
}
$Results

Voici le résultat du code ci-dessus :

Code:

1
2
3
4
5
6
7
DDlibre   : Libre 91.8
NbDD      : Nb DD 1
RAMutil   : 
nbproc    : 2
cadproc   : 2.53
RAMtotale : 3.9
DDtotale  : Totale 148.7

Donc le résultat se transforme en ligne et le résultat n'est pas dans l'ordre dans lequel je l'ai mit, ce que je préférerais car ce serait plus clair d'avoir tout ce qui concerne les Disques dur, ensuite la RAM, etc...

Voici ce que ça donne quand je fait un export-csv du $Results :
Pièce jointe 263215

Merci

Alexis

11/04/2017, 09h44
ericlm128

C'est à dire ? Pour un poste tu as plusieurs Update, logiciels, services, processus et clé de registre ?

Il faut déjà que tu sache comment tu souhaite organiser ta sortie (ton résultat).

1 pièce(s) jointe(s)

Oui en faite pour les update j'ai un fichier texte externe avec le nom de plusieurs update et dans mon script j'ai une boucle qui lit ligne par ligne le fichier texte et qui me dit si l'update est installé ou non (pareil pour les logiciels, services, processus et clé de registre)

Voici le code pour les update, logiciels, services, processus et clé de registre :

Code:

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
    write-host "Mises à jour sur la machine $name :"
    foreach ($kb in $srckb) {
        if (get-hotfix -id $kb -ComputerName $name -ErrorAction 4) { 
            write-host "- $kb est installée." 
        } else { 
            write-host "- $kb n'est pas installée." 
        } 
    }
 
    #Logiciels : 
    write-host "~~~~~~~~~~~~~~~~~~~~~~~~"
    Write-Host "Logiciels sur la machine $name :"
    #$mylogi = Get-ItemProperty HKLM:\Software\Microsoft\Windows\CurrentVersion\Uninstall\*, HKLM:\SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\* | ? {![string]::IsNullOrWhiteSpace($_.DisplayName) } | select DisplayName
    foreach($logi in $srclogi){
        If (Get-WmiObject -Class Win32_Product -ComputerName $name -Filter "name='$logi'"){
            write-host "- $logi est installé."
        } else {
            write-host "- $logi n'est pas installé."
        }    
    }    
 
    #Services :
    write-host "~~~~~~~~~~~~~~~~~~~~~~~~" 
    Write-Host "Services sur la machine $name :"
    foreach($svc in $srcsvc){
    $mysvc = Get-Service -name $svc -ComputerName $name -ErrorAction 4
       if($mysvc -and $($mysvc.Status) -eq "Running") {
            write-host "- $svc est présent. Il est actuellement : En cours d'exécution"
 
        } elseif ($mysvc -and $($mysvc.Status) -eq "Stopped") {
            write-host "- $svc est présent. Il est actuellement : Arrêté"
 
        } else {
            write-host "- $svc n'est pas présent."
        }
    }
 
    #Processus :
    write-host "~~~~~~~~~~~~~~~~~~~~~~~~"
    Write-Host "Processus sur la machine $name :"
    foreach($proce in $srcproce){
        if(Get-Process -ProcessName $proce -ComputerName $name -ErrorAction 4) {
            write-host "- $proce est présent."
        } else {
            write-host "- $proce n'est pas présent."
        }
    }
 
    #Clé registre :
    write-host "~~~~~~~~~~~~~~~~~~~~~~~~"
    write-host "Clé de registre sur la machine $name :"
    foreach ($reg in $srcreg){
    $regsplit = $reg.split(';')
    $pathsplit = $reg.split(';')[-2]
    If(Get-ItemProperty -Path $pathsplit -name $regsplit  -ErrorAction 4) {
        write-host "- Clé" $regsplit.split(' ')[1] "présente dans ->" $pathsplit
        } else {
        write-host "- Clé" $regsplit.split(' ')[1] "non présente dans ->" $pathsplit
        }
    }

Avec votre script j'ai réussi pour tout ce qui est nombre de processeur, ram, dd car il n'y a pas de boucle.

Voici ce que j'aimerais avoir dans mon csv avec le tableau :
Pièce jointe 263235

Merci

Alexis

Du coup j'ai réussi.

Le résultat qui sort c'est du colonne par colonne donc ça donne un truc du genre (exemple avec des updates) :

Update KB123456789 est installee

Update KB987654321 est installee

Update KB246813579 n'est pas installee

Si vous avez une solution pour avoir la même chose mais en ligne je suis preneur.
Du coup voici mon script complet :

Code:

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
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
                                ####################################################################
                                ##### LISTE RESSOURCES MATERIELS / KB / LOGICIELS / SERVICES / #####
                                #####      PROCESSUS / CLE REGISTRE / USER / LASTLOGON         #####
                                ####################################################################
 
 
##### Purge l'écran #####
clear
 
##### Création du tableau #####
$myObject = New-Object System.Object
 
##### Création des variables : #####
    #Variables pour le nom du fichier de destination :
    $date = Get-Date -format "yyyy-MM-dd"
    $name = $env:COMPUTERNAME
    $rstname = ".\$date.$name.txt"
    $rstcsv = ".\$date.$name.csv"
 
    #Variables fichiers texte sources :
    $cheminsrc = "C:\Users\Administrateur.SRV2012R2\Desktop\script\Powershell\Exo_05-04-17\src"
    $srckb = get-content "$cheminsrc\srckb.txt"        #Source MAJ's
    $srclogi = get-content "$cheminsrc\srclogi.txt"    #Source logiciels
    $srcsvc = get-content "$cheminsrc\srcsvc.txt"      #Source services 
    $srcproce = get-content "$cheminsrc\srcproce.txt"  #Source processus
    $srcreg = get-content "$cheminsrc\srcreg.txt"      #Source registre
 
    #Chemin d'accès users : 
    $srcusers = "C:\Users\"
 
 
##### Début de la transcription dans le fichier de destination #####
Start-Transcript -path $rstname -Append
 
 
##### /////Ressources matériels :\\\\\ #####
write-host ""
write-host "//Ressources matériels :\\"
    #Processeur -Nombre de processeurs + Cadence processeur- :
    foreach ($proc IN gwmi -ComputerName $name -Class Win32_Processor){
        $nbproc = $proc.NumberOfLogicalProcessors
        $cadproc = [Math]::round($proc.MaxClockSpeed /1000,2)
    }
    write-host ""
    write-host "Nombre de processeur : $nbproc "
    write-host "Cadence : $cadproc GHz"
 
 
    #RAM -RAM totale + RAM utilisé- : 
    foreach ($ramcomputer IN gwmi -ComputerName $name -Class Win32_ComputerSystem){
        $ramtotale = [Math]::round($ramcomputer.TotalPhysicalMemory /1GB,1)
    }
    foreach ($ramoperating IN gwmi -ComputerName $name -Class Win32_OperatingSystem){
        $ramlibre = [Math]::round($ramoperating.FreePhysicalMemory /1MB,1)
    }
    $ramutil = $ramtotale - $ramlibre
    write-host "~~~~~~~~~~~~~~~~~~~~~~~~"
    write-host "RAM totale : $ramtotale Go"
    write-host "RAM utilisé : $ramutil Go"
 
    #Disque dur -Nb DD + Espace total + Espace libre- :  #Que dd interne pas support externe
    $nbdd = gwmi -ComputerName $name -Class Win32_LogicalDisk -Filter "DriveType = 3" | Measure-object
    $nbddcount = $nbdd.count
    write-host "~~~~~~~~~~~~~~~~~~~~~~~~"
    write-host "Nombre de disques dur :"$nbddcount
    foreach($volume IN gwmi -ComputerName $name -Class Win32_LogicalDisk -Filter "DriveType = 3") {
        $totale = [Math]::round($volume.size /1024/1024/1024,1)
        $libre = [Math]::round($volume.FreeSpace /1024/1024/1024,1)
        write-host $volume.name $volume.VolumeName
        write-host "Espace disque totale : $totale Go"
        write-host "Espace disque libre : $libre Go"
        write-host ""
    } 
    #Déclaration du tableau :
        #Proc
        $myObject | Add-Member -type NoteProperty -name nbproc -Value "$nbproc"
        $myObject | Add-Member -type NoteProperty -name cadproc -Value "$cadproc GHz"
        #RAM 
        $myObject | Add-Member -type NoteProperty -name RAMtotale -Value "$ramtotale Go"
        $myObject | Add-Member -type NoteProperty -name RAMutil -Value "$ramutil Go"
        #Disque Dur
        $myObject | Add-Member -type NoteProperty -name nbDD -Value "$nbddcount"
        $myObject | Add-Member -type NoteProperty -name DDTotale -Value "$totale Go"
        $myObject | Add-Member -type NoteProperty -name DDlibre -Value "$libre Go"
 
 
##### /////Présence de :\\\\\ #####
write-host ""
write-host "//Présence de :\\"
    #KB -Vérifie si KB existe depuis fichier txt externe- : 
    write-host ""
    write-host "Mises à jour sur la machine $name :"
    foreach ($kb in $srckb) {
        if (get-hotfix -id $kb -ComputerName $name -ErrorAction 4) { 
            write-host "- $kb est installée."
            $myObject | Add-Member -type NoteProperty -name "Update $kb installee" -value "" -Force
        } else { 
            write-host "- $kb n'est pas installée."
            $myObject | Add-Member -type NoteProperty -name "Update $kb non installee" -value "" -Force
        }
    }
 
    #Logiciels -Vérifie si logiciel existe depuis fichier txt externe- : 
    write-host "~~~~~~~~~~~~~~~~~~~~~~~~"
    Write-Host "Logiciels sur la machine $name :"
    #$mylogi = Get-ItemProperty HKLM:\Software\Microsoft\Windows\CurrentVersion\Uninstall\*, HKLM:\SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\* | ? {![string]::IsNullOrWhiteSpace($_.DisplayName) } | select DisplayName
    foreach($logi in $srclogi){
        If (Get-WmiObject -Class Win32_Product -ComputerName $name -Filter "name='$logi'"){
            write-host "- $logi est installé."
            $myObject | Add-Member -type NoteProperty -name "Logiciel $logi est installe" -value "" -Force
        } else {
            write-host "- $logi n'est pas installé."
            $myObject | Add-Member -type NoteProperty -name "Logiciel $logi n'est pas installe" -value "" -Force
        }    
    }    
 
    #Services -Vérifie si services existe depuis fichier txt externe- :
    write-host "~~~~~~~~~~~~~~~~~~~~~~~~" 
    Write-Host "Services sur la machine $name :"
    foreach($svc in $srcsvc){
    $mysvc = Get-Service -name $svc -ComputerName $name -ErrorAction 4
       if($mysvc -and $($mysvc.Status) -eq "Running") {
            write-host "- $svc est présent. Il est actuellement : En cours d'exécution"
            $myObject | Add-Member -type NoteProperty -name "Service $svc est present. Statut actuel : En cours" -value "" -Force
 
        } elseif ($mysvc -and $($mysvc.Status) -eq "Stopped") {
            write-host "- $svc est présent. Il est actuellement : Arrêté"
            $myObject | Add-Member -type NoteProperty -name "Service $svc est present. Statut actuel : Arrêté" -value "" -Force
 
        } else {
            write-host "- $svc n'est pas présent."
            $myObject | Add-Member -type NoteProperty -name "Service $svc n'est pas present" -value "" -Force
        }
    }
 
    #Processus -Vérifie si processus existe depuis fichier txt externe- :
    write-host "~~~~~~~~~~~~~~~~~~~~~~~~"
    Write-Host "Processus sur la machine $name :"
    foreach($proce in $srcproce){
        if(Get-Process -ProcessName $proce -ComputerName $name -ErrorAction 4) {
            write-host "- $proce est présent."
            $myObject | Add-Member -type NoteProperty -name "Processus $proce est present" -value "" -Force
        } else {
            write-host "- $proce n'est pas présent."
            $myObject | Add-Member -type NoteProperty -name "Processus $proce n'est pas present" -value "" -Force
        }
    }
 
    #Clé registre -Vérifie si clé registre existe depuis fichier txt externe- :
    write-host "~~~~~~~~~~~~~~~~~~~~~~~~"
    write-host "Clé de registre sur la machine $name :"
    foreach ($reg in $srcreg){
    $regsplit = $reg.split(';')
    $pathsplit = $reg.split(';')[-2]
    $regsplittab = $regsplit.split(' ')[1]
    If(Get-ItemProperty -Path $pathsplit -name $regsplit  -ErrorAction 4) {
        write-host "- Clé" $regsplit.split(' ')[1] "présente dans ->" $pathsplit
        $myObject | Add-Member -type NoteProperty -name "Clé registre $regsplittab est présente dans -> $pathsplit" -value "" -Force
        } else {
        write-host "- Clé" $regsplit.split(' ')[1] "non présente dans ->" $pathsplit
        $myObject | Add-Member -type NoteProperty -name "Clé registre $regsplittab n'est pas présente dans -> $pathsplit" -value "" -Force
        }
    }
 
##### Users déjà connectés sur poste + date last logon #####
write-host ""
write-host "//Users + last logon :\\"
write-host "Utilisateurs déjà connecté sur sur la machine $name et LastLogon :"
 
$pathusers = Get-ChildItem $srcusers | ? {$_.Name -ne "Public"} | ? {$_.Name -ne 'MSSQL$ADK.NT Service'} #Liste les dossiers présent dans "C:\Users\" en enlevant le dossier "Public" et "MSSQL$ADK.NT Service" # Le "?" correspond à la commande Where-Object
foreach($dir in $pathusers) {
    $nt = Get-Item ($dir.FullName + "\NTUSER.DAT") -Force
    $LastWriteTimeNTUSER = $nt.LastWriteTime.ToString("dd/MM/yyyy")
    $Nameuser = $dir.Name
    Write-Host "- $Nameuser : connecté pour la dernière fois le $LastWriteTimeNTUSER"
}
 
 
 
##### Export du tableau vers un fichier csv : #####
$myObject | Export-Csv $rstcsv -Delimiter ";"
 
 
##### Fin de la transcription dans le fichier de destination #####
Stop-Transcript

Merci

Alexis