Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Développement Développement Scripting Microsoft Qui peut m'expliquer ce code !!!

Qui peut m'expliquer ce code !!!

2 réponses
Avatar
toon
J'ai besoin d'un cours de VBS s'il vous plait.
Ce code est tire System Administration Scriptin Guide.
Il sert a determiner le type d'OS du l'ordinateur local.
Bon, je pense que l'on peut passer les explications des lignes 1,6,7 et 8.

Ligne 1 strComputer = "."
Ligne 2 Set objWMIService = GetObject("winmgmts:" _
Ligne 3 & "{impersonationLevel=impersonate}!\\" & strComputer &
"\root\cimv2")
Ligne 4 Set colOperatingSystems = objWMIService.ExecQuery _
Ligne 5 ("Select * from Win32_OperatingSystem")
Ligne 6 For Each objOperatingSystem in colOperatingSystems
Ligne 7 Wscript.Echo objOperatingSystem.Caption & " " &
objOperatingSystem.Version
Ligne 8 Next

Merci d'avance ;- )
Signaler un problème avec ce contenu

2 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Stéphane [MS]
Bonjour,

Ligne 2 : Création de l'objet qui donne accès à WMI
Ligne 3 : Utilisation de WMI en mode impersonalisé sur la classe CIMV2
Ligne 4 : Création d'une collection (technique classique lorsque WMI est
utilisé)
Ligne 5 : Requête WMI en WQL (très proche de SQL)

Selon votre question, je pense qu'il vous faudrait d'avantage d'informations
sur WMI que sur VBScript. Le point d'entrée peut être
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wmisdk/wmi/wmi_start_page.asp

--
Cdlt
Stéphane



J'ai besoin d'un cours de VBS s'il vous plait.
Ce code est tire System Administration Scriptin Guide.
Il sert a determiner le type d'OS du l'ordinateur local.
Bon, je pense que l'on peut passer les explications des lignes 1,6,7 et 8.

Ligne 1 strComputer = "."
Ligne 2 Set objWMIService = GetObject("winmgmts:" _
Ligne 3 & "{impersonationLevel=impersonate}!" & strComputer &
"rootcimv2")
Ligne 4 Set colOperatingSystems = objWMIService.ExecQuery _
Ligne 5 ("Select * from Win32_OperatingSystem")
Ligne 6 For Each objOperatingSystem in colOperatingSystems
Ligne 7 Wscript.Echo objOperatingSystem.Caption & " " &
objOperatingSystem.Version
Ligne 8 Next

Merci d'avance ;- )





Avatar
toon
Rapide et precis ... merci pour ces informations ;- )

"Stéphane [MS]" a écrit dans le message de
news:
Bonjour,

Ligne 2 : Création de l'objet qui donne accès à WMI
Ligne 3 : Utilisation de WMI en mode impersonalisé sur la classe CIMV2
Ligne 4 : Création d'une collection (technique classique lorsque WMI est
utilisé)
Ligne 5 : Requête WMI en WQL (très proche de SQL)

Selon votre question, je pense qu'il vous faudrait d'avantage
d'informations

sur WMI que sur VBScript. Le point d'entrée peut être

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wmisdk/wmi/

wmi_start_page.asp

--
Cdlt
Stéphane



J'ai besoin d'un cours de VBS s'il vous plait.
Ce code est tire System Administration Scriptin Guide.
Il sert a determiner le type d'OS du l'ordinateur local.
Bon, je pense que l'on peut passer les explications des lignes 1,6,7 et
8.



Ligne 1 strComputer = "."
Ligne 2 Set objWMIService = GetObject("winmgmts:" _
Ligne 3 & "{impersonationLevel=impersonate}!" & strComputer &
"rootcimv2")
Ligne 4 Set colOperatingSystems = objWMIService.ExecQuery _
Ligne 5 ("Select * from Win32_OperatingSystem")
Ligne 6 For Each objOperatingSystem in colOperatingSystems
Ligne 7 Wscript.Echo objOperatingSystem.Caption & " " &
objOperatingSystem.Version
Ligne 8 Next

Merci d'avance ;- )