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.