A voir également:
- WMI
- Wmi provider host c'est quoi - Forum Windows
- WmiPrvSE UC processeur 80% en surchauffe ✓ - Forum Windows
- Impossible d'accéder au logiciel wmi ✓ - Forum Windows 10
- Sink to receive asynchronous callbacks for wmi client application - Forum Windows Vista
- WMI Provider Host a cessé de fonctionner et a - Forum Windows
2 réponses
arawns
Messages postés
281
Date d'inscription
lundi 17 décembre 2007
Statut
Membre
Dernière intervention
24 décembre 2014
41
20 févr. 2008 à 10:08
20 févr. 2008 à 10:08
Bonjour,
Il n'y a rien à configurer. Peut-être que tu te trompe de terme ?
https://fr.wikipedia.org/wiki/Windows_Management_Instrumentation
Il n'y a rien à configurer. Peut-être que tu te trompe de terme ?
https://fr.wikipedia.org/wiki/Windows_Management_Instrumentation
Bonjour,
Merci de ta reponse mais j'ai cru qu'il y avait des services a activer dans controle pannel -add and remove- composant windows!!
J'en étais arrivé à cette conclusion vu que j'arrive à voir toutes les informations que je veux sur mon pc locale mais je ne n'arrive pas a me connecter sur un switch distant connaissant son nom et passwoord.
Pourtant je suis a peu près sûr du code que j'utilise.
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim LabelMachine As New System.Web.UI.WebControls.Label
' Chargement avec la machine courante et pas de login spécifique
'(compte utilisé : ASPNET)
LabelMachine.Text = "<B>" & stringMachineName & " </B>(Login : " & co.Username & ")<BR>"
Me.Controls.Add(LabelMachine)
chargeInfoWMI()
' reboot("10.101.114.202")
' Chargement avec une autre machine du réseau dont l'IP est fournie en paramètre
' ainsi que le login et Mot de passe
LabelMachine = New System.Web.UI.WebControls.Label
stringMachineName = "10.101.115.27"
co.Username = "sALBEles50"
co.Password = "testStudent1234{"
LabelMachine.Text = "<B>" & stringMachineName & " </B>(Login : " & co.Username & ")<BR>"
Me.Controls.Add(LabelMachine)
chargeInfoWMI()
End Sub
' -------------------------------------------------
Private Sub chargeInfoWMI()
Dim ms As System.Management.ManagementScope
Dim oq As System.Management.ObjectQuery
Dim query As ManagementObjectSearcher
Dim queryCollection As ManagementObjectCollection
Dim MonMO As ManagementObject
Dim LabelVersionOS As New System.Web.UI.WebControls.Label
Try
ms = New System.Management.ManagementScope("\\" & stringMachineName & "\root\cimv2", co)
oq = New System.Management.ObjectQuery("SELECT * FROM Win32_OperatingSystem")
query = New ManagementObjectSearcher(ms, oq)
queryCollection = query.Get()
For Each MonMO In queryCollection
LabelVersionOS.Text = "<B>Version OS </B>: " & MonMO("Manufacturer")
LabelVersionOS.Text &= " - " & MonMO("Caption") & " (" & MonMO("Version") & ")<BR><BR>"
Next
Catch ex As Exception
LabelVersionOS.Text = "Erreur dans l'appel WMI : " & ex.Message
Finally
Me.Controls.Add(LabelVersionOS)
End Try
End Sub
Pour le pc local j'obtiens la reponse voulue mais pour le switch distant j'obtiens :
"Erreur dans l'appel WMI : The RPC server is unavailable. (Exception from HRESULT: 0x800706BA)"
merci de ta reponse et j'éspère que tu sera dès lors m'éclairer sur le sujet.
Merci de ta reponse mais j'ai cru qu'il y avait des services a activer dans controle pannel -add and remove- composant windows!!
J'en étais arrivé à cette conclusion vu que j'arrive à voir toutes les informations que je veux sur mon pc locale mais je ne n'arrive pas a me connecter sur un switch distant connaissant son nom et passwoord.
Pourtant je suis a peu près sûr du code que j'utilise.
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim LabelMachine As New System.Web.UI.WebControls.Label
' Chargement avec la machine courante et pas de login spécifique
'(compte utilisé : ASPNET)
LabelMachine.Text = "<B>" & stringMachineName & " </B>(Login : " & co.Username & ")<BR>"
Me.Controls.Add(LabelMachine)
chargeInfoWMI()
' reboot("10.101.114.202")
' Chargement avec une autre machine du réseau dont l'IP est fournie en paramètre
' ainsi que le login et Mot de passe
LabelMachine = New System.Web.UI.WebControls.Label
stringMachineName = "10.101.115.27"
co.Username = "sALBEles50"
co.Password = "testStudent1234{"
LabelMachine.Text = "<B>" & stringMachineName & " </B>(Login : " & co.Username & ")<BR>"
Me.Controls.Add(LabelMachine)
chargeInfoWMI()
End Sub
' -------------------------------------------------
Private Sub chargeInfoWMI()
Dim ms As System.Management.ManagementScope
Dim oq As System.Management.ObjectQuery
Dim query As ManagementObjectSearcher
Dim queryCollection As ManagementObjectCollection
Dim MonMO As ManagementObject
Dim LabelVersionOS As New System.Web.UI.WebControls.Label
Try
ms = New System.Management.ManagementScope("\\" & stringMachineName & "\root\cimv2", co)
oq = New System.Management.ObjectQuery("SELECT * FROM Win32_OperatingSystem")
query = New ManagementObjectSearcher(ms, oq)
queryCollection = query.Get()
For Each MonMO In queryCollection
LabelVersionOS.Text = "<B>Version OS </B>: " & MonMO("Manufacturer")
LabelVersionOS.Text &= " - " & MonMO("Caption") & " (" & MonMO("Version") & ")<BR><BR>"
Next
Catch ex As Exception
LabelVersionOS.Text = "Erreur dans l'appel WMI : " & ex.Message
Finally
Me.Controls.Add(LabelVersionOS)
End Try
End Sub
Pour le pc local j'obtiens la reponse voulue mais pour le switch distant j'obtiens :
"Erreur dans l'appel WMI : The RPC server is unavailable. (Exception from HRESULT: 0x800706BA)"
merci de ta reponse et j'éspère que tu sera dès lors m'éclairer sur le sujet.