Suprimer une imprimante par du VB ou .bat

en faite je veux desinstaller cette imprimante sur une 50 ene de poste et j aimerais envoyer un .bat ou un exe en VB en tache planifie sur tout les postes pour eviter de faire 50 desinstallation manuelle

C'est surement "un peu" tard :D mais ca pourra peut-être servir à quelqu'un d'autre :

Public Sub DeletePrinter(strNom As String)
Dim strComputer As Variant
Dim objWMIService As Variant
Dim colInstalledPrinters As Variant
Dim objPrinter As Variant

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

Set colInstalledPrinters = objWMIService.ExecQuery _
("Select * from Win32_Printer where DeviceID = '" & strNom & "'")

For Each objPrinter In colInstalledPrinters
objPrinter.Delete_
Next
End Sub

salut
pourquoi ne la desinstalles-tu pas tout simplement ?

Le pc est une machine formidable a qui on fait porter:
Une housse pour la poussiere et le chapeau pour les erreurs