Nombres de tirage d'une imprimante

yves -  
michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   -
Salut, j'ai une imprimante Hp Laser jet 4000 que j'ai partagé dans mon réseau. Mon problème est que je veux savoir le nombres tirages qu'il a fait.
A voir également:

2 réponses

michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 318
 
bonjour
ce vbscript t'indique le nombre d'impression par imprimante
à adapter avec un If pour ton imprimante syuivi d'un "exit for" ou "end"
ce script est sur le serveur

strComputer = "." 
Set objWMIService = GetObject("winmgmts:" _ 
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") 

Set colPrintQueues =  objWMIService.ExecQuery _ 
    ("Select * from Win32_PerfFormattedData_Spooler_PrintQueue Where " & _ 
        "Name <> '_Total'") 

For Each objPrintQueue in colPrintQueues 
        Wscript.Echo "Nom: " & objPrintQueue.Name 
        Wscript.Echo "nombre d'impression réalisée: " & objPrintQueue.TotalJobsPrinted 

 next


Michel
0
Raymond PENTIER Messages postés 71871 Date d'inscription   Statut Contributeur Dernière intervention   17 402
 
Il faut changer d'imprimante, et en choisir une qui comporte cette option.

En attendant, tu mets du papier dans l'imprimante par ramettes de 25 feuilles, et tu comptes le nombre de fois où tu en remets (c'est comme pour suivre la consommation d'essence de ta voiture).
0
michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 318
 
????
0