Ce code sert a generer des classes VB 6.0 pour toutes les classes definies par MS dans le WMI, et leur clooections (basee sur la classe).
Ca marche chez moi, sauf quelques services qui ne sont pas instalee sur mon PC (comme l'infrarouge, etc).
Merci de la tester et me signaller les erreurs. J'ai essayer de'eviter les problemes possibles, mais on ne sai jamais s'il y as qques choses pas prevue.
Petit remarqe: l'appli ne cree pas les classes VB pour les classes WMI qui n'ont pas des membres present dans l'enumeration retournee par WMI.
Le fonctionnement est le suivant:
- on choisir la classe WMI qu'on as besoin de generer la classe VB (si on veux, on peux visualiser les enregistrements - a mon avis tres utile)
- on fait une requete sur la classe WMI
- si on as au moins un enregistrement dans la liste, on prends le premier pour y avoir les proprietes (et on genere une liste avec les proprietes d'enumeration)
- on ecrit les fichiers classe et collection
sa c'est un tré bon utilitair
je chèrche comon utiliser WMI dans VB6, et tu à M'aider !
merci
que faut t'il faire pour que cela marche aussi sur un PC distant ?
Car actuellement j'ai le message d'erreur '70' permission refusée.
Merci
sympa je met de 10
juste du changer
Public Function GetWMIServices()
Set GetWMIServices = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}")
End Function
a plus
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.