Une approche peut-être plus sure est d'utiliser WMI :
Option Explicit
Sub ArreterWscript
Dim objWMIService, colItems, objItem
Set objWMIService = GetObject("winmgmts:\\.\root\CIMV2")...
Type: Messages; Utilisateur: l_autodidacte
Une approche peut-être plus sure est d'utiliser WMI :
Option Explicit
Sub ArreterWscript
Dim objWMIService, colItems, objItem
Set objWMIService = GetObject("winmgmts:\\.\root\CIMV2")...
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.