WDForge.org - Forums

WMI Win32_NetworkAdapter

Sujet: WMI Win32_NetworkAdapter
par GoZeub sur 10/2/2009 11:26:25

Bonjour,

Je souhaite afficher ma liste de connexions, les adresses ip associées et pouvoir modifier l'ip d'une d'entre elles. Pour cela j'utilise actuellement les cmd netsh et ipconfig mais je ne trouve pas cela très "propre".
Je souhaiterai donc utiliser WMI en m'inspirant du travail de Dr Charly et de la LST 60 mais l'appel de la classe Win32_NetworkAdapter me pose problème.

aManagementScope est un ManagementScope dynamique
aConnectionOptions est un ConnectionOptions dynamique
aObjectQuery est un ObjectQuery dynamique
aManagementObjectCollection est un ManagementObjectCollection dynamique
aManagementObjectSearcher est un ManagementObjectSearcher dynamique
sChaineRetour est une chaîne

QUAND EXCEPTION
	ExceptionActive()
	RENVOYER ""
FIN

aConnectionOptions = allouer un ConnectionOptions
QUAND EXCEPTION DANS 
	aManagementScope = allouer un ManagementScope("\\.\root\cimv2")		
FAIRE
	Erreur("Probleme d'accès 'WMI'",ErreurInfo())
	ExceptionActive()
	RENVOYER ""
FIN

aObjectQuery = allouer un ObjectQuery("SELECT * FROM " + NomClasse)
aManagementObjectSearcher = allouer un ManagementObjectSearcher(aManagementScope, aObjectQuery)
aManagementObjectCollection = aManagementObjectSearcher:get()

nCompteur est un entier
nTotal est un entier

IEnumMO est un IEnumerator dynamique
IEnumMO = aManagementObjectSearcher:get():GetEnumerator()	

aManagementObject est un ManagementObject dynamique

TANTQUE(IEnumMO:MoveNext())

Lorsque ma variable NomClasse="Win32_NetworkAdapterConfiguration" je peux récupérer des infos mais lorsqu'elle est égale à "Win32_NetworkAdapter" mon programme se plante à la ligne "TANTQUE(IEnumMO:MoveNext())"

Avez-vous une solution pour moi ?

Merci d'avance

ps:l'article wdforge sur le WMI n'est pas accessible.