Bonjour,

Je suis en train de créer un petit script qui supprime des imprimantes en local port.
Ce qu'il me faudrait, c'est que tout au début du script, qu'il y ait une ligne :

Si le poste a Windows 2000 ou autre ==> Quit
Si le poste a Windows XP ==> Continuer le script

J'ai trouvé quelques bout de code sur le net mais je n'arrive pas à m'en servir...

Voici mon code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colInstalledPrinters = objWMIService.ExecQuery _
    ("Select * From Win32_Printer") 
 
For Each objPrinter in colInstalledPrinters
 
    If objPrinter.Portname = "\\serveur\imprimante" Then
    	objPrinter.Delete_
    End If

Je vous remercie d'avance de votre aide.