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 Visual Basic WMI manque d'informtation ...

WMI manque d'informtation ...

7 réponses
Avatar
TroXsA
Bonjour a tous

Je travaille beaucoup avec WMI actuellement, et je fait de l'interrogation a
distance sur d'autre machine
et j'ai remarqué un phénomène bizarre
Exemple avec la classe "Win32_LogicalDisk", en local j'ai tous les disques
dur, qu'il soit réseaux (mapper), physique(IDE), USB .... mais pas sur une
machine distante j'ai que les disques dur physique (local), c'est la même
chose avec les imprimantes (WMI Win32_Printer) en local j'ai les imprimantes
réseaux et local, mais pas sur une machine distante; sur la machine distante
j'ai que les imprimantes local et non réseau pourquoi ?

Voila le code pour une Win32_Printer
____________________________________________________
Dim oQuery As New SelectQuery( "Select * From Win32_Printer")
Dim oSearch As New ManagementObjectSearcher(oQuery)
For Each Info As ManagementObject In oSearch.Get()
Try
ListView1.Items.Add(Info(
"Name").ToString()).SubItems.Add(Info("Default").ToString())
Catch ex As Exception
.....
End Try
Next
End Sub
End
___________________________________________________

***** Voila le meme code (légé modifié) pour interroger une machine distante

___________________________________________________
Public oConnexion As New ConnectionOptions
oConnexion.Username = cTxtLogin.Text
oConnexion.Password = cTxtPassword.Text

Dim oManagementScope As New ManagementScope("\\" & TextBox1.Text & _
"\root\cimv2", oConnexion)

oQuery = New SelectQuery("Select * From Win32_Printer")
oSearch = New ManagementObjectSearcher(oManagementScope, oQuery)
For Each Info As ManagementObject In oSearch.Get()
Try
LvImprimante.Items.Add(Info("Name").ToString()).SubItems.Add(Info("Default").ToString())
Catch ex As Exception
.....
End Try
Next
____________________________________________________


Qui peu me dire comment faire pour avoir l'intégralité des informations ?
Qui a eu des problèmes similaire ?

Merci d'avance ...


--
Mail : http://cerbermail.com/?rIXgaw9Xsl
Site : http://planetenova.free.fr/
Signaler un problème avec ce contenu

7 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
Kawaman
Je voulais me servir de WMI et j'ai remarque dans la doc que tout
simplement toutes les classes n'etaient pas disponibles sur tous les OS
Ainsi pour Win32_LogicalDisk on peut lire
Requirements
Client Requires Windows "Longhorn", Windows XP, Windows 2000
Professional, or Windows NT Workstation 4.0 SP4 and later.
Server Requires Windows Server "Longhorn", Windows Server 2003, Windows
2000 Server, or Windows NT Server 4.0 SP4 and later.
(source
:http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wmisdk/wmi/win32_logicaldisk.asp)

Donc par exemple avec un win 98 ben ca marche pas

TroXsA a écrit :
Bonjour a tous

Je travaille beaucoup avec WMI actuellement, et je fait de l'interrogation a
distance sur d'autre machine
et j'ai remarqué un phénomène bizarre
Exemple avec la classe "Win32_LogicalDisk", en local j'ai tous les disques
dur, qu'il soit réseaux (mapper), physique(IDE), USB .... mais pas sur une
machine distante j'ai que les disques dur physique (local), c'est la même
chose avec les imprimantes (WMI Win32_Printer) en local j'ai les imprimantes
réseaux et local, mais pas sur une machine distante; sur la machine distante
j'ai que les imprimantes local et non réseau pourquoi ?

Voila le code pour une Win32_Printer
____________________________________________________
Dim oQuery As New SelectQuery( "Select * From Win32_Printer")
Dim oSearch As New ManagementObjectSearcher(oQuery)
For Each Info As ManagementObject In oSearch.Get()
Try
ListView1.Items.Add(Info(
"Name").ToString()).SubItems.Add(Info("Default").ToString())
Catch ex As Exception
.....
End Try
Next
End Sub
End
___________________________________________________

***** Voila le meme code (légé modifié) pour interroger une machine distante

___________________________________________________
Public oConnexion As New ConnectionOptions
oConnexion.Username = cTxtLogin.Text
oConnexion.Password = cTxtPassword.Text

Dim oManagementScope As New ManagementScope("" & TextBox1.Text & _
"rootcimv2", oConnexion)

oQuery = New SelectQuery("Select * From Win32_Printer")
oSearch = New ManagementObjectSearcher(oManagementScope, oQuery)
For Each Info As ManagementObject In oSearch.Get()
Try
LvImprimante.Items.Add(Info("Name").ToString()).SubItems.Add(Info("Default").ToString())
Catch ex As Exception
.....
End Try
Next
____________________________________________________


Qui peu me dire comment faire pour avoir l'intégralité des informations ?
Qui a eu des problèmes similaire ?

Merci d'avance ...




Avatar
Fred
Dans le message:dj5489$se7$,
TroXsA écrit:
Bonjour a tous

Je travaille beaucoup avec WMI actuellement, et je fait de
l'interrogation a distance sur d'autre machine
et j'ai remarqué un phénomène bizarre
Exemple avec la classe "Win32_LogicalDisk", en local j'ai tous les
disques dur, qu'il soit réseaux (mapper), physique(IDE), USB ....
mais pas sur une machine distante j'ai que les disques dur physique
(local), c'est la même chose avec les imprimantes (WMI Win32_Printer)
en local j'ai les imprimantes réseaux et local, mais pas sur une
machine distante; sur la machine distante j'ai que les imprimantes
local et non réseau pourquoi ?



Bonjour,
Les lecteurs et imprimantes réseau ne sont-ils pas liés à une session
utilisateur et non à la machine ?

--
Fred
http://www.cerbermail.com/?3kA6ftaCvT
Avatar
TroXsA
Kawaman,
Effectivement j'avais aussi remarqué ça ...mais
c'est que sur des PC Windows XP Pro avec Patch SP2 donc ça devrais
fonctionner non ?
Toutes les machines utilisées actuellement sont a jour avec Windows Update

Y a t-il une autre mise a jour ou un HotFix ?

--
Mail : http://cerbermail.com/?rIXgaw9Xsl
Site : http://planetenova.free.fr/


"Kawaman" a écrit dans le message de news:
4356154d$0$7915$
Je voulais me servir de WMI et j'ai remarque dans la doc que tout
simplement toutes les classes n'etaient pas disponibles sur tous les OS
Ainsi pour Win32_LogicalDisk on peut lire
Requirements
Client Requires Windows "Longhorn", Windows XP, Windows 2000 Professional,
or Windows NT Workstation 4.0 SP4 and later.
Server Requires Windows Server "Longhorn", Windows Server 2003, Windows
2000 Server, or Windows NT Server 4.0 SP4 and later.
(source
:http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wmisdk/wmi/win32_logicaldisk.asp)

Donc par exemple avec un win 98 ben ca marche pas

TroXsA a écrit :
Bonjour a tous

Je travaille beaucoup avec WMI actuellement, et je fait de
l'interrogation a distance sur d'autre machine
et j'ai remarqué un phénomène bizarre
Exemple avec la classe "Win32_LogicalDisk", en local j'ai tous les
disques dur, qu'il soit réseaux (mapper), physique(IDE), USB .... mais
pas sur une machine distante j'ai que les disques dur physique (local),
c'est la même chose avec les imprimantes (WMI Win32_Printer) en local
j'ai les imprimantes réseaux et local, mais pas sur une machine distante;
sur la machine distante j'ai que les imprimantes local et non réseau
pourquoi ?

Voila le code pour une Win32_Printer
____________________________________________________
Dim oQuery As New SelectQuery( "Select * From Win32_Printer")
Dim oSearch As New ManagementObjectSearcher(oQuery)
For Each Info As ManagementObject In oSearch.Get()
Try
ListView1.Items.Add(Info(
"Name").ToString()).SubItems.Add(Info("Default").ToString())
Catch ex As Exception
.....
End Try
Next
End Sub
End
___________________________________________________

***** Voila le meme code (légé modifié) pour interroger une machine
distante

___________________________________________________
Public oConnexion As New ConnectionOptions
oConnexion.Username = cTxtLogin.Text
oConnexion.Password = cTxtPassword.Text

Dim oManagementScope As New ManagementScope("" & TextBox1.Text & _
"rootcimv2", oConnexion)

oQuery = New SelectQuery("Select * From Win32_Printer")
oSearch = New ManagementObjectSearcher(oManagementScope, oQuery)
For Each Info As ManagementObject In oSearch.Get()
Try
LvImprimante.Items.Add(Info("Name").ToString()).SubItems.Add(Info("Default").ToString())
Catch ex As Exception
.....
End Try
Next
____________________________________________________


Qui peu me dire comment faire pour avoir l'intégralité des informations ?
Qui a eu des problèmes similaire ?

Merci d'avance ...





Avatar
TroXsA
Tres tres bonne remarque Fred je vais faire les testes et je reviens les
communiqués

--
Mail : http://cerbermail.com/?rIXgaw9Xsl
Site : http://planetenova.free.fr/


"Fred" a écrit dans le message de news:

Dans le message:dj5489$se7$,
TroXsA écrit:
Bonjour a tous

Je travaille beaucoup avec WMI actuellement, et je fait de
l'interrogation a distance sur d'autre machine
et j'ai remarqué un phénomène bizarre
Exemple avec la classe "Win32_LogicalDisk", en local j'ai tous les
disques dur, qu'il soit réseaux (mapper), physique(IDE), USB ....
mais pas sur une machine distante j'ai que les disques dur physique
(local), c'est la même chose avec les imprimantes (WMI Win32_Printer)
en local j'ai les imprimantes réseaux et local, mais pas sur une
machine distante; sur la machine distante j'ai que les imprimantes
local et non réseau pourquoi ?



Bonjour,
Les lecteurs et imprimantes réseau ne sont-ils pas liés à une session
utilisateur et non à la machine ?

--
Fred
http://www.cerbermail.com/?3kA6ftaCvT


Avatar
TroXsA
Bien joué Fred c'est bien ça
A tu une solution pour contourner le probleme ?

--
Mail : http://cerbermail.com/?rIXgaw9Xsl
Site : http://planetenova.free.fr/

"Fred" a écrit dans le message de news:

Dans le message:dj5489$se7$,
TroXsA écrit:
Bonjour a tous

Je travaille beaucoup avec WMI actuellement, et je fait de
l'interrogation a distance sur d'autre machine
et j'ai remarqué un phénomène bizarre
Exemple avec la classe "Win32_LogicalDisk", en local j'ai tous les
disques dur, qu'il soit réseaux (mapper), physique(IDE), USB ....
mais pas sur une machine distante j'ai que les disques dur physique
(local), c'est la même chose avec les imprimantes (WMI Win32_Printer)
en local j'ai les imprimantes réseaux et local, mais pas sur une
machine distante; sur la machine distante j'ai que les imprimantes
local et non réseau pourquoi ?



Bonjour,
Les lecteurs et imprimantes réseau ne sont-ils pas liés à une session
utilisateur et non à la machine ?

--
Fred
http://www.cerbermail.com/?3kA6ftaCvT


Avatar
Fred
Dans le message:dj57qd$ujo$,
TroXsA écrit:

Bien joué Fred c'est bien ça
A tu une solution pour contourner le probleme ?



Je te l'aurais donnée ;-)
Pour ma part, je ne pense pas que cela soit contournable.

--
Fred
http://www.cerbermail.com/?3kA6ftaCvT
Avatar
TroXsA
Merci beaucoup :) mais je vais quand meme faire des recherche coter API,
peut etre que ...

--
Mail : http://cerbermail.com/?rIXgaw9Xsl
Site : http://planetenova.free.fr/
"Fred" a écrit dans le message de news:

Dans le message:dj57qd$ujo$,
TroXsA écrit:

Bien joué Fred c'est bien ça
A tu une solution pour contourner le probleme ?



Je te l'aurais donnée ;-)
Pour ma part, je ne pense pas que cela soit contournable.

--
Fred
http://www.cerbermail.com/?3kA6ftaCvT