Bonjour à tous,
J'ai actuellement un problème avec ce fameux spooler d'impression sous Seven (Pour ceux qui connaissent) et je tente de contourner le problème en créant des batch et des scripts vbs pour que l'utilisateur le redémarre facilement en attendant la résolution du problème.
Le problème c'est qu'aucun de mes batch et Script VBS ne fonctionne sous seven alors que sous XP ça fonctionne. (Après de multiple recherche sur le net).
Aller, je mets le dernier code testé :
Il y a peu être un problème avec le strComputer ou le nom du service qui n'est pas le même sous Seven (pourtant j'ai regardé)
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 strComputer = "BAI506" Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set objLanManServer = objWMIService.Get("Win32_Service.Name='spooler'") Set colServiceList = objWMIService.ExecQuery("Associators of " _ & "{Win32_Service.Name='LanManServer'} Where " _ & "AssocClass=Win32_DependentService " & _ "Role=Antecedent" ) For Each objService in colServiceList objService.StopService() Next WScript.Sleep 20000 Return = objLanManServer.StopService() WScript.Sleep 10000 Return = objLanManServer.StartService() For Each objService in colServiceList objService.StartService() Next
Je ne sais pas non plus à quoi correspond \root\cimv2, on dirait du linux....
Merci d'avance !
Partager