Discussion :

[aurel51100]

Bonjour,

J'arrive à récupérer les compteurs d'imprimantes via ce script :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
$SNMP = new-object -ComObject olePrn.OleSNMP

#Copieur1
$snmp.open("192.168.89.51","public",2,3000)
$snmp.Get(".1.3.6.1.2.1.1.5.0")
$snmp.Get(".1.3.6.1.2.1.25.3.2.1.3.1")
$snmp.Get(".1.3.6.1.4.1.1602.1.11.1.3.1.4.102")
$snmp.Get(".1.3.6.1.4.1.1602.1.11.1.3.1.4.106")
$snmp.Get(".1.3.6.1.4.1.1602.1.11.1.3.1.4.109")
$snmp.Get(".1.3.6.1.4.1.1602.1.11.1.3.1.4.112")
$SNMP.Close()


#Copieur2
$snmp.open("192.168.89.53","public",2,3000)
$snmp.Get(".1.3.6.1.2.1.1.5.0")
$snmp.Get(".1.3.6.1.2.1.25.3.2.1.3.1")
$snmp.Get(".1.3.6.1.4.1.1602.1.11.1.3.1.4.102")
$snmp.Get(".1.3.6.1.4.1.1602.1.11.1.3.1.4.106")
$snmp.Get(".1.3.6.1.4.1.1602.1.11.1.3.1.4.109")
$snmp.Get(".1.3.6.1.4.1.1602.1.11.1.3.1.4.112")
$SNMP.Close()

Ce qui me donne ce résultat :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Copieur1
Canon iR-ADV C3325 12.07
316058
65377
250679
57
Copieur2
Canon iR-ADV C5240 48.04
140831
108954
31870

mais je ne sais pas comment exporter ces résultats vers un fichiers csv ou autre, pourriez vous m'aider ?

[Laurent Dardenne]

Salut,
cette fonction peut peut-être t'aider.

[aurel51100]

Merci pour ton lien.

J'ai modifié le titre car il y avait une petite erreur, c'est un export vers csv et non pst.

J'ai testé un des exemples avec

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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
$file ='c:\test.csv'
@'
$SNMP = new-object -ComObject olePrn.OleSNMP

#Cop_GIE
$snmp.open("192.168.89.51","public",2,3000)
$snmp.Get(".1.3.6.1.2.1.1.5.0")
$snmp.Get(".1.3.6.1.2.1.25.3.2.1.3.1")
$snmp.Get(".1.3.6.1.4.1.1602.1.11.1.3.1.4.102")
$snmp.Get(".1.3.6.1.4.1.1602.1.11.1.3.1.4.106")
$snmp.Get(".1.3.6.1.4.1.1602.1.11.1.3.1.4.109")
$snmp.Get(".1.3.6.1.4.1.1602.1.11.1.3.1.4.112")
$SNMP.Close()


#Cop_Het
$snmp.open("192.168.89.53","public",2,3000)
$snmp.Get(".1.3.6.1.2.1.1.5.0")
$snmp.Get(".1.3.6.1.2.1.25.3.2.1.3.1")
$snmp.Get(".1.3.6.1.4.1.1602.1.11.1.3.1.4.102")
$snmp.Get(".1.3.6.1.4.1.1602.1.11.1.3.1.4.106")
$snmp.Get(".1.3.6.1.4.1.1602.1.11.1.3.1.4.109")
$snmp.Get(".1.3.6.1.4.1.1602.1.11.1.3.1.4.112")
$SNMP.Close()
'@ > $file

mais malheureusement ca ne fait qu'importer le script brut dans un fichier et non le résultat.

[Laurent Dardenne]

Une autre approche, a adapter à ton cas à l'aide du boucle repeat Until ( au moins une fois) :

Code powershell :

Sélectionner tout - Visualiser dans une fenêtre à part

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
 
#les lignes concernant le résultat d'interrogation d'une imprimante doit être de 6
$lines=@'
Copieur1
Canon iR-ADV C3325 12.07
316058
65377
250679
57
Copieur2
Canon iR-ADV C5240 48.04
140831
108954
31870
xx #manque dans ton exemple
'@
 
#transforme en tableau de string la chaine $Lines
#la here string n'utilise pas CRLF mais LF uniquement, c'est Powershell... 
$tab=$lines -split "\`n"
 
 #construit rapido un objet personnalisé
$o=1|select Nom,label,c1,c2,c3,c4
 
 #affecte les 6 première lignes de Tab dans les propriétés de l'objet et le reste dans $tab (nouvelle affectation)
$o.Nom,$o.label,$o.c1,$o.c2,$o.c3,$o.c4,$tab=$tab
 #contrôle
$o
$tab
$nul -eq $tab #non, pas encore
 
#on refait la même chose tant que $tab n'est pas à $null ( donc tant qu'il n'est pas vide)
$o=1|select Nom,label,c1,c2,c3,c4
$o.Nom,$o.label,$o.c1,$o.c2,$o.c3,$o.c4,$tab=$tab
$o
$tab
$nul -eq $tab #Oui il est vide

La fonction proposée précédement utilise des regex qui ne sont pas nécessaires dans ton cas. On reprend le principe du découpage mais en plus simple ou presque

[Laurent Dardenne]

Une ébauche :

Code Powershell :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
$tab=$lines -split "\`n"
($tab.count % 6) -eq 0 #true ok multiple de 6
$Objects=Do {
 $O=[PScustomObject]@{Nom='';Label='';Property1='';Property2='';Property3='';Property4=''}
 $o.Nom,$o.Label,$O.Property1,$o.Property2,$o.Property3,$o.Property4,$tab=$tab
 $o
} until ($nul -eq $tab)
$objects.Count
$objects

Résultat:

Nom : Copieur1
Label : Canon iR-ADV C3325 12.07
Property1 : 316058
Property2 : 65377
Property3 : 250679
Property4 : 57

Nom : Copieur2
Label : Canon iR-ADV C5240 48.04
Property1 : 140831
Property2 : 108954
Property3 : 31870
Property4 : xx #manque dans ton exemple