Ecrire dans un objet en VBS
Otaki
-
Otaki -
Otaki -
Bonjour à tous,
J'ai besoin pour un projet de savoir comment on écrit dans un objet dans un fichier vbs. Je ne connais rien au vbs.
Bref. Je récupere une valeur (masque sous réseau) depuis un objet et j'aimerais changé la valeur de cette variable.
Le code :
________________________________________________________________
//La partie que je ne comprends pas :
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colNicConfigs = objWMIService.ExecQuery _
("SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled = True")
// La partie que je comprend, oui oui, c'est assez peu :)
For each objNicConfig In colNicConfigs
strSubnetMask = Join(objNicConfig.IPSubnet)
WScript.Echo " Masque : " & strSubnetMask$
_________________________________________________________________
Voila donc il me récupère bien le masque (à savoir 255.255.255.0), et j'aimerais changer cette valeur en 255.255.0.0
Si quelqu'un a une idée du code pour faire cela...
Merci,
Crdlt.
J'ai besoin pour un projet de savoir comment on écrit dans un objet dans un fichier vbs. Je ne connais rien au vbs.
Bref. Je récupere une valeur (masque sous réseau) depuis un objet et j'aimerais changé la valeur de cette variable.
Le code :
________________________________________________________________
//La partie que je ne comprends pas :
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colNicConfigs = objWMIService.ExecQuery _
("SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled = True")
// La partie que je comprend, oui oui, c'est assez peu :)
For each objNicConfig In colNicConfigs
strSubnetMask = Join(objNicConfig.IPSubnet)
WScript.Echo " Masque : " & strSubnetMask$
_________________________________________________________________
Voila donc il me récupère bien le masque (à savoir 255.255.255.0), et j'aimerais changer cette valeur en 255.255.0.0
Si quelqu'un a une idée du code pour faire cela...
Merci,
Crdlt.
A voir également:
- Ecrire dans un objet en VBS
- Ecrire en gras sur whatsapp - Guide
- Vbs windows - Accueil - Optimisation
- Écrire en majuscule - Guide
- Comment ecrire & sur un ordinateur - Guide
- Ecrire en miroir - Guide